4025 GOSUB 1980