10 P1=60000
20 P2=119 
30 P3=0
100 P0=50
110 P9=P1
120 R2=1
130 P4=%1
140 IF P4=P2 THEN 100
150 IF P9=P3 THEN 200
160 IF P0>P3 THEN 130
170 R2=0
180 GOTO 130 
200 R1=1
210 R2=0
220 P9=2000
230 P4=%1
240 IF P9>P3 THEN 230
250 R1=0
260 GOTO 100