Skip to main content

Casio FX-700P

Casio FX-700P.jpg

Resources

Usage

Writing programs

  1. Enter write mode: MODE, 1
  2. Select program S, 0 to 9
  3. Enter program lines: <line no> <command> <args>, EXEC
  4. LIST to list the program (follow by line number to start from that line)
    1. Each listed line can be edited
    2. AC to cancel any changes made to a line
    3. EXEC save changes
  5. Changing <line no> of a line makes a copy of it under that name (if already exist it overwrites existing one)
  6. Putting just <line no> with no <command> removes that line

Running programs

  1. Enter run mode with MODE, 0
  2. S, <program number> to run it
  3. Alternatively type RUN to run currently selected program (last edited or run)

Typing

  • Lower case letters: MODE, . (dot; EXT mode)

BASIC games

Spot and Stop

5 L=0
10 PRINT "Spot and Stop"
20 PRINT "HIGHEST=";H
30 PRINT "BY ";$
40 FOR G=1 TO 20
50 A=INT (RAN#*10)
60 GOSUB 300
70 INPUT C
80 IF A=C;L=L+20:PRINT "GOOD":GOTO 100
90 L=L/2:PRINT "MISSED"
100 NEXT G
110 L=INT L:PRINT :PRINT "SCORE=";L
120 IF L>H;H=L:PRINT "NEW HIGH":INPUT "NAME",$
130 END
300 PRINT "::::::::::";
310 PRINT CSR A;";";:FOR W=1 TO 40:NEXT W
315 PRINT
320 PRINT "0123456789";
330 RETURN

Gopher Trap

10 PRINT "HIGHEST:";H:G=0:$="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
20 FOR C=0 TO 4
30 PRINT CSR 0;"            ";
40 A=INT (RAN#*26+1):B=INT (RAN#*12)
50 D$=MID(A,1)
60 FOR E=0 TO 25:PRINT CSR B;D$;:F$=KEY:IF F$="";NEXT E
70 IF D$=F$;PRINT :PRINT "MISSED:0";:GOSUB 200:NEXT C:GOTO 100
80 PRINT :PRINT CSR 0;"TIME :";E;:GOSUB 200
90 S=(27-E)*10:PRINT CSR 0;"SCORE:"S;:G=G+S:GOSUB 200:NEXT C
100 IF H<G;H=G
110 PRINT :PRINT CSR 0;"FINAL:";G;" "
120 END
200 FOR W=1 TO 200:NEXT W:RETURN

 

Back to top