10 CLEAR : PRINT AT 10,2;"Boulder Jumper, by @kevinhooke": PRINT AT 12,10;"b = you": PRINT AT 14,10;"O = rock"
  
20 PRINT AT 16,10;"M = to jump": INPUT "Press a key when ready!", a$
  
30 CLEAR : LET lives=3: LET score=0: LET jump=0: PRINT AT 2,10;"b"
  
40 FOR i = 30 TO 1 STEP -1: PRINT AT 2,i;"O": PRINT AT 2,i+1;" ": LET a$=INKEY$: IF i=1 THEN PRINT AT 2,1;" "
  
50 PRINT AT 0,0;"Lives: ": PRINT AT 0,6;lives: PRINT AT 0,15;"Score: ": PRINT AT 0,22;score: IF jump = 0 THEN PRINT AT 2,10;"b"
  
60 IF jump=0 AND i=10 THEN PRINT AT 1,10;"ouch!": LET lives=lives-1: BEEP 1,-2: PRINT AT 1,10;"     ": PRINT AT 2,10;"b"
  
70 IF lives=0 THEN PRINT AT 1,15;"Game Over!": BEEP 2,-4: INPUT "PRESS A KEY";a$: GO TO 10
  
80 IF jump>0 THEN LET jump=jump - 1: IF jump=0 THEN PRINT AT 2,10;"b": PRINT AT 1,10;" "
  
90 IF a$="m" THEN PRINT AT 1,10;"b": PRINT AT 2,10;" ": LET jump=7: LET score=score+10: BEEP 0.1,4
 100 NEXT i: GO TO 40