Duration: 9:56

536 views

19

10 rem "bocchi the rock" game
20 height = 0
30 print "you are bocchi, a rock on a mission to climb to the top of a mountain."
40 print "type 'up' to climb up the mountain, 'down' to climb down the mountain or 'stay' to stay in place."
50 input a$
60 if a$ = "up" then goto 80
70 if a$ = "down" then goto 150
80 if a$ = "stay" then print "you stay in place." : goto 50
90 rem climbing up the mountain
100 b% = b% + 1
110 print "you are now at height "; b%
120 if b% = 10 then print "congratulations, you have reached the top of the mountain! you win!" : end
130 goto 50
140 rem climbing down the mountain
150 b% = b% - 1
160 print "you are now at height "; b%
170 if b% = 0 then print "you have left the mountain, game over." : end
180 goto 50