Casio FX-730P Owner's Manual page 103

660 f·4E>=:T
._T
~.70 F=0
680 FOR J=l TO P
6
'3(J
"1=0: IF :: - : ;
i : :
l '
.n
=[t THEr·1 73>3
700 IF YS<J)=AS THEN M=X<l,J)*H
710 PRINT : BEEP
720
P~'.If·4T
11
PLA
1
Y
1
EF'.
11
;J;
II
~PPIZE
$ .. ;M;
730 X<2,J)=X<2,J)+M: GOSUB 1000
F+l
(:i0:3U8 1000
7f.>3 r·iE:=·::T
.J
770 f='RH-ff : BEEP : IF F=P THEr·1 :;::30
780 t=·P I i'ff
II
F'.EPLA'·.-' [ •. , . • /t·C -::.i• ;
7'?0 AS=
~2/S:
IF AS=" " T-HEr·i 7'?0
800 IF AS="\'" THEr·1 R=R+1: GOTO i:30
:310 IF AS="W THEr·1
:;::3~3
:320 GOTO 7'?0
:330 PPI~4T : F'~'.If'-4T
11
(:iAME Cit.)E~'. 11
:340 Ef-fD
10~30
F:EM
t.
i mer s1...1b
1010 FOR
~:: =1
TO 150: t1E::<T
t<
1020
F:ETUR~i
5-2 Horse Race Game
93