Untitled
10 CLS:X=746:P=998:FORI=1T01000:PRINT@0,"SCORE ="S;:S=S+1:IFPEEK(1 5360+X+64)=420ORPEEK(15360+X)=42THENPRINT®X,"H";:PRINT@896,"";:END ELSEPRINT@X,"H";:PRINT@P,"* *":C=RND(3)-2:P=P+C:K=PEEK(14440): IFK=32THENX=X-1:NEXTELSEIFK=64THENX=X+1:NEXTELSENEXT 20 REM DOWNHILL RACER BY CHRISTOPHER LAMPTON 30 REM 8317-14TH AVE., APT. 201, HYATTSVILLE, MD 20783
Leave a Comment