RIAG Crate 010: 077 Volume 77
Item Preview
Share or Embed This Item
Flag this item for
RIAG Crate 010: 077 Volume 77
- Language
- English
Notes
Disk info for 077_Volume_77.dsk:
File Name: riag_010_077_Volume_77/077_Volume_77.dsk
Disk Name: DISK VOLUME #5
Physical Size (bytes): 143360
Free Space (bytes): 5888
Used Space (bytes): 137472
Physical Size (KB): 140
Free Space (KB): 5
Used Space (KB): 134
Archive Order: DOS
Disk Format: DOS 3.3
Total Sectors: 560
Free Sectors: 23
Used Sectors: 537
Tracks On Disk: 35
Sectors On Disk: 16
Text found in 077_Volume_77.dsk/DATA EDITOR.bas:
10 DL = 25056:EL = 25856: REM DATA LOCATION
20 TEXT : HOME : HTAB 6: INVERSE
30 PRINT "*** SOFTGRAPH DATA EDITOR ***"
40 GOTO 1800
50 NORMAL
60 POKE 34,1
70 DL$ = CHR$(32) + CHR$(8)
80 GOSUB 2100
90 VF = 1:HF = 1
100 GOSUB 2000
110 GOSUB 2200
120 GOSUB 2500: PRINT W$;
130 GET A$:A = ASC(A$)
140 IF A <32 THEN 200
150 IF LEN(W$) = 8 THEN PRINT CHR$(7);: GOTO 130
160 W$ = W$ +A$: GOSUB 2200: PRINT W$;
170 GOTO 130
200 REM CONTROL COMMAND HANDLER
210 IF A = 8 THEN 1100
220 IF A = 21 THEN A = 11
230 GOSUB 2300
240 IF A = 24 THEN 600
250 IF A = 12 THEN 400
260 IF A = 3 THEN GOSUB 2000: GOTO 110
270 IF A = 17 THEN 1000
280 IF A >8 AND A <14 THEN 1300
290 IF A = 4 THEN 1500
300 IF A = 1 THEN 1600
310 GOTO 130
400 REM LEGEND EDITOR
410 FOR L = 1 TO 4
420 L$ = ""
430 VTAB 24: HTAB 1: NORMAL
440 PRINT "INPUT LEGEND ";L;":";: INVERSE : PRINT SPC( 16);: HTAB 16
450 GET A$: IF A$ = CHR$(8) AND LEN(L$) <2 THEN L$ = "": HTAB 16: PRINT DL$;: GOTO 450
460 IF A$ = CHR$(8) THEN L$ = LEFT$(L$, LEN(L$) -1): PRINT A$;DL$;: GOTO 450
470 IF A$ = CHR$(13) THEN 510
480 IF LEN(L$) = 16 THEN PRINT CHR$(7);: GOTO 450
490 IF ASC(A$) >31 THEN PRINT A$;:L$ = L$ +A$: GOTO 450
500 GOTO 450
510 NORMAL : IF L$ = "" THEN 560
520 L$ = LEFT$(L$ +" ",16): REM 15 SPACES
530 IF L = 1 OR L = 3 THEN INVERSE
540 VTAB 3: HTAB 1 +8 *L:W$ = LEFT$(L$,8): PRINT W$;:HF = L +1:VF = -1: GOSUB 2300
550 VTAB 4: HTAB 1 +8 *L:W$ = RIGHT$(L$,8): PRINT W$;:HF = L +1:VF = 0: GOSUB 2300
560 NEXT L
570 VTAB 24: HTAB 1: CALL -868
580 VF = 1:HF = 1: GOTO 110
600 REM X FIELD BUILDER
605 NORMAL
610 HOME : PRINT : PRINT : PRINT "DEFINE X AXIS BY:"
620 PRINT : PRINT " 1. MONTHS"
630 PRINT " 2. DAYS"
640 PRINT " 3. RANGE OF NUMBERS"
650 PRINT " 4. EXIT"
660 VTAB 12: HTAB 1: PRINT "CHOOSE OPTION: ";: CALL -868: GET A$
670 A = VAL(A$): IF A <1 OR A >4 THEN 660
672 PRINT A$;
675 GET A$: IF A$ = CHR$(8) THEN 660
677 IF A$ < > CHR$(13) THEN 675
680 ON A GOTO 710,700,840,690
690 HOME : GOSUB 2100: GOTO 110
700 U$ = "DAY":HN = 7:TD = 19:BD = 13: GOTO 720
710 U$ = "MONTH":TD = 12:BD = 1:HN = 12
720 HOME : PRINT
730 PRINT : PRINT "NUMBER OF ";U$;: INPUT "S? ";A$:NM = INT( VAL(A$))
740 IF NM <2 OR NM >18 THEN PRINT : PRINT "CANNOT PROCESS ";NM;" ";U$;"S"; CHR$(7): GOTO 730
750 PRINT : PRINT "STARTING WITH ";U$;: INPUT " #";A$:SM = INT( VAL(A$))
760 IF SM <1 OR SM >HN THEN PRINT : PRINT "MUST BE FROM 1 TO ";HN; CHR$(7): GOTO 750
770 IF BD = 13 THEN SM = SM +12
780 HF = 1: FOR VF = 1 TO 18
790 IF SM >TD THEN SM = BD
800 IF VF >NM THEN W$ = " ": GOTO 820
810 W$ = X$(SM)
820 GOSUB 2300:SM = SM +1
830 NEXT VF:VF = 1: GOTO 690
840 HOME : PRINT
850 PRINT : INPUT "HOW MANY NUMBERS? ";A$:NM = INT( VAL(A$)): IF NM <2 OR NM >18 THEN PRINT "CANNOT HANDLE ";NM;" NUMBERS"; CHR$(7): GOTO 850
860 PRINT : INPUT "STARTING NUMBER? ";A$:SM = VAL(A$)
870 PRINT : INPUT "INCREMENT BY? ";A$:IM = VAL(A$): IF IM = 0 THEN PRINT "CANNOT INCREMENT BY 0"; CHR$(7): GOTO 870
880 HF = 1: FOR VF = 1 TO 18
890 IF VF >NM THEN W$ = " ": GOTO 910
900 W$ = STR$(SM): IF LEN(W$) >8 THEN PRINT W$;" TOO LONG"; CHR$(7):W$ = LEFT$(W$,8)
910 GOSUB 2300
920 SM = SM +IM
930 NEXT VF
940 VF = 1: GOTO 690
1000 REM EXIT ROUTINE
1010 NORMAL
1020 VTAB 24: HTAB 1: PRINT "QUIT TO MENU? ";: GET A$: HTAB 1: CALL -868: IF A$ = "N" THEN 1050
1030 IF A$ = "Y" THEN TEXT : HOME : VTAB 10: PRINT "INSERT PROGRAM DISK IN DRIVE 1": PRINT "AND HIT A KEY.";: GET A$: PRINT : PRINT CHR$(4);"RUN MENU,D1"
1040 GOTO 1020
1050 GOSUB 2200: GOSUB 2500: PRINT W$;: GOTO 130
1100 REM BACKSPACE
1110 IF W$ = "" THEN 130
1120 IF LEN(W$) = 1 THEN W$ = "": GOSUB 2200: PRINT DL$;: GOTO 130
1130 W$ = LEFT$(W$, LEN(W$) -1)
1140 GOSUB 2200: PRINT W$;DL$;
1150 GOTO 130
1300 REM CURSOR MOVE
1310 ON A -8 GOTO 1330,1350,1370,130,1390
1320 GOTO 130
1330 VF = VF -1: IF VF = 0 THEN VF = 18
1340 GOTO 110
1350 HF = HF -1: IF HF = 0 THEN HF = 5
1360 GOTO 110
1370 HF = HF +1: IF HF = 6 THEN HF = 1
1380 GOTO 110
1390 VF = VF +1: IF VF = 19 THEN VF = 1
1400 GOTO 110
1500 REM DELETE A LINE
1510 HF = 1: GOSUB 2200
1520 GOSUB 2500: INVERSE : PRINT W$; SPC( 8 - LEN(W$));: NORMAL
1530 VTAB 24: HTAB 1: PRINT "DELETE THIS LINE? ";: GET A$: HTAB 1: CALL -868: IF A$ = "Y" THEN 1550
1540 GOSUB 2200: PRINT W$; SPC( 8 - LEN(W$));: GOTO 110
1550 RL = DL +40 *(VF +1)
1560 POKE 236, INT(RL/256)
1570 POKE 235,RL -256 * PEEK(236)
1580 CALL 25982:V = VF:H = HF
1590 GOSUB 2100:VF = V:HF = H: GOTO 110
1600 REM ADD A LINE
1610 HF = 1: GOSUB 2200
1620 GOSUB 2500: INVERSE : PRINT W$; SPC( 8 - LEN(W$));: NORMAL
1630 VTAB 24: HTAB 1: PRINT "ADD A LINE HERE? ";: GET A$: HTAB 1: CALL -868: IF A$ = "Y" THEN 1650
1640 GOSUB 2200: PRINT W$; SPC( 8 - LEN(W$));: GOTO 110
1650 RL = DL +40 *(VF +1) -1
1660 POKE 238, INT(RL/256)
1670 POKE 237,RL -256 * PEEK(238)
1680 CALL 26023
1690 V = VF:H = HF
1700 GOSUB 2100:VF = V:HF = H: GOTO 110
1800 REM X AXIS OPTIONS INIT
1810 DIM X$(19)
1820 FOR X = 1 TO 19: READ X$(X): NEXT X: GOTO 50
1830 DATA JAN,FEB,MAR,APR,MAY,JUN
1840 DATA JUL,AUG,SEP,OCT,NOV,DEC
1850 DATA SUN,MON,TUE,WED,THU,FRI,SAT
2000 REM INITIALIZE DATA
2010 NORMAL : VTAB 24: HTAB 1: PRINT "CLEAR DATA? ";: GET A$: HTAB 1: CALL -868: IF A$ = "Y" THEN 2030
2020 RETURN
2030 CALL 25955
2040 W$ = "LEGENDS:"
2050 PL = DL -1: GOSUB 2330
2100 REM DISPLAY SCREEN
2110 CALL 25862
2120 VTAB 23: HTAB 1: PRINT "COMMANDS: CONTROL-IJKM,C,L,X,A,D,Q";
2130 VF = 1: RETURN
2200 REM PLACE CURSOR
2210 VTAB VF +4: HTAB 8 *(HF -1) +1
2220 NORMAL : IF HF/2 = INT(HF/2) THEN INVERSE
2230 RETURN
2300 REM POKE IN WORD
2310 PL = DL +40 *(VF +1) +8 *(HF -1) -1
2320 IF W$ = "" THEN 2370
2330 FOR LOC = 1 TO LEN(W$)
2340 POKE PL +LOC, ASC( MID$ (W$,LOC,1))
2350 NEXT LOC
2360 IF LEN(W$) = 8 THEN 2400
2370 FOR LOC = LEN(W$) +1 TO 8
2380 POKE PL +LOC,32
2390 NEXT LOC
2400 RETURN
2500 REM READ WORD
2510 PL = DL +40 *(VF +1) +8 *(HF -1) -1
2520 WL = 0:W$ = ""
2530 FOR LOC = 8 TO 1 STEP -1
2540 IF PEEK(PL +LOC) >32 THEN WL = LOC:LOC = 1
2550 NEXT LOC
2560 IF WL = 0 THEN RETURN
2570 FOR LOC = 1 TO WL
2580 W$ = W$ + CHR$( PEEK(PL +LOC))
2590 NEXT LOC
2600 RETURN
Text found in 077_Volume_77.dsk/DOC.ML.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 A9 00 85 24 85 25 20 22 FC A2 00 20 56 13 E8 E0 )..$.% " |". V.h`
$000010 17 D0 F8 60 A0 00 B1 F9 09 80 C9 C0 90 02 29 DF .Px` .1y ..I@..)_
$000020 20 ED FD C8 C0 28 D0 EE A5 F9 18 69 28 90 02 E6 m}H@(Pn %y.i(..f
$000030 FA 85 F9 60 .. .. .. .. .. .. .. .. .. .. .. .. z.y`
** END **
Text found in 077_Volume_77.dsk/DOCFILE.txt:
Offset Hex Data Characters
======= ================================================ =================
$000000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000020 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000030 20 20 20 20 20 20 20 53 6F 66 74 47 72 61 70 68 S oftGraph
$000040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000050 20 20 20 20 20 20 20 20 20 20 20 20 62 79 20 44 by D
$000060 61 76 69 64 20 44 75 72 6B 65 65 20 20 20 20 20 avid Dur kee
$000070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000090 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0000A0 20 20 20 20 20 54 68 65 20 70 75 72 70 6F 73 65 The purpose
$0000B0 20 6F 66 20 74 68 69 73 20 64 6F 63 75 6D 65 6E of this documen
$0000C0 74 61 74 69 6F 6E 20 20 69 73 20 74 6F 20 66 61 tation is to fa
$0000D0 6D 69 6C 69 61 72 69 7A 65 20 79 6F 75 20 77 69 miliariz e you wi
$0000E0 74 68 20 74 68 65 20 53 6F 66 74 47 72 61 70 68 th the S oftGraph
$0000F0 67 72 61 70 68 69 6E 67 20 73 79 73 74 65 6D 2E graphing system.
$000100 20 49 74 20 77 69 6C 6C 20 74 61 6B 65 20 79 6F It will take yo
$000110 75 20 20 20 20 20 20 20 74 68 72 6F 75 67 68 20 u through
$000120 61 20 74 75 74 6F 72 69 61 6C 20 63 6F 76 65 72 a tutori al cover
$000130 69 6E 67 20 61 6C 6C 20 74 68 65 20 20 20 20 20 ing all the
$000140 66 65 61 74 75 72 65 73 20 6F 66 20 74 68 65 20 features of the
$000150 73 79 73 74 65 6D 20 61 6E 64 20 74 68 65 6E 20 system a nd then
$000160 70 72 65 73 65 6E 74 20 61 20 72 65 66 65 72 65 present a refere
$000170 6E 63 65 20 73 65 63 74 69 6F 6E 20 73 68 6F 77 nce sect ion show
$000180 69 6E 67 20 74 68 65 20 63 6F 6D 6D 61 6E 64 20 ing the command
$000190 63 68 61 72 61 63 74 65 72 73 20 61 73 73 6F 63 characte rs assoc
$0001A0 69 61 74 65 64 20 77 69 74 68 20 65 61 63 68 20 iated wi th each
$0001B0 70 72 6F 67 72 61 6D 20 77 69 74 68 69 6E 20 74 program within t
$0001C0 68 65 20 73 79 73 74 65 6D 2E 20 20 20 20 20 20 he syste m.
$0001D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0001F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000200 20 20 20 20 20 20 20 20 20 20 20 20 20 54 6F 20 To
$000210 6D 6F 76 65 20 74 68 72 6F 75 67 68 20 74 68 65 move thr ough the
$000220 20 74 75 74 6F 72 69 61 6C 2C 20 75 73 65 20 20 tutoria l, use
$000230 74 68 65 20 61 72 72 6F 77 20 6B 65 79 73 20 74 the arro w keys t
$000240 6F 20 73 63 72 6F 6C 6C 20 6C 69 6E 65 20 62 79 o scroll line by
$000250 20 6C 69 6E 65 20 20 20 61 6E 64 20 74 68 65 20 line and the
$000260 67 72 65 61 74 65 72 20 74 68 61 6E 20 61 6E 64 greater than and
$000270 20 6C 65 73 73 20 74 68 61 6E 20 73 69 67 6E 73 less th an signs
$000280 74 6F 20 6D 6F 76 65 20 70 61 67 65 20 62 79 20 to move page by
$000290 70 61 67 65 2E 20 54 6F 20 6A 75 6D 70 20 74 6F page. To jump to
$0002A0 20 74 68 65 20 20 20 20 62 65 67 69 6E 6E 69 6E the beginnin
$0002B0 67 20 6F 72 20 65 6E 64 2C 20 75 73 65 20 63 6F g or end , use co
$0002C0 6E 74 72 6F 6C 2D 42 20 61 6E 64 20 20 20 20 20 ntrol-B and
$0002D0 63 6F 6E 74 72 6F 6C 2D 45 2E 20 43 6F 6E 74 72 control- E. Contr
$0002E0 6F 6C 2D 50 20 77 69 6C 6C 20 73 65 6E 74 20 74 ol-P wil l sent t
$0002F0 68 65 20 77 68 6F 6C 65 74 75 74 6F 72 69 61 6C he whole tutorial
$000300 20 74 6F 20 61 20 70 72 69 6E 74 65 72 20 69 6E to a pr inter in
$000310 20 73 6C 6F 74 20 31 2E 20 20 20 20 20 20 20 20 slot 1.
$000320 46 69 6E 61 6C 6C 79 2C 20 70 72 65 73 73 69 6E Finally, pressin
$000330 67 20 65 73 63 61 70 65 20 77 69 6C 6C 20 67 65 g escape will ge
$000340 74 20 79 6F 75 20 20 20 62 61 63 6B 20 74 6F 20 t you back to
$000350 74 68 65 20 53 6F 66 74 47 72 61 70 68 20 6D 65 the Soft Graph me
$000360 6E 75 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 nu.
$000370 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000380 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000390 20 20 20 20 20 20 20 20 20 20 20 20 20 46 72 6F Fro
$0003A0 6D 20 74 69 6D 65 20 74 6F 20 74 69 6D 65 2C 20 m time t o time,
$0003B0 74 68 69 73 20 20 20 20 20 20 20 20 20 20 20 20 this
$0003C0 64 6F 63 75 6D 65 6E 74 61 74 69 6F 6E 20 77 69 document ation wi
$0003D0 6C 6C 20 61 73 6B 20 79 6F 75 20 74 6F 20 67 69 ll ask y ou to gi
$0003E0 76 65 20 20 20 20 20 20 53 6F 66 74 47 72 61 70 ve SoftGrap
$0003F0 68 20 73 6F 6D 65 20 69 6E 70 75 74 2E 20 49 66 h some i nput. If
$000400 20 69 74 20 74 65 6C 6C 73 20 79 6F 75 20 74 6F it tell s you to
$000410 22 65 6E 74 65 72 22 20 73 6F 6D 65 74 68 69 6E "enter" somethin
$000420 67 2C 20 74 68 61 74 20 6D 65 61 6E 73 20 74 79 g, that means ty
$000430 70 65 20 69 74 20 69 6E 61 6E 64 20 68 69 74 20 pe it in and hit
$000440 72 65 74 75 72 6E 2E 20 49 66 20 69 74 20 73 61 return. If it sa
$000450 79 73 20 74 6F 20 70 72 65 73 73 20 61 20 20 20 ys to pr ess a
$000460 6B 65 79 2C 20 70 72 65 73 73 20 6F 6E 6C 79 20 key, pre ss only
$000470 74 68 61 74 20 6B 65 79 3B 20 72 65 74 75 72 6E that key ; return
$000480 20 77 69 6C 6C 20 20 20 6E 6F 74 20 62 65 20 6E will not be n
$000490 65 63 65 73 73 61 72 79 2E 20 20 20 20 20 20 20 ecessary .
$0004A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0004B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0004C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0004D0 20 20 20 20 20 20 20 20 46 49 52 53 54 20 54 48 FIRST TH
$0004E0 49 4E 47 53 20 46 49 52 53 54 20 20 20 20 20 20 INGS FIR ST
$0004F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000510 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000520 20 20 20 20 20 20 20 20 20 20 20 20 20 57 65 20 We
$000530 72 65 61 6C 69 7A 65 20 74 68 61 74 20 79 6F 75 realize that you
$000540 20 77 6F 6E 27 74 20 62 65 20 61 62 6C 65 20 20 won't b e able
$000550 74 6F 20 74 72 79 20 74 68 65 73 65 20 74 68 69 to try t hese thi
$000560 6E 67 73 20 6F 75 74 20 61 73 20 79 6F 75 27 72 ngs out as you'r
$000570 65 20 20 20 20 20 20 20 72 65 61 64 69 6E 67 20 e reading
$000580 74 68 65 6D 20 6F 6E 20 74 68 65 20 73 63 72 65 them on the scre
$000590 65 6E 20 75 6E 6C 65 73 73 20 79 6F 75 20 20 20 en unles s you
$0005A0 68 61 76 65 20 74 77 6F 20 63 6F 6D 70 75 74 65 have two compute
$0005B0 72 73 2E 20 49 66 20 79 6F 75 20 68 61 76 65 20 rs. If y ou have
$0005C0 61 20 20 20 20 20 20 20 70 72 69 6E 74 65 72 20 a printer
$0005D0 69 6E 20 79 6F 75 72 20 73 79 73 74 65 6D 2C 20 in your system,
$0005E0 69 74 20 69 73 20 61 20 67 6F 6F 64 20 20 20 20 it is a good
$0005F0 69 64 65 61 20 74 6F 20 70 72 69 6E 74 20 79 6F idea to print yo
$000600 75 72 73 65 6C 66 20 61 20 63 6F 70 79 20 6F 66 urself a copy of
$000610 20 74 68 69 73 20 20 20 74 75 74 6F 72 69 61 6C this tutorial
$000620 2E 20 49 66 20 79 6F 75 20 64 6F 6E 27 74 20 68 . If you don't h
$000630 61 76 65 20 61 20 70 72 69 6E 74 65 72 2C 20 20 ave a pr inter,
$000640 72 65 61 64 20 74 68 65 20 74 75 74 6F 72 69 61 read the tutoria
$000650 6C 2C 20 74 72 79 20 74 6F 20 67 65 74 20 74 68 l, try t o get th
$000660 65 20 69 64 65 61 20 20 6F 66 20 68 6F 77 20 74 e idea of how t
$000670 68 65 20 73 79 73 74 65 6D 20 69 73 20 69 6E 74 he syste m is int
$000680 65 67 72 61 74 65 64 2C 20 61 6E 64 20 20 20 20 egrated, and
$000690 63 6F 70 79 20 74 68 65 20 72 65 66 65 72 65 6E copy the referen
$0006A0 63 65 20 73 65 63 74 69 6F 6E 20 61 74 20 74 68 ce secti on at th
$0006B0 65 20 65 6E 64 20 20 20 6F 6E 74 6F 20 61 20 70 e end onto a p
$0006C0 69 65 63 65 20 6F 66 20 70 61 70 65 72 2E 20 20 iece of paper.
$0006D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0006E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0006F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000700 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
$000710 20 66 69 72 73 74 20 74 68 69 6E 67 20 74 6F 20 first t hing to
$000720 64 6F 20 69 73 20 62 6F 6F 74 20 74 68 65 20 20 do is bo ot the
$000730 64 69 73 6B 2E 20 41 6C 74 68 6F 75 67 68 20 74 disk. Al though t
$000740 68 65 20 70 72 6F 67 72 61 6D 73 20 69 6E 20 53 he progr ams in S
$000750 6F 66 74 47 72 61 70 68 61 72 65 20 73 65 70 61 oftGraph are sepa
$000760 72 61 74 65 20 41 70 70 6C 65 73 6F 66 74 20 66 rate App lesoft f
$000770 69 6C 65 73 2C 20 74 6F 74 61 6C 6C 79 20 20 20 iles, to tally
$000780 61 63 63 65 73 73 69 62 6C 65 20 62 79 20 6D 65 accessib le by me
$000790 61 6E 73 20 6F 66 20 74 68 65 20 4C 4F 41 44 20 ans of t he LOAD
$0007A0 61 6E 64 20 52 55 4E 20 63 6F 6D 6D 61 6E 64 73 and RUN commands
$0007B0 20 6F 66 20 44 4F 53 2C 20 74 68 65 79 20 6D 61 of DOS, they ma
$0007C0 79 20 6E 6F 74 20 6F 70 65 72 61 74 65 20 20 20 y not op erate
$0007D0 63 6F 72 72 65 63 74 6C 79 20 75 6E 6C 65 73 73 correctl y unless
$0007E0 20 79 6F 75 20 72 75 6E 20 74 68 65 6D 20 74 68 you run them th
$0007F0 72 6F 75 67 68 20 20 20 74 68 65 20 73 79 73 74 rough the syst
$000800 65 6D 20 6D 65 6E 75 2E 20 49 66 20 79 6F 75 20 em menu. If you
$000810 68 61 76 65 20 61 6C 72 65 61 64 79 20 20 20 20 have alr eady
$000820 62 6F 6F 74 65 64 20 44 4F 53 20 66 72 6F 6D 20 booted D OS from
$000830 61 6E 6F 74 68 65 72 20 64 69 73 6B 2C 20 79 6F another disk, yo
$000840 75 20 77 69 6C 6C 20 20 62 65 20 61 62 6C 65 20 u will be able
$000850 74 6F 20 73 74 61 72 74 20 53 6F 66 74 47 72 61 to start SoftGra
$000860 70 68 20 62 79 20 65 6E 74 65 72 69 6E 67 20 20 ph by en tering
$000870 52 55 4E 20 53 4F 46 54 47 52 41 50 48 2C 20 62 RUN SOFT GRAPH, b
$000880 75 74 20 69 74 20 69 73 20 62 65 74 74 65 72 20 ut it is better
$000890 74 6F 20 62 6F 6F 74 20 74 68 65 20 64 69 73 6B to boot the disk
$0008A0 20 73 6F 20 74 68 61 74 20 61 6E 79 74 68 69 6E so that anythin
$0008B0 67 20 74 68 61 74 20 69 73 20 20 20 20 20 20 20 g that i s
$0008C0 61 6C 72 65 61 64 79 20 69 6E 20 6D 65 6D 6F 72 already in memor
$0008D0 79 20 77 6F 6E 27 74 20 69 6E 74 65 72 66 65 72 y won't interfer
$0008E0 65 20 77 69 74 68 20 20 53 6F 66 74 47 72 61 70 e with SoftGrap
$0008F0 68 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 h.
$000900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000910 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000930 20 20 20 20 20 20 20 20 54 48 45 20 4D 45 4E 55 THE MENU
$000940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000950 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000970 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000980 20 20 20 20 20 20 20 20 20 20 20 20 20 41 66 74 Aft
$000990 65 72 20 53 6F 66 74 47 72 61 70 68 20 66 69 6E er SoftG raph fin
$0009A0 69 73 68 65 73 20 6C 6F 61 64 69 6E 67 20 20 20 ishes lo ading
$0009B0 74 68 65 20 73 68 61 70 65 20 74 61 62 6C 65 73 the shap e tables
$0009C0 20 61 6E 64 20 6D 61 63 68 69 6E 65 20 6C 61 6E and mac hine lan
$0009D0 67 75 61 67 65 20 20 20 73 75 62 72 6F 75 74 69 guage subrouti
$0009E0 6E 65 73 20 6E 65 63 65 73 73 61 72 79 20 74 6F nes nece ssary to
$0009F0 20 72 75 6E 20 74 68 65 20 73 79 73 74 65 6D 2C run the system,
$000A00 69 74 20 67 69 76 65 73 20 79 6F 75 20 74 68 65 it gives you the
$000A10 20 73 79 73 74 65 6D 20 6D 65 6E 75 2E 20 4A 75 system menu. Ju
$000A20 73 74 20 61 73 20 20 20 61 6C 6C 20 72 6F 61 64 st as all road
$000A30 73 20 6F 6E 63 65 20 6C 65 64 20 74 6F 20 52 6F s once l ed to Ro
$000A40 6D 65 2C 20 61 6C 6C 20 70 72 6F 67 72 61 6D 73 me, all programs
$000A50 69 6E 20 53 6F 66 74 47 72 61 70 68 20 6C 65 61 in SoftG raph lea
$000A60 64 20 74 6F 20 74 68 65 20 6D 65 6E 75 2E 20 54 d to the menu. T
$000A70 68 69 73 20 69 73 20 20 74 68 65 20 73 74 72 75 his is the stru
$000A80 63 74 75 72 65 20 6F 66 20 74 68 65 20 73 79 73 cture of the sys
$000A90 74 65 6D 3A 20 20 20 20 20 20 20 20 20 20 20 20 tem:
$000AA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000AB0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000AC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000AD0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000AE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000AF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 S
$000B00 6F 66 74 47 72 61 70 68 20 20 20 20 20 20 20 20 oftGraph
$000B10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000B20 20 20 20 20 20 20 20 20 20 20 20 21 20 20 20 20 !
$000B30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000B40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000B50 20 20 20 76 20 20 20 20 20 20 20 20 20 20 20 20 v
$000B60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000B70 20 20 20 20 20 20 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F __ ________
$000B80 5F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 _
$000B90 20 20 20 20 20 20 20 20 20 20 20 20 20 21 20 20 !
$000BA0 20 20 20 20 20 20 20 20 20 21 3C 2D 2D 2D 2D 3E !<---->
$000BB0 20 50 69 65 20 20 20 20 44 61 74 61 20 20 3C 2D Pie Data <-
$000BC0 2D 2D 2D 2D 3E 21 20 4D 61 69 6E 20 4D 65 6E 75 ---->! M ain Menu
$000BD0 20 21 20 20 20 20 20 43 68 61 72 74 20 20 20 20 ! C hart
$000BE0 45 64 69 74 6F 72 20 20 20 20 20 20 20 21 20 20 Editor !
$000BF0 20 20 20 5E 20 20 20 20 20 21 20 20 20 20 20 20 ^ !
$000C00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000C10 20 20 20 20 20 21 20 20 20 20 20 21 20 20 20 20 ! !
$000C20 20 21 3C 2D 2D 3E 20 42 61 72 2F 4C 69 6E 65 20 !<--> B ar/Line
$000C30 20 20 20 20 20 20 20 20 20 20 20 20 20 21 20 20 !
$000C40 20 20 20 21 20 20 20 20 20 21 20 20 20 20 43 68 ! ! Ch
$000C50 61 72 74 20 20 20 20 20 20 20 20 20 20 20 20 20 art
$000C60 20 20 20 20 20 21 20 20 20 20 20 76 20 20 20 20 ! v
$000C70 20 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 !
$000C80 20 20 20 20 20 20 20 20 20 20 20 20 20 21 20 44 ! D
$000C90 69 73 6B 20 4D 65 6E 75 20 21 20 20 20 20 20 20 isk Menu !
$000CA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000CB0 20 20 20 20 20 21 5F 5F 5F 5F 5F 5F 5F 5F 5F 5F !__ ________
$000CC0 5F 21 20 20 20 20 20 20 20 20 20 20 20 20 20 20 _!
$000CD0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000CE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000CF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000D00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000D10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000D20 20 20 20 20 20 4C 65 74 27 73 20 67 6F 20 66 69 Let 's go fi
$000D30 72 73 74 20 74 6F 20 74 68 65 20 64 69 73 6B 20 rst to t he disk
$000D40 6D 65 6E 75 2C 20 20 20 77 68 69 63 68 20 69 73 menu, which is
$000D50 20 61 63 74 75 61 6C 6C 79 20 61 20 70 61 72 74 actuall y a part
$000D60 20 6F 66 20 74 68 65 20 4D 65 6E 75 20 20 20 20 of the Menu
$000D70 70 72 6F 67 72 61 6D 2E 20 44 6F 20 74 68 69 73 program. Do this
$000D80 20 62 79 20 65 6E 74 65 72 69 6E 67 20 74 68 65 by ente ring the
$000D90 20 6E 75 6D 62 65 72 20 69 6E 20 74 68 65 20 6D number in the m
$000DA0 61 69 6E 20 6D 65 6E 75 20 6E 65 78 74 20 74 6F ain menu next to
$000DB0 20 74 68 65 20 64 69 73 6B 20 6D 65 6E 75 20 20 the dis k menu
$000DC0 6F 70 74 69 6F 6E 2E 20 52 65 6D 65 6D 62 65 72 option. Remember
$000DD0 2C 20 74 68 61 74 20 6D 65 61 6E 73 20 74 6F 20 , that m eans to
$000DE0 74 79 70 65 20 74 68 65 6E 75 6D 62 65 72 20 61 type the number a
$000DF0 6E 64 20 70 72 65 73 73 20 72 65 74 75 72 6E 2E nd press return.
$000E00 20 41 6C 6C 20 6E 75 6D 62 65 72 65 64 20 20 20 All num bered
$000E10 6D 65 6E 75 73 20 69 6E 20 74 68 65 20 73 79 73 menus in the sys
$000E20 74 65 6D 20 65 78 70 65 63 74 20 74 68 69 73 20 tem expe ct this
$000E30 6B 69 6E 64 20 6F 66 20 69 6E 70 75 74 2E 20 20 kind of input.
$000E40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000E50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000E60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000E70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000E80 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
$000E90 20 64 69 73 6B 20 6D 65 6E 75 20 61 6C 6C 6F 77 disk me nu allow
$000EA0 73 20 79 6F 75 20 74 6F 20 63 61 74 61 6C 6F 67 s you to catalog
$000EB0 74 68 65 20 64 69 73 6B 20 61 6E 64 20 6C 6F 61 the disk and loa
$000EC0 64 20 61 6E 64 20 73 61 76 65 20 64 61 74 61 20 d and sa ve data
$000ED0 61 6E 64 20 20 20 20 20 70 69 63 74 75 72 65 20 and picture
$000EE0 66 69 6C 65 73 2E 20 49 74 20 61 6C 73 6F 20 61 files. I t also a
$000EF0 6C 6C 6F 77 73 20 79 6F 75 20 74 6F 20 73 65 65 llows yo u to see
$000F00 74 68 65 20 68 69 2D 72 65 73 20 73 63 72 65 65 the hi-r es scree
$000F10 6E 2E 20 49 66 20 79 6F 75 20 73 65 6C 65 63 74 n. If yo u select
$000F20 20 74 68 61 74 20 20 20 6F 70 74 69 6F 6E 20 61 that option a
$000F30 74 20 74 68 69 73 20 70 6F 69 6E 74 20 79 6F 75 t this p oint you
$000F40 20 77 69 6C 6C 20 73 65 65 20 73 6F 6D 65 20 20 will se e some
$000F50 66 61 73 63 69 6E 61 74 69 6E 67 20 67 61 72 62 fascinat ing garb
$000F60 61 67 65 2E 20 54 68 61 74 20 69 73 20 62 65 63 age. Tha t is bec
$000F70 61 75 73 65 20 20 20 20 74 68 65 72 65 20 69 73 ause there is
$000F80 20 6E 6F 20 70 69 63 74 75 72 65 20 69 6E 20 6D no pict ure in m
$000F90 65 6D 6F 72 79 2E 20 48 69 74 20 61 6E 79 20 20 emory. H it any
$000FA0 6B 65 79 20 74 6F 20 72 65 74 75 72 6E 2E 20 57 key to r eturn. W
$000FB0 65 27 6C 6C 20 67 65 74 20 61 20 70 69 63 74 75 e'll get a pictu
$000FC0 72 65 20 69 6E 20 20 20 74 68 65 72 65 20 73 6F re in there so
$000FD0 6F 6E 20 65 6E 6F 75 67 68 2E 20 20 20 20 20 20 on enoug h.
$000FE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$000FF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001010 20 20 20 20 20 20 20 20 20 20 20 20 20 49 66 20 If
$001020 79 6F 75 20 63 61 74 61 6C 6F 67 20 74 68 65 20 you cata log the
$001030 64 69 73 6B 20 79 6F 75 20 77 69 6C 6C 20 20 20 disk you will
$001040 73 65 65 20 61 20 66 69 6C 65 20 63 61 6C 6C 65 see a fi le calle
$001050 64 20 44 2E 50 49 45 20 53 41 4D 50 4C 45 52 2E d D.PIE SAMPLER.
$001060 20 55 73 69 6E 67 20 20 74 68 65 20 6C 6F 61 64 Using the load
$001070 2D 61 2D 64 61 74 61 2D 66 69 6C 65 20 6F 70 74 -a-data- file opt
$001080 69 6F 6E 2C 20 6C 6F 61 64 20 74 68 69 73 20 20 ion, loa d this
$001090 66 69 6C 65 2E 20 54 68 65 20 44 2E 20 70 72 65 file. Th e D. pre
$0010A0 66 69 78 20 74 65 6C 6C 73 20 79 6F 75 20 74 68 fix tell s you th
$0010B0 61 74 20 74 68 65 20 20 66 69 6C 65 20 63 6F 6E at the file con
$0010C0 74 61 69 6E 73 20 53 6F 66 74 47 72 61 70 68 20 tains So ftGraph
$0010D0 64 61 74 61 2E 20 41 20 73 69 6D 69 6C 61 72 20 data. A similar
$0010E0 70 72 65 66 69 63 2C 20 43 2E 2C 20 69 73 20 75 prefic, C., is u
$0010F0 73 65 64 20 74 6F 20 64 65 6E 6F 74 65 20 66 69 sed to d enote fi
$001100 6C 65 73 20 74 68 61 74 63 6F 6E 74 61 69 6E 20 les that contain
$001110 65 6E 74 69 72 65 20 63 68 61 72 74 73 2E 20 54 entire c harts. T
$001120 68 65 20 6C 6F 61 64 20 61 6E 64 20 73 61 76 65 he load and save
$001130 6F 70 74 69 6F 6E 73 20 69 6E 20 74 68 65 20 64 options in the d
$001140 69 73 6B 20 6D 65 6E 75 20 61 75 74 6F 6D 61 74 isk menu automat
$001150 69 63 61 6C 6C 79 20 20 70 75 74 20 69 6E 20 74 ically put in t
$001160 68 65 20 63 6F 72 72 65 63 74 20 70 72 65 66 69 he corre ct prefi
$001170 78 2C 20 73 6F 20 61 6C 6C 20 79 6F 75 20 20 20 x, so al l you
$001180 68 61 76 65 20 74 6F 20 74 79 70 65 20 69 73 20 have to type is
$001190 50 49 45 20 53 41 4D 50 4C 45 52 2E 20 20 20 20 PIE SAMP LER.
$0011A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0011B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0011C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0011D0 20 20 20 20 20 46 6F 72 20 6E 6F 77 2C 20 64 6F For now, do
$0011E0 6E 27 74 20 62 6F 74 68 65 72 20 65 6E 74 65 72 n't both er enter
$0011F0 69 6E 67 20 61 6E 79 20 73 6C 6F 74 20 6F 72 20 ing any slot or
$001200 64 72 69 76 65 20 76 61 6C 75 65 73 2E 20 4C 61 drive va lues. La
$001210 74 65 72 2C 20 69 66 20 79 6F 75 20 68 61 76 65 ter, if you have
$001220 61 20 73 65 63 6F 6E 64 20 64 69 73 6B 20 64 72 a second disk dr
$001230 69 76 65 2C 20 79 6F 75 20 6D 69 67 68 74 20 77 ive, you might w
$001240 61 6E 74 20 74 6F 20 20 75 73 65 20 69 74 20 66 ant to use it f
$001250 6F 72 20 64 61 74 61 20 73 74 6F 72 61 67 65 3B or data storage;
$001260 20 74 68 65 6E 20 79 6F 75 27 6C 6C 20 75 73 65 then yo u'll use
$001270 74 68 6F 73 65 20 70 61 72 61 6D 65 74 65 72 73 those pa rameters
$001280 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
$001290 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0012A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0012B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0012C0 54 48 45 20 44 41 54 41 20 45 44 49 54 4F 52 20 THE DATA EDITOR
$0012D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0012E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0012F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001310 20 20 20 20 20 4F 6B 61 79 2C 20 6E 6F 77 20 67 Oka y, now g
$001320 6F 20 62 61 63 6B 20 74 6F 20 74 68 65 20 6D 61 o back t o the ma
$001330 69 6E 20 6D 65 6E 75 20 61 6E 64 20 73 65 6C 65 in menu and sele
$001340 63 74 20 44 61 74 61 20 45 64 69 74 6F 72 2E 20 ct Data Editor.
$001350 54 68 69 73 20 70 72 6F 67 72 61 6D 20 20 20 20 This pro gram
$001360 77 69 6C 6C 20 61 6C 6C 6F 77 20 79 6F 75 20 74 will all ow you t
$001370 6F 20 73 65 65 20 61 6E 64 20 65 64 69 74 20 61 o see an d edit a
$001380 6C 6C 20 6F 66 20 20 20 74 68 65 20 64 61 74 61 ll of the data
$001390 20 69 6E 20 74 68 65 20 66 69 6C 65 20 79 6F 75 in the file you
$0013A0 20 6A 75 73 74 20 6C 6F 61 64 65 64 2E 20 20 20 just lo aded.
$0013B0 54 68 65 20 66 69 72 73 74 20 74 68 69 6E 67 20 The firs t thing
$0013C0 69 74 20 61 73 6B 73 20 79 6F 75 20 69 73 20 69 it asks you is i
$0013D0 66 20 79 6F 75 20 20 20 77 61 6E 74 20 74 6F 20 f you want to
$0013E0 63 6C 65 61 72 20 74 68 65 20 64 61 74 61 2E 20 clear th e data.
$0013F0 54 68 65 20 71 75 65 73 74 69 6F 6E 20 20 20 20 The ques tion
$001400 61 70 70 65 61 72 73 20 6F 6E 20 74 68 65 20 62 appears on the b
$001410 6F 74 74 6F 6D 20 6C 69 6E 65 20 6F 66 20 74 68 ottom li ne of th
$001420 65 20 20 20 20 20 20 20 73 63 72 65 65 6E 2E 20 e screen.
$001430 50 72 65 73 73 20 74 68 65 20 4E 20 6B 65 79 20 Press th e N key
$001440 74 6F 20 61 6E 73 77 65 72 20 6E 6F 2E 20 20 20 to answe r no.
$001450 54 68 65 72 65 20 61 72 65 20 61 20 6C 6F 74 20 There ar e a lot
$001460 6F 66 20 79 65 73 20 6F 72 20 6E 6F 20 71 75 65 of yes o r no que
$001470 73 74 69 6F 6E 73 20 20 69 6E 20 74 68 65 20 73 stions in the s
$001480 79 73 74 65 6D 2C 20 6D 6F 73 74 20 6F 66 20 74 ystem, m ost of t
$001490 68 65 6D 20 69 6E 20 74 68 65 20 44 61 74 61 20 hem in t he Data
$0014A0 45 64 69 74 6F 72 2E 20 41 6C 6C 20 6F 66 20 74 Editor. All of t
$0014B0 68 65 6D 20 63 61 6E 20 62 65 20 61 6E 73 77 65 hem can be answe
$0014C0 72 65 64 20 62 79 20 20 70 72 65 73 73 69 6E 67 red by pressing
$0014D0 20 59 20 6F 72 20 4E 2E 20 20 20 20 20 20 20 20 Y or N.
$0014E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0014F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001500 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001510 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 6F 77 Now
$001520 20 79 6F 75 27 6C 6C 20 73 65 65 20 61 20 62 6C you'll see a bl
$001530 69 6E 6B 69 6E 67 20 63 75 72 73 6F 72 20 20 20 inking c ursor
$001540 6E 65 61 72 20 74 68 65 20 75 70 70 65 72 20 72 near the upper r
$001550 69 67 68 74 20 63 6F 72 6E 65 72 20 6F 66 20 74 ight cor ner of t
$001560 68 65 20 20 20 20 20 20 73 63 72 65 65 6E 2E 20 he screen.
$001570 54 68 65 20 63 75 72 73 6F 72 20 69 73 20 69 6E The curs or is in
$001580 20 6F 6E 65 20 6F 66 20 6E 69 6E 65 74 79 20 20 one of ninety
$001590 63 65 6C 6C 73 20 77 68 69 63 68 20 61 72 65 20 cells wh ich are
$0015A0 61 72 72 61 6E 67 65 64 20 69 6E 20 61 20 35 20 arranged in a 5
$0015B0 62 79 20 31 38 20 20 20 61 72 72 61 79 2E 20 45 by 18 array. E
$0015C0 61 63 68 20 63 65 6C 6C 20 69 73 20 61 6E 20 61 ach cell is an a
$0015D0 72 65 61 20 6F 66 20 74 65 78 74 20 6F 6E 65 20 rea of t ext one
$0015E0 63 68 61 72 61 63 74 65 72 20 68 69 67 68 20 61 characte r high a
$0015F0 6E 64 20 65 69 67 68 74 20 63 68 61 72 61 63 74 nd eight charact
$001600 65 72 73 20 69 6E 20 20 6C 65 6E 67 74 68 2E 20 ers in length.
$001610 53 69 6E 63 65 20 74 68 65 72 65 20 69 73 20 61 Since th ere is a
$001620 20 77 6F 72 64 20 69 6E 20 74 68 65 20 20 20 20 word in the
$001630 63 65 6C 6C 2C 20 74 68 65 20 63 75 72 73 6F 72 cell, th e cursor
$001640 20 61 70 70 65 61 72 73 20 61 74 20 74 68 65 20 appears at the
$001650 65 6E 64 20 6F 66 20 20 74 68 65 20 77 6F 72 64 end of the word
$001660 2E 20 59 6F 75 20 63 61 6E 20 64 65 6C 65 74 65 . You ca n delete
$001670 20 74 68 61 74 20 77 6F 72 64 20 62 79 20 20 20 that wo rd by
$001680 75 73 69 6E 67 20 74 68 65 20 6C 65 66 74 20 61 using th e left a
$001690 72 72 6F 77 20 75 6E 74 69 6C 20 74 68 65 20 63 rrow unt il the c
$0016A0 65 6C 6C 20 69 73 20 20 65 6D 70 74 79 20 61 6E ell is empty an
$0016B0 64 20 72 65 70 6C 61 63 65 20 69 74 20 62 79 20 d replac e it by
$0016C0 74 79 70 69 6E 67 20 73 6F 6D 65 74 68 69 6E 67 typing s omething
$0016D0 65 6C 73 65 20 69 6E 2E 20 49 66 20 79 6F 75 20 else in. If you
$0016E0 68 61 76 65 20 61 6E 20 41 70 70 6C 65 20 49 49 have an Apple II
$0016F0 65 2C 20 62 65 20 20 20 73 75 72 65 20 74 68 61 e, be sure tha
$001700 74 20 74 68 65 20 63 61 70 73 20 6C 6F 63 6B 20 t the ca ps lock
$001710 6B 65 79 20 69 73 20 64 6F 77 6E 2E 20 20 20 20 key is d own.
$001720 57 68 61 74 20 79 6F 75 20 74 79 70 65 20 68 65 What you type he
$001730 72 65 20 69 73 20 64 65 73 69 67 6E 65 64 20 74 re is de signed t
$001740 6F 20 66 69 6E 64 20 20 69 74 73 20 77 61 79 20 o find its way
$001750 6F 6E 74 6F 20 74 68 65 20 68 69 2D 72 65 73 20 onto the hi-res
$001760 73 63 72 65 65 6E 2C 20 61 6E 64 20 20 20 20 20 screen, and
$001770 53 6F 66 74 47 72 61 70 68 20 68 61 73 20 6E 6F SoftGrap h has no
$001780 20 70 72 6F 76 69 73 69 6F 6E 20 66 6F 72 20 6C provisi on for l
$001790 6F 77 65 72 20 20 20 20 63 61 73 65 20 6C 65 74 ower case let
$0017A0 74 65 72 73 20 6F 6E 20 74 68 65 20 67 72 61 70 ters on the grap
$0017B0 68 69 63 20 73 63 72 65 65 6E 2E 20 20 20 20 20 hic scre en.
$0017C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0017D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0017E0 20 20 20 20 20 20 20 20 20 20 20 20 20 59 6F 75 You
$0017F0 20 63 61 6E 20 6D 6F 76 65 20 74 68 65 20 63 75 can mov e the cu
$001800 72 73 6F 72 20 74 6F 20 6F 74 68 65 72 20 20 20 rsor to other
$001810 63 65 6C 6C 73 20 62 79 20 75 73 69 6E 67 20 74 cells by using t
$001820 68 65 20 63 6F 6E 74 72 6F 6C 20 6B 65 79 20 61 he contr ol key a
$001830 6E 64 20 20 20 20 20 20 49 2C 4A 2C 4B 2C 20 61 nd I,J,K, a
$001840 6E 64 20 4D 2E 20 46 6F 72 20 69 6E 73 74 61 6E nd M. Fo r instan
$001850 63 65 2C 20 74 6F 20 6D 6F 76 65 20 74 68 65 20 ce, to m ove the
$001860 63 75 72 73 6F 72 20 64 6F 77 6E 2C 20 79 6F 75 cursor d own, you
$001870 20 74 79 70 65 20 77 68 61 74 20 69 73 20 63 61 type wh at is ca
$001880 6C 6C 65 64 20 61 20 20 63 6F 6E 74 72 6F 6C 2D lled a control-
$001890 4D 2E 20 54 68 61 74 20 69 73 2C 20 68 6F 6C 64 M. That is, hold
$0018A0 20 64 6F 77 6E 20 74 68 65 20 20 20 20 20 20 20 down th e
$0018B0 63 6F 6E 74 72 6F 6C 20 6B 65 79 20 61 6E 64 20 control key and
$0018C0 70 72 65 73 73 20 74 68 65 20 4D 20 6B 65 79 2E press th e M key.
$0018D0 20 20 20 20 20 20 20 20 52 65 6D 65 6D 62 65 72 Remember
$0018E0 20 74 68 61 74 20 70 72 6F 63 65 64 75 72 65 20 that pr ocedure
$0018F0 66 6F 72 20 75 73 69 6E 67 20 74 68 65 20 20 20 for usin g the
$001900 63 6F 6E 74 72 6F 6C 20 6B 65 79 3B 20 79 6F 75 control key; you
$001910 27 6C 6C 20 62 65 20 75 73 69 6E 67 20 69 74 20 'll be u sing it
$001920 61 20 6C 6F 74 20 69 6E 53 6F 66 74 47 72 61 70 a lot in SoftGrap
$001930 68 2E 20 49 6E 20 61 64 64 69 74 69 6F 6E 2C 20 h. In ad dition,
$001940 74 68 65 20 72 65 74 75 72 6E 20 6B 65 79 20 20 the retu rn key
$001950 77 69 6C 6C 20 6D 6F 76 65 20 74 68 65 20 63 75 will mov e the cu
$001960 72 73 6F 72 20 64 6F 77 6E 20 61 6E 64 20 74 68 rsor dow n and th
$001970 65 20 72 69 67 68 74 20 61 72 72 6F 77 20 77 69 e right arrow wi
$001980 6C 6C 20 6D 6F 76 65 20 69 74 20 72 69 67 68 74 ll move it right
$001990 20 77 69 74 68 6F 75 74 20 74 68 65 20 20 20 20 without the
$0019A0 68 65 6C 70 20 6F 66 20 74 68 65 20 63 6F 6E 74 help of the cont
$0019B0 72 6F 6C 20 6B 65 79 2E 20 20 20 20 20 20 20 20 rol key.
$0019C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0019D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0019E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0019F0 20 20 20 20 20 45 78 70 65 72 69 6D 65 6E 74 20 Exp eriment
$001A00 77 69 74 68 20 6D 6F 76 69 6E 67 20 74 68 65 20 with mov ing the
$001A10 63 75 72 73 6F 72 2E 20 59 6F 75 20 77 69 6C 6C cursor. You will
$001A20 20 6E 6F 74 69 63 65 20 74 68 61 74 20 77 68 65 notice that whe
$001A30 6E 20 79 6F 75 20 74 72 79 20 74 6F 20 20 20 20 n you tr y to
$001A40 6D 6F 76 65 20 69 74 20 6F 66 66 20 74 68 65 20 move it off the
$001A50 73 63 72 65 65 6E 2C 20 69 74 20 72 65 61 70 70 screen, it reapp
$001A60 65 61 72 73 20 6F 6E 20 74 68 65 20 6F 74 68 65 ears on the othe
$001A70 72 20 73 69 64 65 2E 20 20 20 20 20 20 20 20 20 r side.
$001A80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001A90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001AA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001AB0 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 6F 77 Now
$001AC0 20 6D 6F 76 65 20 74 68 65 20 63 75 72 73 6F 72 move th e cursor
$001AD0 20 74 6F 20 6F 6E 65 20 6F 66 20 74 68 65 20 20 to one of the
$001AE0 62 6C 61 6E 6B 20 63 65 6C 6C 73 20 61 6E 64 20 blank ce lls and
$001AF0 74 79 70 65 20 73 6F 6D 65 74 68 69 6E 67 20 69 type som ething i
$001B00 6E 2E 20 49 66 20 20 20 79 6F 75 20 6D 61 6B 65 n. If you make
$001B10 20 61 20 6D 69 73 74 61 6B 65 2C 20 79 6F 75 20 a mista ke, you
$001B20 63 61 6E 20 75 73 65 20 74 68 65 20 20 20 20 20 can use the
$001B30 72 69 67 68 74 20 61 72 72 6F 77 20 74 6F 20 65 right ar row to e
$001B40 72 61 73 65 2E 20 49 66 20 79 6F 75 20 74 72 79 rase. If you try
$001B50 20 74 6F 20 20 20 20 20 65 6E 74 65 72 20 6D 6F to enter mo
$001B60 72 65 20 74 68 61 6E 20 65 69 67 68 74 20 63 68 re than eight ch
$001B70 61 72 61 63 74 65 72 73 20 69 6E 20 61 20 20 20 aracters in a
$001B80 63 65 6C 6C 2C 20 74 68 65 20 63 6F 6D 70 75 74 cell, th e comput
$001B90 65 72 20 77 69 6C 6C 20 62 65 65 70 20 74 6F 20 er will beep to
$001BA0 77 61 72 6E 20 79 6F 75 74 68 61 74 20 74 68 65 warn you that the
$001BB0 20 6C 61 73 74 20 63 68 61 72 61 63 74 65 72 20 last ch aracter
$001BC0 77 61 73 6E 27 74 20 61 63 63 65 70 74 65 64 2E wasn't a ccepted.
$001BD0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001BE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001BF0 20 20 20 20 20 20 20 20 20 20 20 20 20 4C 6F 6F Loo
$001C00 6B 20 61 74 20 74 68 65 20 77 61 79 20 74 68 65 k at the way the
$001C10 20 64 61 74 61 20 69 73 20 6C 61 69 64 20 20 20 data is laid
$001C20 6F 75 74 20 6F 6E 20 74 68 65 20 73 63 72 65 65 out on t he scree
$001C30 6E 2E 20 4F 6E 20 74 68 65 20 6C 65 66 74 20 69 n. On th e left i
$001C40 73 20 61 20 6C 69 73 74 6F 66 20 77 6F 72 64 73 s a list of words
$001C50 2E 20 54 68 65 73 65 20 61 72 65 20 74 68 65 20 . These are the
$001C60 6C 61 62 65 6C 73 20 74 68 61 74 20 77 69 6C 6C labels t hat will
$001C70 74 65 6C 6C 20 74 68 65 20 6D 65 61 6E 69 6E 67 tell the meaning
$001C80 20 6F 66 20 65 61 63 68 20 73 6C 69 63 65 20 6F of each slice o
$001C90 66 20 74 68 65 20 20 20 70 69 65 2E 20 4E 6F 74 f the pie. Not
$001CA0 65 20 74 68 61 74 20 74 68 65 79 20 63 72 6F 73 e that t hey cros
$001CB0 73 20 74 68 65 20 62 6F 72 64 65 72 20 20 20 20 s the bo rder
$001CC0 62 65 74 77 65 65 6E 20 63 65 6C 6C 73 2E 20 54 between cells. T
$001CD0 68 61 74 20 69 73 20 62 65 63 61 75 73 65 20 50 hat is b ecause P
$001CE0 69 65 20 43 68 61 72 74 61 6C 6C 6F 77 73 20 79 ie Chart allows y
$001CF0 6F 75 20 74 6F 20 75 73 65 20 74 77 6F 20 63 65 ou to us e two ce
$001D00 6C 6C 73 20 66 6F 72 20 65 61 63 68 20 20 20 20 lls for each
$001D10 6C 61 62 65 6C 2E 20 54 68 65 20 42 61 72 2F 4C label. T he Bar/L
$001D20 69 6E 65 20 43 68 61 72 74 20 70 72 6F 67 72 61 ine Char t progra
$001D30 6D 20 6F 6E 6C 79 20 20 72 65 61 64 73 20 6F 6E m only reads on
$001D40 65 20 63 65 6C 6C 20 66 6F 72 20 65 61 63 68 20 e cell f or each
$001D50 6C 61 62 65 6C 2E 20 54 6F 20 65 6E 74 65 72 20 label. T o enter
$001D60 74 68 65 20 6C 61 62 65 6C 20 69 6E 74 6F 20 74 the labe l into t
$001D70 77 6F 20 63 65 6C 6C 73 2C 20 79 6F 75 20 73 69 wo cells , you si
$001D80 6D 70 6C 79 20 20 20 20 74 79 70 65 20 74 68 65 mply type the
$001D90 20 6C 61 62 65 6C 20 69 6E 20 74 68 65 20 66 69 label i n the fi
$001DA0 72 73 74 20 63 65 6C 6C 20 75 6E 74 69 6C 20 20 rst cell until
$001DB0 74 68 65 20 62 65 6C 6C 20 72 69 6E 67 73 2C 20 the bell rings,
$001DC0 70 72 65 73 73 20 63 6F 6E 74 72 6F 6C 2D 4B 2C press co ntrol-K,
$001DD0 20 74 68 65 6E 20 20 20 63 6F 6E 74 69 6E 75 65 then continue
$001DE0 20 69 6E 20 74 68 65 20 6E 65 78 74 20 63 65 6C in the next cel
$001DF0 6C 2C 20 73 74 61 72 74 69 6E 67 20 61 74 20 20 l, start ing at
$001E00 74 68 65 20 63 68 61 72 61 63 74 65 72 20 74 68 the char acter th
$001E10 61 74 20 63 61 75 73 65 64 20 74 68 65 20 62 65 at cause d the be
$001E20 6C 6C 20 74 6F 20 20 20 72 69 6E 67 2E 20 20 20 ll to ring.
$001E30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001E40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001E50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001E60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$001E70 20 20 20 20 20 20 20 20 20 20 20 20 20 50 69 65 Pie
$001E80 20 43 68 61 72 74 20 63 61 6E 20 6F 6E 6C 79 20 Chart c an only
$001E90 63 68 61 72 74 20 6F 6E 65 20 63 6F 6C 75 6D 6E chart on e column
$001EA0 6F 66 20 64 61 74 61 20 61 74 20 61 20 74 69 6D of data at a tim
$001EB0 65 2E 20 54 6F 20 6B 65 65 70 20 74 72 61 63 6B e. To ke ep track
$001EC0 20 6F 66 20 20 20 20 20 77 68 69 63 68 20 63 6F of which co
$001ED0 6C 75 6D 6E 20 68 6F 6C 64 73 20 77 68 61 74 20 lumn hol ds what
$001EE0 64 61 74 61 2C 20 61 6E 64 20 74 6F 20 20 20 20 data, an d to
$001EF0 74 65 6C 6C 20 50 69 65 20 43 68 61 72 74 20 77 tell Pie Chart w
$001F00 68 61 74 20 74 6F 20 74 69 74 6C 65 20 74 68 65 hat to t itle the
$001F10 20 67 72 61 70 68 2C 20 77 65 20 65 6E 74 65 72 graph, we enter
$001F20 20 6C 65 67 65 6E 64 73 20 69 6E 20 66 6F 75 72 legends in four
$001F30 20 73 70 65 63 69 61 6C 20 63 65 6C 6C 73 20 20 special cells
$001F40 61 74 20 74 68 65 20 74 6F 70 20 6F 66 20 74 68 at the t op of th
$001F50 65 20 73 63 72 65 65 6E 2E 20 54 68 65 73 65 20 e screen . These
$001F60 63 65 6C 6C 73 20 20 20 61 72 65 20 73 70 65 63 cells are spec
$001F70 69 61 6C 20 66 6F 72 20 74 77 6F 20 72 65 61 73 ial for two reas
$001F80 6F 6E 73 2E 20 54 68 65 79 20 63 61 6E 6E 6F 74 ons. The y cannot
$001F90 62 65 20 72 65 61 63 68 65 64 20 74 68 72 6F 75 be reach ed throu
$001FA0 67 68 20 6E 6F 72 6D 61 6C 20 63 75 72 73 6F 72 gh norma l cursor
$001FB0 20 20 20 20 20 20 20 20 6D 6F 76 65 6D 65 6E 74 movement
$001FC0 2C 20 61 6E 64 20 74 68 65 79 20 65 61 63 68 20 , and th ey each
$001FD0 68 61 76 65 20 73 69 78 74 65 65 6E 20 20 20 20 have six teen
$001FE0 63 68 61 72 61 63 74 65 72 73 2C 20 65 69 67 68 characte rs, eigh
$001FF0 74 20 6F 6E 20 74 6F 70 20 61 6E 64 20 65 69 67 t on top and eig
$002000 68 74 20 20 20 20 20 20 75 6E 64 65 72 6E 65 61 ht undernea
$002010 74 68 2E 20 4E 65 76 65 72 74 68 65 6C 65 73 73 th. Neve rtheless
$002020 2C 20 6C 65 67 65 6E 64 73 20 61 72 65 20 20 20 , legend s are
$002030 65 6E 74 65 72 65 64 20 61 6E 64 20 72 65 61 64 entered and read
$002040 20 61 73 20 73 69 6E 67 6C 65 20 73 69 78 74 65 as sing le sixte
$002050 65 6E 20 20 20 20 20 20 63 68 61 72 61 63 74 65 en characte
$002060 72 20 73 74 72 69 6E 67 73 2E 20 20 20 20 20 20 r string s.
$002070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002080 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002090 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0020A0 20 20 20 20 20 20 20 20 20 20 20 20 20 54 6F 20 To
$0020B0 65 6E 74 65 72 20 6C 65 67 65 6E 64 73 2C 20 70 enter le gends, p
$0020C0 72 65 73 73 20 63 6F 6E 74 72 6F 6C 2D 4C 2E 20 ress con trol-L.
$0020D0 41 20 70 72 6F 6D 70 74 20 77 69 6C 6C 20 61 70 A prompt will ap
$0020E0 70 65 61 72 20 6F 6E 20 74 68 65 20 62 6F 74 74 pear on the bott
$0020F0 6F 6D 20 6F 66 20 20 20 74 68 65 20 73 63 72 65 om of the scre
$002100 65 6E 20 66 6F 72 20 6C 65 67 65 6E 64 20 6F 6E en for l egend on
$002110 65 20 61 6C 6F 6E 67 20 77 69 74 68 20 61 20 20 e along with a
$002120 77 68 69 74 65 20 62 61 72 20 74 6F 20 69 6E 64 white ba r to ind
$002130 69 63 61 74 65 20 68 6F 77 20 6D 61 6E 79 20 20 icate ho w many
$002140 20 20 20 20 20 20 20 20 63 68 61 72 61 63 74 65 characte
$002150 72 73 20 79 6F 75 20 63 61 6E 20 65 6E 74 65 72 rs you c an enter
$002160 2E 20 49 66 20 79 6F 75 20 64 6F 6E 27 74 20 20 . If you don't
$002170 77 61 6E 74 20 74 6F 20 63 68 61 6E 67 65 20 6C want to change l
$002180 65 67 65 6E 64 20 6F 6E 65 2C 20 68 69 74 20 72 egend on e, hit r
$002190 65 74 75 72 6E 20 74 6F 6D 6F 76 65 20 6F 6E 20 eturn to move on
$0021A0 74 6F 20 74 68 65 20 6E 65 78 74 20 6F 6E 65 2E to the n ext one.
$0021B0 20 49 66 20 79 6F 75 20 64 6F 20 74 79 70 65 20 If you do type
$0021C0 73 6F 6D 65 74 68 69 6E 67 20 69 6E 2C 20 69 74 somethin g in, it
$0021D0 20 77 69 6C 6C 20 72 65 70 6C 61 63 65 20 74 68 will re place th
$0021E0 65 20 6F 6C 64 20 20 20 6C 65 67 65 6E 64 20 65 e old legend e
$0021F0 6E 74 69 72 65 6C 79 2C 20 65 76 65 6E 20 69 66 ntirely, even if
$002200 20 74 68 65 20 6F 6C 64 20 6F 6E 65 20 77 61 73 the old one was
$002210 6C 6F 6E 67 65 72 2E 20 20 20 20 20 20 20 20 20 longer.
$002220 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002230 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002250 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002260 20 20 20 20 20 54 68 65 72 65 20 61 72 65 20 73 The re are s
$002270 6F 6D 65 20 6F 74 68 65 72 20 66 65 61 74 75 72 ome othe r featur
$002280 65 73 20 6F 66 20 20 20 74 68 65 20 44 61 74 61 es of the Data
$002290 20 45 64 69 74 6F 72 20 74 68 61 74 20 79 6F 75 Editor that you
$0022A0 20 73 68 6F 75 6C 64 20 6C 65 61 72 6E 2C 20 20 should learn,
$0022B0 62 75 74 20 66 6F 72 20 6E 6F 77 20 77 65 27 72 but for now we'r
$0022C0 65 20 67 6F 69 6E 67 20 74 6F 20 74 61 6B 65 20 e going to take
$0022D0 61 20 6C 6F 6F 6B 20 20 61 74 20 50 69 65 20 43 a look at Pie C
$0022E0 68 61 72 74 2E 20 50 72 65 73 73 20 63 6F 6E 74 hart. Pr ess cont
$0022F0 72 6F 6C 2D 51 20 61 6E 64 20 61 6E 73 77 65 72 rol-Q an d answer
$002300 59 20 77 68 65 6E 20 69 74 20 61 73 6B 73 20 79 Y when i t asks y
$002310 6F 75 20 69 66 20 79 6F 75 20 77 61 6E 74 20 74 ou if yo u want t
$002320 6F 20 71 75 69 74 20 20 74 6F 20 6D 65 6E 75 2E o quit to menu.
$002330 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002350 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002370 20 20 20 20 20 20 20 20 50 49 45 20 43 48 41 52 PIE CHAR
$002380 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 T
$002390 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0023A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0023B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0023C0 20 20 20 20 20 20 20 20 20 20 20 20 20 57 68 65 Whe
$0023D0 6E 20 74 68 65 20 6D 65 6E 75 20 63 6F 6D 65 73 n the me nu comes
$0023E0 20 75 70 2C 20 67 6F 20 74 6F 20 74 68 65 20 20 up, go to the
$0023F0 64 69 73 6B 20 6D 65 6E 75 20 61 6E 64 20 6C 6F disk men u and lo
$002400 61 64 20 74 68 65 20 64 61 74 61 20 66 69 6C 65 ad the d ata file
$002410 20 50 49 45 20 20 20 20 53 41 4D 50 4C 45 52 20 PIE SAMPLER
$002420 61 67 61 69 6E 2E 20 41 6C 74 68 6F 75 67 68 20 again. A lthough
$002430 77 68 61 74 20 79 6F 75 20 68 61 64 20 20 20 20 what you had
$002440 65 64 69 74 65 64 20 77 61 73 20 73 74 69 6C 6C edited w as still
$002450 20 69 6E 20 6D 65 6D 6F 72 79 2C 20 77 65 27 72 in memo ry, we'r
$002460 65 20 20 20 20 20 20 20 6C 6F 61 64 69 6E 67 20 e loading
$002470 74 68 65 20 6F 72 69 67 69 6E 61 6C 20 66 69 6C the orig inal fil
$002480 65 20 6F 76 65 72 20 69 74 20 69 6E 20 20 20 20 e over i t in
$002490 63 61 73 65 20 61 6E 79 20 6F 66 20 74 68 65 20 case any of the
$0024A0 63 68 61 6E 67 65 73 20 79 6F 75 20 6D 61 64 65 changes you made
$0024B0 20 77 6F 75 6C 64 20 20 68 61 76 65 20 63 61 75 would have cau
$0024C0 73 65 64 20 50 69 65 20 43 68 61 72 74 20 74 6F sed Pie Chart to
$0024D0 20 6D 69 73 73 20 73 6F 6D 65 20 6F 66 20 20 20 miss so me of
$0024E0 74 68 65 20 64 61 74 61 2E 20 59 6F 75 27 6C 6C the data . You'll
$0024F0 20 68 61 76 65 20 61 20 63 68 61 6E 63 65 20 74 have a chance t
$002500 6F 20 20 20 20 20 20 20 65 78 70 65 72 69 6D 65 o experime
$002510 6E 74 20 77 69 74 68 20 61 6E 64 20 67 72 61 70 nt with and grap
$002520 68 20 79 6F 75 72 20 6F 77 6E 20 64 61 74 61 20 h your o wn data
$002530 6C 61 74 65 72 20 6F 6E 2E 20 20 20 20 20 20 20 later on .
$002540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002550 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002570 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002580 20 20 20 20 20 4F 6B 61 79 2C 20 6E 6F 77 20 67 Oka y, now g
$002590 6F 20 62 61 63 6B 20 74 6F 20 74 68 65 20 6D 61 o back t o the ma
$0025A0 69 6E 20 6D 65 6E 75 20 61 6E 64 20 73 65 6C 65 in menu and sele
$0025B0 63 74 20 50 69 65 20 43 68 61 72 74 2E 20 41 66 ct Pie C hart. Af
$0025C0 74 65 72 20 61 20 66 65 77 20 20 20 20 20 20 20 ter a fe w
$0025D0 73 65 63 6F 6E 64 73 2C 20 79 6F 75 20 77 69 6C seconds, you wil
$0025E0 6C 20 73 65 65 20 74 68 65 20 50 69 65 20 43 68 l see th e Pie Ch
$0025F0 61 72 74 20 20 20 20 20 70 61 72 61 6D 65 74 65 art paramete
$002600 72 20 73 63 72 65 65 6E 2E 20 54 68 72 6F 75 67 r screen . Throug
$002610 68 20 74 68 65 20 75 73 65 20 6F 66 20 20 20 20 h the us e of
$002620 74 68 69 73 20 69 6E 70 75 74 20 73 63 72 65 65 this inp ut scree
$002630 6E 2C 20 79 6F 75 20 63 61 6E 20 74 65 6C 6C 20 n, you c an tell
$002640 74 68 65 20 20 20 20 20 70 72 6F 67 72 61 6D 20 the program
$002650 65 78 61 63 74 6C 79 20 68 6F 77 20 79 6F 75 20 exactly how you
$002660 77 61 6E 74 20 74 68 65 20 20 20 20 20 20 20 20 want the
$002670 66 69 6E 69 73 68 65 64 20 70 69 65 20 63 68 61 finished pie cha
$002680 72 74 20 74 6F 20 6C 6F 6F 6B 2E 20 20 20 20 20 rt to lo ok.
$002690 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0026A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0026B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0026C0 20 20 20 20 20 54 68 65 72 65 20 61 72 65 20 73 The re are s
$0026D0 69 78 20 70 61 72 61 6D 65 74 65 72 73 20 74 6F ix param eters to
$0026E0 20 62 65 20 73 65 74 2E 4E 65 78 74 20 74 6F 20 be set. Next to
$0026F0 74 68 65 20 66 69 72 73 74 20 69 73 20 61 20 62 the firs t is a b
$002700 6C 69 6E 6B 69 6E 67 20 70 6F 69 6E 74 65 72 2E linking pointer.
$002710 54 68 69 73 20 73 65 72 76 65 73 20 61 73 20 74 This ser ves as t
$002720 68 65 20 70 6F 69 6E 74 65 72 20 74 6F 20 77 68 he point er to wh
$002730 69 63 68 20 20 20 20 20 71 75 65 73 74 69 6F 6E ich question
$002740 20 79 6F 75 20 63 61 6E 20 61 6E 73 77 65 72 20 you can answer
$002750 61 74 20 74 68 69 73 20 74 69 6D 65 2E 20 20 20 at this time.
$002760 59 6F 75 20 68 61 76 65 20 63 6F 6D 70 6C 65 74 You have complet
$002770 65 20 63 6F 6E 74 72 6F 6C 20 6F 76 65 72 20 77 e contro l over w
$002780 68 69 63 68 20 6F 66 20 74 68 65 20 71 75 65 73 hich of the ques
$002790 74 69 6F 6E 73 20 79 6F 75 20 63 61 6E 20 67 69 tions yo u can gi
$0027A0 76 65 20 61 6E 20 61 6E 73 77 65 72 20 74 6F 2E ve an an swer to.
$0027B0 54 6F 20 6D 6F 76 65 20 74 68 65 20 70 6F 69 6E To move the poin
$0027C0 74 65 72 2C 20 70 72 65 73 73 20 65 69 74 68 65 ter, pre ss eithe
$0027D0 72 20 74 68 65 20 20 20 72 69 67 68 74 20 61 72 r the right ar
$0027E0 72 6F 77 20 6F 72 20 6C 65 66 74 20 61 72 72 6F row or l eft arro
$0027F0 77 20 6B 65 79 2E 20 20 20 20 20 20 20 20 20 20 w key.
$002800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002810 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002820 20 20 20 20 20 20 20 20 20 20 20 20 20 41 6C 6C All
$002830 20 6F 66 20 74 68 65 20 70 61 72 61 6D 65 74 65 of the paramete
$002840 72 73 20 61 72 65 20 73 65 74 20 62 79 20 20 20 rs are s et by
$002850 6E 75 6D 62 65 72 73 20 61 73 20 69 6E 64 69 63 numbers as indic
$002860 61 74 65 64 20 62 79 20 74 68 65 20 71 75 65 73 ated by the ques
$002870 74 69 6F 6E 73 2E 20 20 59 6F 75 27 6C 6C 20 6E tions. You'll n
$002880 6F 74 65 20 74 68 61 74 20 74 68 65 72 65 20 69 ote that there i
$002890 73 20 61 20 64 65 66 61 75 6C 74 20 20 20 20 20 s a defa ult
$0028A0 67 69 76 65 6E 20 74 6F 20 74 68 65 20 72 69 67 given to the rig
$0028B0 68 74 20 6F 66 20 65 61 63 68 20 71 75 65 73 74 ht of ea ch quest
$0028C0 69 6F 6E 2C 20 73 6F 20 79 6F 75 20 64 6F 6E 27 ion, so you don'
$0028D0 74 20 68 61 76 65 20 74 6F 20 63 68 61 6E 67 65 t have t o change
$0028E0 20 61 6E 79 20 70 61 72 61 6D 65 74 65 72 20 20 any par ameter
$0028F0 74 68 61 74 20 69 73 20 61 6C 72 65 61 64 79 20 that is already
$002900 73 65 74 20 63 6F 72 72 65 63 74 6C 79 2E 20 54 set corr ectly. T
$002910 6F 20 63 68 61 6E 67 65 61 20 70 61 72 61 6D 65 o change a parame
$002920 74 65 72 2C 20 79 6F 75 20 6D 6F 76 65 20 74 68 ter, you move th
$002930 65 20 70 6F 69 6E 74 65 72 20 74 6F 20 74 68 65 e pointe r to the
$002940 6C 65 66 74 20 6F 66 20 74 68 61 74 20 71 75 65 left of that que
$002950 73 74 69 6F 6E 20 61 6E 64 20 70 72 65 73 73 20 stion an d press
$002960 74 68 65 20 20 20 20 20 73 70 61 63 65 20 62 61 the space ba
$002970 72 2E 20 41 20 70 72 6F 6D 70 74 20 77 69 6C 6C r. A pro mpt will
$002980 20 61 70 70 65 61 72 20 61 74 20 74 68 65 20 20 appear at the
$002990 62 6F 74 74 6F 6D 20 6F 66 20 74 68 65 20 73 63 bottom o f the sc
$0029A0 72 65 65 6E 2E 20 4A 75 73 74 20 65 6E 74 65 72 reen. Ju st enter
$0029B0 20 74 68 65 20 6E 65 77 6E 75 6D 62 65 72 2E 20 the new number.
$0029C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0029D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0029E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0029F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002A00 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
$002A10 20 66 69 72 73 74 20 71 75 65 73 74 69 6F 6E 20 first q uestion
$002A20 69 73 20 68 6F 77 20 6D 61 6E 79 20 20 20 20 20 is how m any
$002A30 6C 61 62 65 6C 20 66 69 65 6C 64 73 20 74 6F 20 label fi elds to
$002A40 72 65 61 64 2E 20 54 68 69 73 20 72 65 6C 61 74 read. Th is relat
$002A50 65 73 20 62 61 63 6B 20 74 6F 20 74 68 65 20 64 es back to the d
$002A60 69 73 63 75 73 73 69 6F 6E 20 6F 66 20 6C 61 62 iscussio n of lab
$002A70 65 6C 73 20 69 6E 20 6F 6E 65 20 6F 72 20 20 20 els in o ne or
$002A80 74 77 6F 20 63 6F 6C 75 6D 6E 73 20 69 6E 20 74 two colu mns in t
$002A90 68 65 20 44 61 74 61 20 45 64 69 74 6F 72 20 73 he Data Editor s
$002AA0 65 63 74 69 6F 6E 2E 20 49 66 20 74 68 65 20 6C ection. If the l
$002AB0 61 62 65 6C 73 20 69 6E 20 74 68 65 20 64 61 74 abels in the dat
$002AC0 61 20 73 63 72 65 65 6E 20 77 65 72 65 20 20 20 a screen were
$002AD0 74 77 6F 20 63 6F 6C 75 6D 6E 73 20 77 69 64 65 two colu mns wide
$002AE0 2C 20 61 73 20 74 68 65 79 20 61 72 65 20 69 6E , as the y are in
$002AF0 20 74 68 65 20 20 20 20 73 61 6D 70 6C 65 20 66 the sample f
$002B00 69 6C 65 2C 20 74 68 69 73 20 70 61 72 61 6D 65 ile, thi s parame
$002B10 74 65 72 20 73 68 6F 75 6C 64 20 62 65 20 20 20 ter shou ld be
$002B20 73 65 74 20 74 6F 20 32 2E 20 50 72 65 73 73 20 set to 2 . Press
$002B30 74 68 65 20 73 70 61 63 65 20 62 61 72 2C 20 74 the spac e bar, t
$002B40 68 65 20 32 20 20 20 20 6B 65 79 2C 20 61 6E 64 he 2 key, and
$002B50 20 72 65 74 75 72 6E 2E 20 20 20 20 20 20 20 20 return.
$002B60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002B70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002B80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002B90 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
$002BA0 20 6E 65 78 74 20 71 75 65 73 74 69 6F 6E 20 69 next qu estion i
$002BB0 73 20 77 68 69 63 68 20 63 6F 6C 75 6D 6E 20 20 s which column
$002BC0 74 6F 20 67 72 61 70 68 2E 20 54 68 65 20 50 69 to graph . The Pi
$002BD0 65 20 43 68 61 72 74 20 70 72 6F 67 72 61 6D 2C e Chart program,
$002BE0 20 61 73 20 79 6F 75 20 72 65 6D 65 6D 62 65 72 as you remember
$002BF0 2C 20 63 61 6E 20 6F 6E 6C 79 20 67 72 61 70 68 , can on ly graph
$002C00 20 6F 6E 65 20 63 6F 6C 75 6D 6E 20 66 72 6F 6D one col umn from
$002C10 74 68 65 20 64 61 74 61 20 73 63 72 65 65 6E 20 the data screen
$002C20 61 74 20 61 20 74 69 6D 65 2E 20 4C 6F 6F 6B 20 at a tim e. Look
$002C30 61 74 20 74 68 65 20 20 64 69 73 70 6C 61 79 20 at the display
$002C40 6F 66 20 74 68 65 20 6C 65 67 65 6E 64 73 20 61 of the l egends a
$002C50 74 20 74 68 65 20 74 6F 70 20 6F 66 20 74 68 65 t the to p of the
$002C60 73 63 72 65 65 6E 2E 20 49 66 20 79 6F 75 20 65 screen. If you e
$002C70 6E 74 65 72 20 6C 65 67 65 6E 64 73 20 61 74 20 nter leg ends at
$002C80 74 68 65 20 74 6F 70 20 6F 66 20 74 68 65 20 64 the top of the d
$002C90 61 74 61 20 73 63 72 65 65 6E 2C 20 74 68 65 79 ata scre en, they
$002CA0 20 77 69 6C 6C 20 72 65 6D 69 6E 64 20 79 6F 75 will re mind you
$002CB0 77 68 61 74 20 79 6F 75 20 77 61 6E 74 20 74 6F what you want to
$002CC0 20 65 6E 74 65 72 20 61 73 20 74 68 65 20 73 65 enter a s the se
$002CD0 63 6F 6E 64 20 20 20 20 70 61 72 61 6D 65 74 65 cond paramete
$002CE0 72 2E 20 49 6E 20 74 68 69 73 20 63 61 73 65 2C r. In th is case,
$002CF0 20 65 6E 74 65 72 20 61 20 32 20 69 6E 74 6F 20 enter a 2 into
$002D00 74 68 69 73 20 73 65 63 6F 6E 64 20 70 61 72 61 this sec ond para
$002D10 6D 65 74 65 72 20 74 6F 20 67 72 61 70 68 20 74 meter to graph t
$002D20 68 65 20 64 61 74 61 20 61 73 73 6F 63 69 61 74 he data associat
$002D30 65 64 20 77 69 74 68 20 6C 65 67 65 6E 64 20 32 ed with legend 2
$002D40 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
$002D50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002D60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$002D70 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
$002D80 20 74 68 69 72 64 20 71 75 65 73 74 69 6F 6E 20 third q uestion
$002D90 69 73 20 77 68 65 74 68 65 72 20 61 6E 64 20 20 is wheth er and
$002DA0 68 6F 77 20 79 6F 75 20 77 61 6E 74 20 74 68 65 how you want the
$002DB0 20 64 61 74 61 20 73 6F 72 74 65 64 2E 20 49 66 data so rted. If
$002DC0 20 79 6F 75 20 20 20 20 63 68 6F 6F 73 65 20 74 you choose t
$002DD0 6F 20 73 6F 72 74 20 62 79 20 76 61 6C 75 65 2C o sort b y value,
$002DE0 20 74 68 65 20 6C 61 72 67 65 73 74 20 20 20 20 the lar gest
$002DF0 73 6C 69 63 65 20 6F 66 20 74 68 65 20 70 69 65 slice of the pie
$002E00 20 77 69 6C 6C 20 62 65 20 67 72 61 70 68 65 64 will be graphed
$002E10 20 66 69 72 73 74 20 20 61 6E 64 20 74 68 65 20 first and the
$002E20 73 6D 61 6C 6C 65 73 74 20 6C 61 73 74 2C 20 77 smallest last, w
$002E30 69 74 68 20 74 68 65 20 20 20 20 20 20 20 20 20 ith the
$002E40 63 6F 72 72 65 73 70 6F 6E 64 69 6E 67 20 6C 61 correspo nding la
$002E50 62 65 6C 73 20 62 65 69 6E 67 20 70 72 69 6E 74 bels bei ng print
$002E60 65 64 20 69 6E 20 20 20 74 68 65 20 73 61 6D 65 ed in the same
$002E70 20 6F 72 64 65 72 2E 20 49 66 20 79 6F 75 20 73 order. If you s
$002E80 6F 72 74 20 62 79 20 6C 61 62 65 6C 2C 20 20 20 ort by l abel,
$002E90 74 68 65 20 6C 61 62 65 6C 73 20 77 69 6C 6C 20 the labe ls will
$002EA0 62 65 20 69 6E 20 61 6C 70 68 61 62 65 74 69 63 be in al phabetic
$002EB0 61 6C 20 6F 72 64 65 72 61 6E 64 20 74 68 65 20 al order and the
$002EC0 73 6C 69 63 65 73 20 6F 66 20 74 68 65 20 70 69 slices o f the pi
$002ED0 65 20 77 69 6C 6C 20 20 20 20 20 20 20 20 20 20 e will
$002EE0 63 6F 72 72 65 73 70 6F 6E 64 20 74 6F 20 74 68 correspo nd to th
$002EF0 65 20 6F 72 64 65 72 20 6F 66 20 74 68 65 20 6C e order of the l
$002F00 61 62 65 6C 73 2E 20 20 49 66 20 79 6F 75 20 63 abels. If you c
$002F10 68 6F 6F 73 65 20 6E 6F 74 20 74 6F 20 73 6F 72 hoose no t to sor
$002F20 74 20 61 74 20 61 6C 6C 2C 20 62 6F 74 68 20 20 t at all , both
$002F30 74 68 65 20 64 61 74 61 20 61 6E 64 20 74 68 65 the data and the
$002F40 20 6C 61 62 65 6C 73 20 77 69 6C 6C 20 62 65 20 labels will be
$002F50 20 20 20 20 20 20 20 20 64 69 73 70 6C 61 79 65 displaye
$002F60 64 20 69 6E 20 74 68 65 20 6F 72 64 65 72 20 69 d in the order i
$002F70 6E 20 77 68 69 63 68 20 74 68 65 79 20 20 20 20 n which they
$002F80 77 65 72 65 20 65 6E 74 65 72 65 64 2E 20 54 72 were ent ered. Tr
$002F90 79 20 61 6C 6C 20 74 68 72 65 65 20 73 65 74 74 y all th ree sett
$002FA0 69 6E 67 73 2E 20 20 20 59 6F 75 27 6C 6C 20 70 ings. You'll p
$002FB0 72 6F 62 61 62 6C 79 20 66 69 6E 64 20 74 68 61 robably find tha
$002FC0 74 20 79 6F 75 20 6C 69 6B 65 20 20 20 20 20 20 t you li ke
$002FD0 64 69 66 66 65 72 65 6E 74 20 6F 6E 65 73 20 69 differen t ones i
$002FE0 6E 20 64 69 66 66 65 72 65 6E 74 20 73 69 74 75 n differ ent situ
$002FF0 61 74 69 6F 6E 73 2E 20 20 20 20 20 20 20 20 20 ations.
$003000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003020 20 20 20 20 20 54 68 65 20 66 6F 75 72 74 68 20 The fourth
$003030 71 75 65 73 74 69 6F 6E 20 69 73 20 61 20 73 69 question is a si
$003040 6D 70 6C 65 20 20 20 20 6F 6E 65 3A 20 63 6F 6C mple one: col
$003050 6F 72 2E 20 49 66 20 79 6F 75 20 68 61 76 65 20 or. If y ou have
$003060 61 20 62 6C 61 63 6B 20 61 6E 64 20 20 20 20 20 a black and
$003070 77 68 69 74 65 20 6D 6F 6E 69 74 6F 72 2C 20 74 white mo nitor, t
$003080 68 65 20 63 68 61 72 74 20 64 69 73 70 6C 61 79 he chart display
$003090 65 64 20 69 6E 20 20 20 63 6F 6C 6F 72 20 77 69 ed in color wi
$0030A0 6C 6C 20 62 65 20 76 65 72 79 20 64 69 66 66 69 ll be ve ry diffi
$0030B0 63 75 6C 74 20 74 6F 20 72 65 61 64 2C 20 69 66 cult to read, if
$0030C0 6E 6F 74 20 69 6D 70 6F 73 73 69 62 6C 65 2E 20 not impo ssible.
$0030D0 49 66 20 79 6F 75 20 68 61 76 65 20 61 20 63 6F If you h ave a co
$0030E0 6C 6F 72 20 20 20 20 20 6D 6F 6E 69 74 6F 72 2C lor monitor,
$0030F0 20 79 6F 75 20 63 61 6E 20 63 68 6F 6F 73 65 20 you can choose
$003100 65 69 74 68 65 72 20 63 6F 6C 6F 72 20 6F 72 20 either c olor or
$003110 62 6C 61 63 6B 20 61 6E 64 20 77 68 69 74 65 2E black an d white.
$003120 20 43 6F 6C 6F 72 2C 20 6F 66 20 63 6F 75 72 73 Color, of cours
$003130 65 2C 20 6C 6F 6F 6B 73 62 65 74 74 65 72 2C 20 e, looks better,
$003140 62 75 74 20 61 6C 73 6F 20 74 61 6B 65 73 20 6C but also takes l
$003150 6F 6E 67 65 72 2E 20 42 6C 61 63 6B 20 61 6E 64 onger. B lack and
$003160 77 68 69 74 65 20 69 73 20 67 6F 6F 64 20 66 6F white is good fo
$003170 72 20 74 72 69 61 6C 20 72 75 6E 73 20 61 6E 64 r trial runs and
$003180 20 63 68 61 72 74 73 20 79 6F 75 20 69 6E 74 65 charts you inte
$003190 6E 64 20 74 6F 20 70 72 69 6E 74 20 6F 6E 20 61 nd to pr int on a
$0031A0 20 62 6C 61 63 6B 20 61 6E 64 20 77 68 69 74 65 black a nd white
$0031B0 70 72 69 6E 74 65 72 2E 20 49 66 20 79 6F 75 20 printer. If you
$0031C0 70 6C 6F 74 20 61 20 63 6F 6C 6F 72 20 63 68 61 plot a c olor cha
$0031D0 72 74 2C 20 6F 6E 6C 79 74 68 65 20 66 69 72 73 rt, only the firs
$0031E0 74 20 66 69 76 65 20 73 6C 69 63 65 73 20 77 69 t five s lices wi
$0031F0 6C 6C 20 62 65 20 69 6E 20 63 6F 6C 6F 72 2C 20 ll be in color,
$003200 73 6F 20 69 74 20 69 73 20 62 65 73 74 20 74 6F so it is best to
$003210 20 73 6F 72 74 20 74 68 65 20 64 61 74 61 20 62 sort th e data b
$003220 79 20 76 61 6C 75 65 2C 63 61 75 73 69 6E 67 20 y value, causing
$003230 74 68 65 20 6C 61 72 67 65 73 74 20 73 6C 69 63 the larg est slic
$003240 65 73 20 74 6F 20 62 65 20 69 6E 20 20 20 20 20 es to be in
$003250 63 6F 6C 6F 72 2E 20 20 20 20 20 20 20 20 20 20 color.
$003260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003270 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003280 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003290 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0032A0 20 20 20 20 20 54 68 65 20 66 69 66 74 68 20 70 The fifth p
$0032B0 61 72 61 6D 65 74 65 72 2C 20 73 74 79 6C 65 2C arameter , style,
$0032C0 20 6D 61 79 20 62 65 20 64 69 66 66 69 63 75 6C may be difficul
$0032D0 74 20 74 6F 20 75 6E 64 65 72 73 74 61 6E 64 20 t to und erstand
$0032E0 61 74 20 66 69 72 73 74 2E 20 57 68 79 20 20 20 at first . Why
$0032F0 77 6F 75 6C 64 20 79 6F 75 20 77 61 6E 74 20 61 would yo u want a
$003300 20 63 68 61 72 74 20 70 72 69 6E 74 65 64 20 6F chart p rinted o
$003310 6E 20 69 74 73 20 20 20 73 69 64 65 3F 20 54 68 n its side? Th
$003320 65 20 61 6E 73 77 65 72 20 69 73 20 74 68 61 74 e answer is that
$003330 20 69 66 20 79 6F 75 20 61 72 65 20 20 20 20 20 if you are
$003340 67 6F 69 6E 67 20 74 6F 20 70 72 69 6E 74 20 74 going to print t
$003350 68 65 20 63 68 61 72 74 20 6F 75 74 2C 20 61 20 he chart out, a
$003360 76 65 72 74 69 63 61 6C 66 6F 72 6D 61 74 2C 20 vertical format,
$003370 77 69 74 68 20 74 68 65 20 6C 61 62 65 6C 73 20 with the labels
$003380 70 72 69 6E 74 65 64 20 20 20 20 20 20 20 20 20 printed
$003390 75 6E 64 65 72 6E 65 61 74 68 20 74 68 65 20 70 undernea th the p
$0033A0 69 65 2C 20 6D 61 79 20 6C 6F 6F 6B 20 62 65 74 ie, may look bet
$0033B0 74 65 72 20 74 68 61 6E 61 20 68 6F 72 69 7A 6F ter than a horizo
$0033C0 6E 74 61 6C 20 6F 6E 65 2C 20 77 69 74 68 20 74 ntal one , with t
$0033D0 68 65 20 6C 61 62 65 6C 73 20 62 65 73 69 64 65 he label s beside
$0033E0 74 68 65 20 70 69 65 2E 20 49 74 27 73 20 75 70 the pie. It's up
$0033F0 20 74 6F 20 79 6F 75 2E 20 20 20 20 20 20 20 20 to you.
$003400 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003410 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003420 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003430 20 20 20 20 20 46 69 6E 61 6C 6C 79 2C 20 77 65 Fin ally, we
$003440 20 68 61 76 65 20 72 6F 74 61 74 69 6F 6E 2E 20 have ro tation.
$003450 54 68 69 73 20 20 20 20 70 61 72 61 6D 65 74 65 This paramete
$003460 72 20 64 65 74 65 72 6D 69 6E 65 73 20 77 68 65 r determ ines whe
$003470 72 65 20 6F 6E 20 74 68 65 20 63 69 72 63 6C 65 re on th e circle
$003480 74 68 65 20 70 69 65 20 62 65 67 69 6E 73 20 74 the pie begins t
$003490 6F 20 70 6C 6F 74 2E 20 53 65 74 20 61 74 20 7A o plot. Set at z
$0034A0 65 72 6F 20 20 20 20 20 64 65 67 72 65 65 73 2C ero degrees,
$0034B0 20 74 68 65 20 66 69 72 73 74 20 73 6C 69 63 65 the fir st slice
$0034C0 27 73 20 74 72 61 69 6C 69 6E 67 20 65 64 67 65 's trail ing edge
$0034D0 69 73 20 73 74 72 61 69 67 68 74 20 64 6F 77 6E is strai ght down
$0034E0 20 66 72 6F 6D 20 74 68 65 20 63 65 6E 74 65 72 from th e center
$0034F0 20 6F 66 20 74 68 65 20 70 69 65 2E 20 55 6E 64 of the pie. Und
$003500 65 72 20 63 65 72 74 61 69 6E 20 63 6F 6C 6F 72 er certa in color
$003510 20 63 6F 6D 62 69 6E 61 74 69 6F 6E 73 20 69 6E combina tions in
$003520 63 6F 6C 6F 72 20 63 68 61 72 74 73 2C 20 6F 6E color ch arts, on
$003530 65 20 63 6F 6C 6F 72 20 77 69 6C 6C 20 62 6C 65 e color will ble
$003540 65 64 20 69 6E 74 6F 20 61 6E 6F 74 68 65 72 2E ed into another.
$003550 20 54 68 69 73 20 63 61 6E 20 75 73 75 61 6C 6C This ca n usuall
$003560 79 20 62 65 20 70 72 65 76 65 6E 74 65 64 20 20 y be pre vented
$003570 62 79 20 74 72 79 69 6E 67 20 64 69 66 66 65 72 by tryin g differ
$003580 65 6E 74 20 73 65 74 74 69 6E 67 73 20 6F 66 20 ent sett ings of
$003590 74 68 65 20 20 20 20 20 72 6F 74 61 74 69 6F 6E the rotation
$0035A0 20 70 61 72 61 6D 65 74 65 72 2E 20 46 6F 72 20 paramet er. For
$0035B0 6E 6F 77 2C 20 6C 65 61 76 65 20 69 74 20 61 74 now, lea ve it at
$0035C0 7A 65 72 6F 2E 20 20 20 20 20 20 20 20 20 20 20 zero.
$0035D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0035E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0035F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003600 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003610 20 20 20 20 20 49 66 20 61 74 20 61 6E 79 20 74 If at any t
$003620 69 6D 65 20 77 68 69 6C 65 20 73 65 74 74 69 6E ime whil e settin
$003630 67 20 20 20 20 20 20 20 70 61 72 61 6D 65 74 65 g paramete
$003640 72 73 20 79 6F 75 20 77 61 6E 74 20 74 6F 20 72 rs you w ant to r
$003650 65 74 75 72 6E 20 74 6F 20 74 68 65 20 20 20 20 eturn to the
$003660 4D 65 6E 75 2C 20 70 72 65 73 73 69 6E 67 20 63 Menu, pr essing c
$003670 6F 6E 74 72 6F 6C 2D 51 20 77 69 6C 6C 20 67 65 ontrol-Q will ge
$003680 74 20 79 6F 75 20 20 20 74 68 65 72 65 2E 20 20 t you there.
$003690 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0036A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0036B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0036C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0036D0 20 20 20 20 20 20 20 20 20 20 20 20 20 42 79 20 By
$0036E0 74 68 69 73 20 70 6F 69 6E 74 20 79 6F 75 20 73 this poi nt you s
$0036F0 68 6F 75 6C 64 20 62 65 20 72 65 61 64 79 20 20 hould be ready
$003700 74 6F 20 70 72 6F 63 65 73 73 20 74 68 65 20 70 to proce ss the p
$003710 69 65 20 63 68 61 72 74 2E 20 50 72 65 73 73 20 ie chart . Press
$003720 20 20 20 20 20 20 20 20 63 6F 6E 74 72 6F 6C 2D control-
$003730 50 20 61 6E 64 20 74 68 65 20 63 68 61 72 74 20 P and th e chart
$003740 77 69 6C 6C 20 62 65 20 70 6C 6F 74 74 65 64 20 will be plotted
$003750 69 6E 20 61 20 66 65 77 20 6D 6F 6D 65 6E 74 73 in a few moments
$003760 2E 20 57 68 65 6E 20 69 74 20 69 73 20 64 6F 6E . When i t is don
$003770 65 2C 20 68 69 74 20 61 6B 65 79 20 74 6F 20 67 e, hit a key to g
$003780 65 74 20 61 20 6D 65 6E 75 20 66 72 6F 6D 20 77 et a men u from w
$003790 68 69 63 68 20 79 6F 75 20 63 61 6E 20 20 20 20 hich you can
$0037A0 72 65 74 75 72 6E 20 74 6F 20 74 68 65 20 6D 61 return t o the ma
$0037B0 69 6E 20 6D 65 6E 75 2C 20 6C 6F 6F 6B 20 61 67 in menu, look ag
$0037C0 61 69 6E 20 61 74 20 20 74 68 65 20 63 68 61 72 ain at the char
$0037D0 74 2C 20 6F 72 20 63 68 61 6E 67 65 20 74 68 65 t, or ch ange the
$0037E0 20 70 61 72 61 6D 65 74 65 72 73 20 74 6F 20 20 paramet ers to
$0037F0 74 72 79 20 61 67 61 69 6E 2E 20 52 65 6D 65 6D try agai n. Remem
$003800 62 65 72 20 74 68 61 74 20 69 66 20 79 6F 75 20 ber that if you
$003810 77 61 6E 74 20 74 6F 20 73 61 76 65 20 61 20 63 want to save a c
$003820 68 61 72 74 2C 20 79 6F 75 20 6D 75 73 74 20 72 hart, yo u must r
$003830 65 74 75 72 6E 20 74 6F 20 74 68 65 20 20 20 20 eturn to the
$003840 4D 65 6E 75 20 61 6E 64 20 74 68 65 6E 20 67 6F Menu and then go
$003850 20 74 6F 20 74 68 65 20 64 69 73 6B 20 6D 65 6E to the disk men
$003860 75 20 62 65 66 6F 72 65 79 6F 75 20 63 72 65 61 u before you crea
$003870 74 65 20 61 6E 6F 74 68 65 72 20 63 68 61 72 74 te anoth er chart
$003880 2E 20 52 65 74 75 72 6E 20 74 6F 20 74 68 65 20 . Return to the
$003890 4D 65 6E 75 20 6E 6F 77 20 61 6E 64 20 77 65 27 Menu now and we'
$0038A0 6C 6C 20 6C 6F 6F 6B 20 69 6E 74 6F 20 74 68 65 ll look into the
$0038B0 20 20 20 20 20 20 20 20 70 72 6F 63 65 64 75 72 procedur
$0038C0 65 20 66 6F 72 20 63 72 65 61 74 69 6E 67 20 61 e for cr eating a
$0038D0 20 62 61 72 2F 6C 69 6E 65 20 63 68 61 72 74 2E bar/lin e chart.
$0038E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0038F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003900 20 20 20 20 20 20 20 20 44 41 54 41 20 45 44 49 DATA EDI
$003910 54 4F 52 20 52 45 56 49 53 49 54 45 44 20 20 20 TOR REVI SITED
$003920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003930 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003950 20 20 20 20 20 20 20 20 20 20 20 20 20 42 65 66 Bef
$003960 6F 72 65 20 77 65 20 72 75 6E 20 42 61 72 2F 4C ore we r un Bar/L
$003970 69 6E 65 20 43 68 61 72 74 2C 20 77 65 20 20 20 ine Char t, we
$003980 6E 65 65 64 20 74 6F 20 67 65 74 20 73 6F 6D 65 need to get some
$003990 20 64 61 74 61 20 74 68 61 74 20 77 61 73 20 64 data th at was d
$0039A0 65 73 69 67 6E 65 64 20 66 6F 72 20 74 68 69 73 esigned for this
$0039B0 20 6B 69 6E 64 20 6F 66 20 67 72 61 70 68 2E 20 kind of graph.
$0039C0 47 6F 20 74 6F 20 74 68 65 20 64 69 73 6B 20 20 Go to th e disk
$0039D0 6D 65 6E 75 20 61 6E 64 20 6C 6F 61 64 20 74 68 menu and load th
$0039E0 65 20 64 61 74 61 20 66 69 6C 65 20 42 41 52 2F e data f ile BAR/
$0039F0 4C 49 4E 45 20 20 20 20 53 41 4D 50 4C 45 52 2E LINE SAMPLER.
$003A00 20 54 68 65 6E 20 72 65 74 75 72 6E 20 74 6F 20 Then re turn to
$003A10 74 68 65 20 6D 61 69 6E 20 6D 65 6E 75 20 20 20 the main menu
$003A20 61 6E 64 20 72 75 6E 20 74 68 65 20 44 61 74 61 and run the Data
$003A30 20 45 64 69 74 6F 72 20 61 67 61 69 6E 2E 20 20 Editor again.
$003A40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003A50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003A60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003A70 20 20 20 20 20 42 65 20 73 75 72 65 20 74 6F 20 Be sure to
$003A80 61 6E 73 77 65 72 20 4E 20 74 6F 20 74 68 65 20 answer N to the
$003A90 63 6C 65 61 72 20 20 20 64 61 74 61 20 71 75 65 clear data que
$003AA0 73 74 69 6F 6E 2E 20 54 68 69 73 20 74 69 6D 65 stion. T his time
$003AB0 20 79 6F 75 27 6C 6C 20 73 65 65 20 64 61 74 61 you'll see data
$003AC0 77 69 74 68 20 6C 61 62 65 6C 73 20 69 6E 20 6F with lab els in o
$003AD0 6E 6C 79 20 6F 6E 65 20 63 6F 6C 75 6D 6E 2E 20 nly one column.
$003AE0 42 61 72 2F 4C 69 6E 65 43 68 61 72 74 20 69 73 Bar/Line Chart is
$003AF0 20 75 6E 61 62 6C 65 20 74 6F 20 75 73 65 20 6C unable to use l
$003B00 61 62 65 6C 73 20 69 6E 20 74 77 6F 20 20 20 20 abels in two
$003B10 63 6F 6C 75 6D 6E 73 2E 20 54 68 65 20 65 69 67 columns. The eig
$003B20 68 74 20 63 68 61 72 61 63 74 65 72 20 6C 69 6D ht chara cter lim
$003B30 69 74 20 69 73 20 61 20 70 72 61 63 74 69 63 61 it is a practica
$003B40 6C 20 6F 6E 65 2E 20 49 6E 20 74 68 65 20 63 61 l one. I n the ca
$003B50 73 65 20 6F 66 20 62 61 72 20 61 6E 64 20 20 20 se of ba r and
$003B60 6C 69 6E 65 20 63 68 61 72 74 73 2C 20 74 68 65 line cha rts, the
$003B70 20 6C 61 62 65 6C 73 20 77 69 6C 6C 20 62 65 20 labels will be
$003B80 70 72 69 6E 74 65 64 20 61 74 20 74 68 65 20 62 printed at the b
$003B90 6F 74 74 6F 6D 20 6F 66 20 74 68 65 20 63 68 61 ottom of the cha
$003BA0 72 74 2C 20 61 6C 6F 6E 67 20 74 68 65 20 58 20 rt, alon g the X
$003BB0 61 78 69 73 2E 20 4C 6F 6E 67 65 72 20 6C 61 62 axis. Lo nger lab
$003BC0 65 6C 73 20 77 6F 75 6C 64 20 73 75 62 73 74 61 els woul d substa
$003BD0 6E 74 69 61 6C 6C 79 20 6C 69 6D 69 74 20 74 68 ntially limit th
$003BE0 65 20 61 6D 6F 75 6E 74 20 6F 66 20 73 70 61 63 e amount of spac
$003BF0 65 20 61 76 61 69 6C 61 62 6C 65 20 66 6F 72 20 e availa ble for
$003C00 74 68 65 20 63 68 61 72 74 20 69 74 73 65 6C 66 the char t itself
$003C10 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
$003C20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003C30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003C40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003C50 20 20 20 20 20 49 6E 20 6D 6F 73 74 20 63 61 73 In most cas
$003C60 65 73 2C 20 74 68 65 20 6C 61 62 65 6C 73 20 6F es, the labels o
$003C70 6E 20 74 68 65 20 58 20 61 78 69 73 20 64 65 6E n the X axis den
$003C80 6F 74 65 20 74 68 65 20 70 61 73 73 61 67 65 20 ote the passage
$003C90 6F 66 20 74 69 6D 65 2E 20 59 6F 75 20 63 61 6E of time. You can
$003CA0 65 6E 74 65 72 20 74 68 65 6D 20 69 6E 74 6F 20 enter th em into
$003CB0 74 68 65 20 6C 65 66 74 20 68 61 6E 64 20 63 6F the left hand co
$003CC0 6C 75 6D 6E 20 62 79 20 68 61 6E 64 2C 20 6F 66 lumn by hand, of
$003CD0 20 63 6F 75 72 73 65 2C 20 62 75 74 20 69 6E 20 course, but in
$003CE0 63 65 72 74 61 69 6E 20 63 6F 6D 6D 6F 6E 20 20 certain common
$003CF0 73 69 74 75 61 74 69 6F 6E 73 2C 20 74 68 65 20 situatio ns, the
$003D00 44 61 74 61 20 45 64 69 74 6F 72 20 68 61 73 20 Data Edi tor has
$003D10 61 20 20 20 20 20 20 20 66 61 63 69 6C 69 74 79 a facility
$003D20 20 66 6F 72 20 65 6E 74 65 72 69 6E 67 20 74 68 for ent ering th
$003D30 65 6D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 em
$003D40 61 75 74 6F 6D 61 74 69 63 61 6C 6C 79 2E 20 50 automati cally. P
$003D50 72 65 73 73 20 63 6F 6E 74 72 6F 6C 2D 58 20 74 ress con trol-X t
$003D60 6F 20 65 6E 74 65 72 20 74 68 69 73 20 66 61 63 o enter this fac
$003D70 69 6C 69 74 79 2E 20 20 20 20 20 20 20 20 20 20 ility.
$003D80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003D90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003DA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$003DB0 20 20 20 20 20 20 20 20 20 20 20 20 20 59 6F 75 You
$003DC0 72 20 6F 70 74 69 6F 6E 73 20 61 74 20 74 68 69 r option s at thi
$003DD0 73 20 70 6F 69 6E 74 20 61 72 65 20 74 6F 20 20 s point are to
$003DE0 63 72 65 61 74 65 20 6C 61 62 65 6C 73 20 6F 6E create l abels on
$003DF0 20 74 68 65 20 58 20 61 78 69 73 20 66 6F 72 20 the X a xis for
$003E00 6D 6F 6E 74 68 73 2C 20 64 61 79 73 20 6F 66 20 months, days of
$003E10 74 68 65 20 77 65 65 6B 2C 20 6F 72 20 61 20 72 the week , or a r
$003E20 61 6E 67 65 20 6F 66 20 6E 75 6D 62 65 72 73 2E ange of numbers.
$003E30 54 68 65 20 63 75 72 72 65 6E 74 20 58 20 61 78 The curr ent X ax
$003E40 69 73 20 69 73 20 61 20 72 61 6E 67 65 20 6F 66 is is a range of
$003E50 20 20 20 20 20 20 20 20 65 69 67 68 74 65 65 6E eighteen
$003E60 20 6D 6F 6E 74 68 73 20 77 69 74 68 20 79 65 61 months with yea
$003E70 72 20 6C 61 62 65 6C 73 20 61 64 64 65 64 20 20 r labels added
$003E80 69 6E 20 62 79 20 68 61 6E 64 2E 20 53 69 6E 63 in by ha nd. Sinc
$003E90 65 20 74 68 65 20 64 61 74 61 20 69 73 20 66 69 e the da ta is fi
$003EA0 63 74 69 74 69 6F 75 73 61 6E 79 77 61 79 2C 20 ctitious anyway,
$003EB0 6C 65 74 27 73 20 6D 61 6B 65 20 74 68 65 20 6C let's ma ke the l
$003EC0 61 62 65 6C 73 20 66 6F 72 20 79 65 61 72 73 20 abels fo r years
$003ED0 69 6E 73 74 65 61 64 2E 20 53 65 6C 65 63 74 20 instead. Select
$003EE0 61 20 72 61 6E 67 65 20 6F 66 20 6E 75 6D 62 65 a range of numbe
$003EF0 72 73 20 66 72 6F 6D 20 74 68 65 20 66 69 72 73 rs from the firs
$003F00 74 20 6D 65 6E 75 2E 20 59 6F 75 20 77 69 6C 6C t menu. You will
$003F10 20 62 65 20 61 73 6B 65 64 20 68 6F 77 20 20 20 be aske d how
$003F20 6D 61 6E 79 20 6E 75 6D 62 65 72 73 20 69 6E 20 many num bers in
$003F30 74 68 65 20 72 61 6E 67 65 2E 20 42 65 63 61 75 the rang e. Becau
$003F40 73 65 20 77 65 20 20 20 68 61 76 65 20 64 61 74 se we have dat
$003F50 61 20 69 6E 20 61 6C 6C 20 65 69 67 68 74 65 65 a in all eightee
$003F60 6E 20 72 6F 77 73 2C 20 65 6E 74 65 72 20 20 20 n rows, enter
$003F70 31 38 2E 20 4E 6F 77 20 74 68 65 20 70 72 6F 67 18. Now the prog
$003F80 72 61 6D 20 61 73 6B 73 20 77 68 61 74 20 6E 75 ram asks what nu
$003F90 6D 62 65 72 20 74 6F 20 73 74 61 72 74 20 77 69 mber to start wi
$003FA0 74 68 2E 20 45 6E 74 65 72 20 31 39 36 35 2E 20 th. Ente r 1965.
$003FB0 46 69 6E 61 6C 6C 79 2C 20 69 74 20 77 69 6C 6C Finally, it will
$003FC0 61 73 6B 20 79 6F 75 20 66 6F 72 20 74 68 65 20 ask you for the
$003FD0 69 6E 63 72 65 6D 65 6E 74 2E 20 45 6E 74 65 72 incremen t. Enter
$003FE0 20 61 20 31 2E 20 20 20 41 66 74 65 72 20 61 20 a 1. After a
$003FF0 66 65 77 20 73 65 63 6F 6E 64 73 2C 20 74 68 65 few seco nds, the
$004000 20 64 61 74 61 20 73 63 72 65 65 6E 20 20 20 20 data sc reen
$004010 77 69 6C 6C 20 63 6F 6D 65 20 62 61 63 6B 20 77 will com e back w
$004020 69 74 68 20 74 68 65 20 79 65 61 72 73 20 31 39 ith the years 19
$004030 36 35 20 20 20 20 20 20 74 68 72 6F 75 67 68 20 65 through
$004040 31 39 38 32 20 69 6E 20 74 68 65 20 6C 65 66 74 1982 in the left
$004050 20 63 6F 6C 75 6D 6E 2E 20 20 20 20 20 20 20 20 column.
$004060 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004070 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004080 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
$004090 20 74 77 6F 20 66 69 6E 61 6C 20 63 6F 6D 6D 61 two fin al comma
$0040A0 6E 64 73 20 69 6E 20 74 68 65 20 44 61 74 61 20 nds in t he Data
$0040B0 45 64 69 74 6F 72 20 61 6C 6C 6F 77 20 79 6F 75 Editor a llow you
$0040C0 20 74 6F 20 61 64 64 20 6F 72 20 64 65 6C 65 74 to add or delet
$0040D0 65 20 61 20 72 6F 77 20 6F 66 20 64 61 74 61 2E e a row of data.
$0040E0 20 54 68 65 73 65 20 74 77 6F 20 66 75 6E 63 74 These t wo funct
$0040F0 69 6F 6E 73 20 6F 70 65 72 61 74 65 20 69 6E 20 ions ope rate in
$004100 70 72 65 74 74 79 20 6D 75 63 68 20 74 68 65 20 pretty m uch the
$004110 73 61 6D 65 20 77 61 79 3B 20 61 64 64 20 69 73 same way ; add is
$004120 20 20 20 20 20 20 20 20 61 63 74 69 76 61 74 65 activate
$004130 64 20 62 79 20 63 6F 6E 74 72 6F 6C 2D 41 20 61 d by con trol-A a
$004140 6E 64 20 64 65 6C 65 74 65 20 69 73 20 20 20 20 nd delet e is
$004150 61 63 74 69 76 61 74 65 64 20 62 79 20 63 6F 6E activate d by con
$004160 74 72 6F 6C 2D 44 2E 20 49 6E 20 65 69 74 68 65 trol-D. In eithe
$004170 72 20 63 61 73 65 2C 20 74 68 65 20 66 75 6E 63 r case, the func
$004180 74 69 6F 6E 20 77 69 6C 6C 20 77 6F 72 6B 20 6F tion wil l work o
$004190 6E 20 74 68 65 20 72 6F 77 20 74 68 65 20 20 20 n the ro w the
$0041A0 63 75 72 73 6F 72 20 69 73 20 69 6E 2E 20 20 20 cursor i s in.
$0041B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0041C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0041D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0041E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0041F0 20 20 20 20 20 54 6F 20 69 6C 6C 75 73 74 72 61 To illustra
$004200 74 65 20 68 6F 77 20 74 68 65 73 65 20 66 75 6E te how t hese fun
$004210 63 74 69 6F 6E 73 20 20 77 6F 72 6B 2C 20 6C 65 ctions work, le
$004220 74 27 73 20 75 73 65 20 74 68 65 20 64 65 6C 65 t's use the dele
$004230 74 65 20 63 6F 6D 6D 61 6E 64 20 74 6F 20 20 20 te comma nd to
$004240 75 70 64 61 74 65 20 74 68 65 20 64 61 74 61 20 update t he data
$004250 74 6F 20 69 6E 63 6C 75 64 65 20 31 39 38 33 2E to inclu de 1983.
$004260 20 4D 6F 76 65 20 20 20 74 68 65 20 63 75 72 73 Move the curs
$004270 6F 72 20 74 6F 20 74 68 65 20 74 6F 70 20 72 6F or to th e top ro
$004280 77 20 69 66 20 69 74 20 69 73 6E 27 74 20 20 20 w if it isn't
$004290 74 68 65 72 65 20 61 6C 72 65 61 64 79 2E 20 50 there al ready. P
$0042A0 72 65 73 73 20 63 6F 6E 74 72 6F 6C 2D 44 20 61 ress con trol-D a
$0042B0 6E 64 20 20 20 20 20 20 61 6E 73 77 65 72 20 59 nd answer Y
$0042C0 20 77 68 65 6E 20 69 74 20 61 73 6B 73 20 69 66 when it asks if
$0042D0 20 79 6F 75 20 77 61 6E 74 20 74 6F 20 20 20 20 you wan t to
$0042E0 64 65 6C 65 74 65 20 74 68 69 73 20 6C 69 6E 65 delete t his line
$0042F0 2E 20 54 68 65 73 65 20 71 75 65 73 74 69 6F 6E . These question
$004300 73 20 61 72 65 20 20 20 61 73 6B 65 64 20 61 73 s are asked as
$004310 20 61 6E 20 65 78 74 72 61 20 73 65 63 75 72 69 an extr a securi
$004320 74 79 20 6D 65 61 73 75 72 65 20 74 6F 20 20 20 ty measu re to
$004330 61 76 6F 69 64 20 74 68 65 20 64 65 73 74 72 75 avoid th e destru
$004340 63 74 69 6F 6E 20 6F 66 20 76 61 6C 75 61 62 6C ction of valuabl
$004350 65 20 64 61 74 61 2E 20 20 20 20 20 20 20 20 20 e data.
$004360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004370 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004380 20 20 20 20 20 57 68 65 6E 20 74 68 65 20 74 6F Whe n the to
$004390 70 20 6C 69 6E 65 20 77 61 73 20 64 65 6C 65 74 p line w as delet
$0043A0 65 64 2C 20 74 68 65 20 64 61 74 61 20 62 65 6E ed, the data ben
$0043B0 65 61 74 68 20 69 74 20 6D 6F 76 65 64 20 75 70 eath it moved up
$0043C0 20 74 6F 20 66 69 6C 6C 20 69 6E 20 74 68 65 20 to fill in the
$0043D0 73 70 61 63 65 2E 20 49 66 20 79 6F 75 20 68 61 space. I f you ha
$0043E0 64 20 61 64 64 65 64 20 61 20 6C 69 6E 65 20 69 d added a line i
$0043F0 6E 73 74 65 61 64 2C 20 74 68 65 20 64 61 74 61 nstead, the data
$004400 20 77 6F 75 6C 64 20 6E 61 74 75 72 61 6C 6C 79 would n aturally
$004410 20 68 61 76 65 20 6D 6F 76 65 64 20 20 20 20 20 have mo ved
$004420 64 6F 77 6E 2C 20 69 6E 63 69 64 65 6E 74 61 6C down, in cidental
$004430 6C 79 20 6C 6F 73 69 6E 67 20 74 68 65 20 6C 61 ly losin g the la
$004440 73 74 20 6C 69 6E 65 2E 41 6E 79 77 61 79 2C 20 st line. Anyway,
$004450 79 6F 75 20 6E 6F 77 20 68 61 76 65 20 61 20 62 you now have a b
$004460 6C 61 6E 6B 20 64 61 74 61 20 6C 69 6E 65 20 20 lank dat a line
$004470 61 74 20 74 68 65 20 62 6F 74 74 6F 6D 20 69 6E at the b ottom in
$004480 20 77 68 69 63 68 20 79 6F 75 20 63 61 6E 20 65 which y ou can e
$004490 6E 74 65 72 20 20 20 20 64 61 74 61 20 66 6F 72 nter data for
$0044A0 20 31 39 38 33 2E 20 54 68 65 20 65 61 73 69 65 1983. T he easie
$0044B0 73 74 20 77 61 79 20 74 6F 20 67 65 74 20 20 20 st way t o get
$0044C0 74 68 65 72 65 20 69 73 20 74 6F 20 6D 6F 76 65 there is to move
$0044D0 20 74 68 65 20 63 75 72 73 6F 72 20 75 70 20 77 the cur sor up w
$0044E0 69 74 68 20 20 20 20 20 63 6F 6E 74 72 6F 6C 2D ith control-
$0044F0 49 2E 20 53 69 6E 63 65 20 77 65 20 77 65 72 65 I. Since we were
$004500 20 6F 6E 20 74 68 65 20 74 6F 70 20 20 20 20 20 on the top
$004510 6C 69 6E 65 2C 20 63 6F 6E 74 72 6F 6C 2D 49 20 line, co ntrol-I
$004520 77 72 61 70 73 20 79 6F 75 20 61 72 6F 75 6E 64 wraps yo u around
$004530 20 74 6F 20 74 68 65 20 62 6F 74 74 6F 6D 2E 20 to the bottom.
$004540 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004550 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004560 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004570 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004580 20 20 20 20 20 20 20 20 20 20 20 20 20 4E 6F 77 Now
$004590 20 65 6E 74 65 72 20 31 39 38 33 20 69 6E 20 74 enter 1 983 in t
$0045A0 68 65 20 66 69 72 73 74 20 63 6F 6C 75 6D 6E 2C he first column,
$0045B0 61 6E 64 20 77 68 61 74 65 76 65 72 20 64 61 74 and what ever dat
$0045C0 61 20 79 6F 75 20 74 68 69 6E 6B 20 69 73 20 20 a you th ink is
$0045D0 20 20 20 20 20 20 20 20 72 65 61 73 6F 6E 61 62 reasonab
$0045E0 6C 65 20 69 6E 20 74 68 65 20 6F 74 68 65 72 20 le in th e other
$0045F0 63 6F 6C 75 6D 6E 73 2E 20 49 66 20 79 6F 75 20 columns. If you
$004600 6C 65 61 76 65 20 61 20 63 6F 6C 75 6D 6E 20 62 leave a column b
$004610 6C 61 6E 6B 2C 20 42 61 72 2F 4C 69 6E 65 20 43 lank, Ba r/Line C
$004620 68 61 72 74 20 20 20 20 77 69 6C 6C 20 74 72 65 hart will tre
$004630 61 74 20 69 74 20 61 73 20 69 66 20 61 20 7A 65 at it as if a ze
$004640 72 6F 20 68 61 64 20 62 65 65 6E 20 20 20 20 20 ro had b een
$004650 74 68 65 72 65 2E 20 20 20 20 20 20 20 20 20 20 there.
$004660 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004670 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004680 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004690 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0046A0 20 20 20 20 20 4E 6F 77 20 79 6F 75 27 72 65 20 Now you're
$0046B0 72 65 61 64 79 20 66 6F 72 20 42 61 72 2F 4C 69 ready fo r Bar/Li
$0046C0 6E 65 20 20 20 20 20 20 43 68 61 72 74 2E 20 51 ne Chart. Q
$0046D0 75 69 74 20 74 68 65 20 44 61 74 61 20 45 64 69 uit the Data Edi
$0046E0 74 6F 72 20 77 69 74 68 20 20 20 20 20 20 20 20 tor with
$0046F0 63 6F 6E 74 72 6F 6C 2D 51 20 61 6E 64 20 73 65 control- Q and se
$004700 6C 65 63 74 20 42 61 72 2F 4C 69 6E 65 20 43 68 lect Bar /Line Ch
$004710 61 72 74 20 66 72 6F 6D 74 68 65 20 6D 61 69 6E art from the main
$004720 20 6D 65 6E 75 2E 20 20 20 20 20 20 20 20 20 20 menu.
$004730 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004750 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004760 20 20 20 20 20 20 20 20 42 41 52 2F 4C 49 4E 45 BAR/LINE
$004770 20 43 48 41 52 54 20 20 20 20 20 20 20 20 20 20 CHART
$004780 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004790 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0047A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0047B0 20 20 20 20 20 20 20 20 20 20 20 20 20 42 61 72 Bar
$0047C0 2F 4C 69 6E 65 20 43 68 61 72 74 20 74 61 6B 65 /Line Ch art take
$0047D0 73 20 61 20 66 65 77 20 73 65 63 6F 6E 64 73 20 s a few seconds
$0047E0 74 6F 20 22 77 61 72 6D 20 75 70 22 20 62 65 66 to "warm up" bef
$0047F0 6F 72 65 20 69 74 20 6F 66 66 65 72 73 20 79 6F ore it o ffers yo
$004800 75 20 20 20 20 20 20 20 61 6E 79 74 68 69 6E 67 u anything
$004810 20 74 6F 20 64 6F 2E 20 54 68 69 73 20 69 73 20 to do. This is
$004820 62 65 63 61 75 73 65 2C 20 75 6E 6C 69 6B 65 20 because, unlike
$004830 50 69 65 20 43 68 61 72 74 2C 20 69 74 20 72 65 Pie Char t, it re
$004840 61 64 73 20 61 6C 6C 20 74 68 65 20 64 61 74 61 ads all the data
$004850 20 62 65 66 6F 72 65 20 79 6F 75 20 73 65 74 20 before you set
$004860 74 68 65 20 70 61 72 61 6D 65 74 65 72 73 2E 20 the para meters.
$004870 42 65 20 70 61 74 69 65 6E 74 2C 20 74 68 69 73 Be patie nt, this
$004880 77 61 69 74 20 77 69 6C 6C 20 73 61 76 65 20 79 wait wil l save y
$004890 6F 75 20 73 6F 6D 65 20 74 69 6D 65 20 6C 61 74 ou some time lat
$0048A0 65 72 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 er.
$0048B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0048C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0048D0 20 20 20 20 20 54 68 65 20 70 61 72 61 6D 65 74 The paramet
$0048E0 65 72 20 73 65 6C 65 63 74 69 6F 6E 20 73 63 72 er selec tion scr
$0048F0 65 65 6E 20 69 6E 20 20 42 61 72 2F 4C 69 6E 65 een in Bar/Line
$004900 20 43 68 61 72 74 20 69 73 20 62 6F 74 68 20 6D Chart i s both m
$004910 6F 72 65 20 63 6F 6D 70 6C 65 78 20 61 6E 64 20 ore comp lex and
$004920 6C 65 73 73 20 73 65 6C 66 2D 65 78 70 6C 61 6E less sel f-explan
$004930 61 74 6F 72 79 20 74 68 61 6E 20 74 68 65 20 6F atory th an the o
$004940 6E 65 20 69 6E 20 20 20 50 69 65 20 43 68 61 72 ne in Pie Char
$004950 74 2E 20 54 68 69 73 20 69 73 20 62 65 63 61 75 t. This is becau
$004960 73 65 20 74 68 65 72 65 20 69 73 20 6D 6F 72 65 se there is more
$004970 64 61 74 61 20 74 68 61 74 20 63 61 6E 20 62 65 data tha t can be
$004980 20 67 72 61 70 68 65 64 20 69 6E 20 61 20 73 69 graphed in a si
$004990 6E 67 6C 65 20 20 20 20 63 68 61 72 74 20 61 6E ngle chart an
$0049A0 64 20 61 73 20 73 75 63 68 20 6D 6F 72 65 20 64 d as suc h more d
$0049B0 65 63 69 73 69 6F 6E 73 20 74 6F 20 20 20 20 20 ecisions to
$0049C0 6D 61 6B 65 2E 20 4F 6E 6C 79 20 73 6F 20 6D 75 make. On ly so mu
$0049D0 63 68 20 69 6E 66 6F 72 6D 61 74 69 6F 6E 20 63 ch infor mation c
$0049E0 61 6E 20 62 65 20 20 20 70 72 65 73 65 6E 74 65 an be presente
$0049F0 64 20 69 6E 20 61 20 73 69 6E 67 6C 65 20 73 63 d in a s ingle sc
$004A00 72 65 65 6E 2E 20 20 20 20 20 20 20 20 20 20 20 reen.
$004A10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004A20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004A30 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 65 The
$004A40 20 63 6F 6D 6D 61 6E 64 73 20 69 6E 20 74 68 69 command s in thi
$004A50 73 20 70 72 6F 67 72 61 6D 2C 20 6C 69 6B 65 20 s progra m, like
$004A60 74 68 6F 73 65 20 69 6E 20 74 68 65 20 44 61 74 those in the Dat
$004A70 61 20 45 64 69 74 6F 72 2C 20 61 72 65 20 6C 69 a Editor , are li
$004A80 73 74 65 64 20 62 75 74 6E 6F 74 20 65 78 70 6C sted but not expl
$004A90 61 69 6E 65 64 20 61 74 20 74 68 65 20 62 6F 74 ained at the bot
$004AA0 74 6F 6D 20 6F 66 20 74 68 65 20 20 20 20 20 20 tom of t he
$004AB0 73 63 72 65 65 6E 2E 20 4C 65 74 27 73 20 74 61 screen. Let's ta
$004AC0 6B 65 20 74 68 65 6D 20 6F 6E 65 20 61 74 20 61 ke them one at a
$004AD0 20 74 69 6D 65 2E 20 20 20 20 20 20 20 20 20 20 time.
$004AE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004AF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004B00 20 20 20 20 20 54 68 65 20 66 6F 75 72 20 6C 65 The four le
$004B10 67 65 6E 64 73 20 61 72 65 20 70 72 69 6E 74 65 gends ar e printe
$004B20 64 20 61 74 20 74 68 65 74 6F 70 20 6F 66 20 74 d at the top of t
$004B30 68 65 20 73 63 72 65 65 6E 2C 20 77 68 65 6E 20 he scree n, when
$004B40 74 68 65 72 65 20 61 72 65 20 66 6F 75 72 20 20 there ar e four
$004B50 6C 65 67 65 6E 64 73 2E 20 57 68 69 6C 65 20 6C legends. While l
$004B60 65 67 65 6E 64 73 20 61 72 65 20 6F 70 74 69 6F egends a re optio
$004B70 6E 61 6C 20 69 6E 20 20 50 69 65 20 43 68 61 72 nal in Pie Char
$004B80 74 2C 20 74 68 65 79 20 61 72 65 20 72 65 71 75 t, they are requ
$004B90 69 72 65 64 20 69 6E 20 42 61 72 2F 4C 69 6E 65 ired in Bar/Line
$004BA0 43 68 61 72 74 2E 20 41 20 63 6F 6C 75 6D 6E 20 Chart. A column
$004BB0 74 68 61 74 20 64 6F 65 73 20 6E 6F 74 20 68 61 that doe s not ha
$004BC0 76 65 20 61 20 20 20 20 6C 65 67 65 6E 64 20 63 ve a legend c
$004BD0 61 6E 6E 6F 74 20 62 65 20 67 72 61 70 68 65 64 annot be graphed
$004BE0 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
$004BF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004C00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004C10 20 20 20 20 20 20 20 20 20 20 20 20 20 50 72 65 Pre
$004C20 73 73 20 4C 2E 20 41 20 63 75 72 73 6F 72 20 77 ss L. A cursor w
$004C30 69 6C 6C 20 61 70 70 65 61 72 20 6E 65 78 74 20 ill appe ar next
$004C40 74 6F 20 74 68 65 20 61 73 73 69 67 6E 65 64 20 to the a ssigned
$004C50 63 68 61 72 74 20 74 79 70 65 20 6F 66 20 6C 65 chart ty pe of le
$004C60 67 65 6E 64 20 20 20 20 6F 6E 65 2C 20 77 68 69 gend one, whi
$004C70 63 68 20 64 65 66 61 75 6C 74 73 20 74 6F 20 6C ch defau lts to l
$004C80 69 6E 65 2E 20 54 6F 20 6D 61 6B 65 20 20 20 20 ine. To make
$004C90 74 68 61 74 20 63 6F 6C 75 6D 6E 20 63 68 61 72 that col umn char
$004CA0 74 20 61 73 20 61 20 62 61 72 2C 20 70 72 65 73 t as a b ar, pres
$004CB0 73 20 42 2E 20 54 6F 20 6D 61 6B 65 20 69 74 20 s B. To make it
$004CC0 61 20 6C 69 6E 65 2C 20 70 72 65 73 73 20 4C 20 a line, press L
$004CD0 6F 72 20 72 65 74 75 72 6E 20 74 6F 20 20 20 20 or retur n to
$004CE0 61 63 63 65 70 74 20 74 68 65 20 64 65 66 61 75 accept t he defau
$004CF0 6C 74 2E 20 49 66 20 79 6F 75 20 64 6F 6E 27 74 lt. If y ou don't
$004D00 20 77 61 6E 74 20 20 20 74 68 61 74 20 63 6F 6C want that col
$004D10 75 6D 6E 20 69 6E 20 74 68 65 20 70 69 63 74 75 umn in t he pictu
$004D20 72 65 20 61 74 20 61 6C 6C 2C 20 70 72 65 73 73 re at al l, press
$004D30 4E 2E 20 55 73 65 20 74 68 69 73 20 74 6F 20 73 N. Use t his to s
$004D40 65 74 20 63 68 61 72 74 20 74 79 70 65 73 20 66 et chart types f
$004D50 6F 72 20 74 68 65 20 20 72 65 73 74 20 6F 66 20 or the rest of
$004D60 74 68 65 20 6C 65 67 65 6E 64 73 2E 20 49 66 20 the lege nds. If
$004D70 74 68 65 72 65 20 69 73 20 6E 6F 20 20 20 20 20 there is no
$004D80 6C 65 67 65 6E 64 20 66 6F 72 20 61 20 67 69 76 legend f or a giv
$004D90 65 6E 20 63 6F 6C 75 6D 6E 2C 20 42 61 72 2F 4C en colum n, Bar/L
$004DA0 69 6E 65 20 20 20 20 20 43 68 61 72 74 20 77 69 ine Chart wi
$004DB0 6C 6C 20 61 75 74 6F 6D 61 74 69 63 61 6C 6C 79 ll autom atically
$004DC0 20 73 6B 69 70 20 6F 76 65 72 20 74 68 61 74 20 skip ov er that
$004DD0 6C 65 67 65 6E 64 2E 20 20 20 20 20 20 20 20 20 legend.
$004DE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004DF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004E00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004E10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004E20 20 20 20 20 20 4E 6F 77 20 74 61 6B 65 20 61 20 Now take a
$004E30 6C 6F 6F 6B 20 61 74 20 74 68 65 20 64 69 73 70 look at the disp
$004E40 6C 61 79 20 6F 66 20 20 74 68 65 20 79 65 61 72 lay of the year
$004E50 73 20 69 6E 20 74 68 65 20 63 65 6E 74 65 72 20 s in the center
$004E60 6F 66 20 74 68 65 20 73 63 72 65 65 6E 2E 20 20 of the s creen.
$004E70 4F 76 65 72 20 31 39 36 36 20 74 68 65 72 65 20 Over 196 6 there
$004E80 69 73 20 61 20 3C 20 73 69 67 6E 20 61 6E 64 20 is a < s ign and
$004E90 6F 76 65 72 20 20 20 20 31 39 38 33 20 74 68 65 over 1983 the
$004EA0 72 65 20 69 73 20 61 20 3E 20 73 69 67 6E 2E 20 re is a > sign.
$004EB0 54 68 65 73 65 20 69 6E 64 69 63 61 74 65 20 20 These in dicate
$004EC0 74 68 65 20 66 69 72 73 74 20 61 6E 64 20 6C 61 the firs t and la
$004ED0 73 74 20 72 6F 77 20 74 6F 20 62 65 20 63 68 61 st row t o be cha
$004EE0 72 74 65 64 2E 20 20 20 54 68 65 20 70 72 6F 67 rted. The prog
$004EF0 72 61 6D 20 64 65 66 61 75 6C 74 73 20 74 6F 20 ram defa ults to
$004F00 74 68 65 20 66 69 72 73 74 20 61 6E 64 20 20 20 the firs t and
$004F10 6C 61 73 74 20 70 6F 73 73 69 62 6C 65 20 66 69 last pos sible fi
$004F20 65 6C 64 2C 20 75 6E 6C 65 73 73 20 74 68 65 72 eld, unl ess ther
$004F30 65 20 69 73 20 61 20 20 67 61 70 20 69 6E 20 74 e is a gap in t
$004F40 68 65 20 6C 61 62 65 6C 73 2E 20 54 68 61 74 20 he label s. That
$004F50 69 73 2C 20 61 20 72 6F 77 20 74 68 61 74 20 20 is, a ro w that
$004F60 68 61 73 20 6E 6F 20 6C 61 62 65 6C 20 61 74 20 has no l abel at
$004F70 61 6C 6C 2E 20 49 6E 20 74 68 61 74 20 63 61 73 all. In that cas
$004F80 65 2C 20 74 68 65 20 20 70 72 6F 67 72 61 6D 20 e, the program
$004F90 77 69 6C 6C 20 73 74 6F 70 20 6C 6F 6F 6B 69 6E will sto p lookin
$004FA0 67 20 66 6F 72 20 64 61 74 61 20 61 74 20 20 20 g for da ta at
$004FB0 74 68 61 74 20 72 6F 77 20 61 6E 64 20 6E 65 76 that row and nev
$004FC0 65 72 20 73 65 65 20 74 68 65 20 64 61 74 61 20 er see t he data
$004FD0 61 66 74 65 72 20 20 20 69 74 2E 20 20 20 20 20 after it.
$004FE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$004FF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005010 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005020 20 20 20 20 20 20 20 20 20 20 20 20 20 54 6F 20 To
$005030 63 68 61 6E 67 65 20 74 68 65 20 64 65 66 61 75 change t he defau
$005040 6C 74 20 73 65 74 74 69 6E 67 2C 20 73 61 79 20 lt setti ng, say
$005050 74 6F 20 67 72 61 70 68 20 6F 6E 6C 79 20 74 68 to graph only th
$005060 65 20 6C 61 73 74 20 66 69 76 65 20 79 65 61 72 e last f ive year
$005070 73 2C 20 70 72 65 73 73 42 2E 20 54 68 65 20 62 s, press B. The b
$005080 65 67 69 6E 6E 69 6E 67 20 70 6F 69 6E 74 65 72 eginning pointer
$005090 20 77 69 6C 6C 20 66 6C 61 73 68 2C 20 61 6E 64 will fl ash, and
$0050A0 79 6F 75 20 77 69 6C 6C 20 6E 6F 77 20 62 65 20 you will now be
$0050B0 61 62 6C 65 20 74 6F 20 6D 6F 76 65 20 69 74 20 able to move it
$0050C0 74 6F 20 74 68 65 20 20 64 65 73 69 72 65 64 20 to the desired
$0050D0 6C 6F 63 61 74 69 6F 6E 20 77 69 74 68 20 74 68 location with th
$0050E0 65 20 61 72 72 6F 77 20 6B 65 79 73 2E 20 20 20 e arrow keys.
$0050F0 48 69 74 74 69 6E 67 20 72 65 74 75 72 6E 20 61 Hitting return a
$005100 63 63 65 70 74 73 20 74 68 65 20 63 75 72 72 65 ccepts t he curre
$005110 6E 74 20 20 20 20 20 20 70 6F 73 69 74 69 6F 6E nt position
$005120 2E 20 54 68 65 20 45 20 63 6F 6D 6D 61 6E 64 20 . The E command
$005130 77 6F 72 6B 73 20 74 68 65 20 73 61 6D 65 20 20 works th e same
$005140 77 61 79 20 6F 6E 20 74 68 65 20 65 6E 64 20 70 way on t he end p
$005150 6F 69 6E 74 65 72 2E 20 20 20 20 20 20 20 20 20 ointer.
$005160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005170 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005190 20 20 20 20 20 42 79 20 70 72 65 73 73 69 6E 67 By pressing
$0051A0 20 54 2C 20 79 6F 75 20 63 61 6E 20 65 6E 74 65 T, you can ente
$0051B0 72 20 61 20 20 20 20 20 74 69 74 6C 65 20 66 6F r a title fo
$0051C0 72 20 74 68 65 20 63 68 61 72 74 2E 20 54 68 69 r the ch art. Thi
$0051D0 73 20 64 61 74 61 20 63 61 6E 6E 6F 74 20 62 65 s data c annot be
$0051E0 65 6E 74 65 72 65 64 20 77 69 74 68 20 74 68 65 entered with the
$0051F0 20 44 61 74 61 20 45 64 69 74 6F 72 20 62 65 63 Data Ed itor bec
$005200 61 75 73 65 20 79 6F 75 6D 69 67 68 74 20 77 61 ause you might wa
$005210 6E 74 20 74 6F 20 63 68 61 6E 67 65 20 69 74 20 nt to ch ange it
$005220 64 65 70 65 6E 64 69 6E 67 20 6F 6E 20 74 68 65 dependin g on the
$005230 64 61 74 61 20 79 6F 75 20 63 68 6F 6F 73 65 20 data you choose
$005240 74 6F 20 67 72 61 70 68 2E 20 50 72 65 73 73 69 to graph . Pressi
$005250 6E 67 20 20 20 20 20 20 72 65 74 75 72 6E 20 77 ng return w
$005260 69 74 68 6F 75 74 20 65 6E 74 65 72 69 6E 67 20 ithout e ntering
$005270 61 6E 79 74 68 69 6E 67 20 61 63 63 65 70 74 73 anything accepts
$005280 77 68 61 74 20 69 73 20 74 68 65 72 65 2E 20 4F what is there. O
$005290 74 68 65 72 77 69 73 65 20 77 68 61 74 65 76 65 therwise whateve
$0052A0 72 20 79 6F 75 20 20 20 65 6E 74 65 72 20 63 6F r you enter co
$0052B0 6D 70 6C 65 74 65 6C 79 20 6F 76 65 72 77 72 69 mpletely overwri
$0052C0 74 65 73 20 61 6E 79 20 65 78 69 73 74 69 6E 67 tes any existing
$0052D0 74 69 74 6C 65 2E 20 20 20 20 20 20 20 20 20 20 title.
$0052E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0052F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005310 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005320 20 20 20 20 20 59 6F 75 20 6D 61 79 20 68 61 76 You may hav
$005330 65 20 6E 6F 74 69 63 65 64 20 74 68 61 74 20 61 e notice d that a
$005340 73 20 79 6F 75 20 20 20 63 68 61 6E 67 65 64 20 s you changed
$005350 77 68 69 63 68 20 63 6F 6C 75 6D 6E 73 20 6F 72 which co lumns or
$005360 20 72 6F 77 73 20 77 65 72 65 20 74 6F 20 62 65 rows we re to be
$005370 67 72 61 70 68 65 64 2C 20 74 77 6F 20 66 69 65 graphed, two fie
$005380 6C 64 73 20 61 74 20 74 68 65 20 62 6F 74 74 6F lds at t he botto
$005390 6D 20 6F 66 20 74 68 65 73 63 72 65 65 6E 2C 20 m of the screen,
$0053A0 6C 61 62 65 6C 65 64 20 6C 65 61 73 74 20 61 6E labeled least an
$0053B0 64 20 6D 6F 73 74 20 76 61 6C 75 65 2C 20 20 20 d most v alue,
$0053C0 77 65 72 65 20 75 70 64 61 74 65 64 2E 20 54 68 were upd ated. Th
$0053D0 65 73 65 20 6E 75 6D 62 65 72 73 20 64 65 74 65 ese numb ers dete
$0053E0 72 6D 69 6E 65 20 20 20 77 68 61 74 20 6B 69 6E rmine what kin
$0053F0 64 20 6F 66 20 72 61 6E 67 65 20 79 6F 75 20 63 d of ran ge you c
$005400 61 6E 20 67 69 76 65 20 74 68 65 20 59 20 20 20 an give the Y
$005410 61 78 69 73 2E 20 50 72 65 73 73 20 59 20 74 6F axis. Pr ess Y to
$005420 20 73 65 74 20 75 70 20 74 68 61 74 20 72 61 6E set up that ran
$005430 67 65 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 ge.
$005440 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005450 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005460 20 20 20 20 20 54 68 65 20 66 69 72 73 74 20 6E The first n
$005470 75 6D 62 65 72 20 79 6F 75 20 65 6E 74 65 72 20 umber yo u enter
$005480 69 73 20 74 68 65 20 20 6E 75 6D 62 65 72 20 74 is the number t
$005490 68 61 74 20 77 69 6C 6C 20 61 70 70 65 61 72 20 hat will appear
$0054A0 61 74 20 74 68 65 20 62 6F 74 74 6F 6D 20 6F 66 at the b ottom of
$0054B0 74 68 65 20 59 20 61 78 69 73 2E 20 49 74 20 6D the Y ax is. It m
$0054C0 75 73 74 20 6E 6F 74 20 62 65 20 67 72 65 61 74 ust not be great
$0054D0 65 72 20 74 68 61 6E 20 74 68 65 20 6C 65 61 73 er than the leas
$0054E0 74 20 76 61 6C 75 65 20 72 65 61 64 6F 75 74 20 t value readout
$0054F0 74 6F 20 69 74 73 20 6C 65 66 74 2E 20 54 68 65 to its l eft. The
$005500 6E 65 78 74 20 6E 75 6D 62 65 72 20 69 73 20 74 next num ber is t
$005510 68 65 20 68 69 67 68 20 73 65 74 74 69 6E 67 20 he high setting
$005520 66 6F 72 20 74 68 65 20 59 20 61 78 69 73 2C 20 for the Y axis,
$005530 77 68 69 63 68 20 6D 75 73 74 20 6E 6F 74 20 62 which mu st not b
$005540 65 20 6C 65 73 73 20 74 68 61 6E 20 74 68 65 20 e less t han the
$005550 72 65 61 64 69 6E 67 20 74 6F 20 69 74 73 20 6C reading to its l
$005560 65 66 74 2E 20 54 68 65 20 6C 61 73 74 20 6E 75 eft. The last nu
$005570 6D 62 65 72 20 69 73 20 74 68 65 20 59 20 69 6E mber is the Y in
$005580 63 72 65 6D 65 6E 74 2E 20 49 74 20 64 65 74 65 crement. It dete
$005590 72 6D 69 6E 65 73 20 77 68 61 74 20 74 68 65 20 rmines w hat the
$0055A0 69 6E 63 72 65 6D 65 6E 74 20 6F 66 20 74 68 65 incremen t of the
$0055B0 20 6E 75 6D 62 65 72 73 20 6F 6E 20 74 68 65 20 numbers on the
$0055C0 59 20 61 78 69 73 20 20 77 69 6C 6C 20 62 65 20 Y axis will be
$0055D0 61 73 20 77 65 6C 6C 20 61 73 20 68 6F 77 20 63 as well as how c
$0055E0 6C 6F 73 65 6C 79 20 73 70 61 63 65 64 20 20 20 losely s paced
$0055F0 74 68 65 20 67 72 69 64 20 6C 69 6E 65 73 20 77 the grid lines w
$005600 69 6C 6C 20 62 65 2E 20 59 6F 75 20 63 61 6E 20 ill be. You can
$005610 65 6E 74 65 72 20 20 20 61 6E 79 20 70 6F 73 69 enter any posi
$005620 74 69 76 65 20 76 61 6C 75 65 20 69 6E 20 68 65 tive val ue in he
$005630 72 65 2C 20 73 6F 20 6C 6F 6E 67 20 61 73 20 20 re, so l ong as
$005640 74 68 65 20 70 72 6F 67 72 61 6D 20 64 65 74 65 the prog ram dete
$005650 72 6D 69 6E 65 73 20 74 68 61 74 20 74 68 65 72 rmines t hat ther
$005660 65 20 69 73 20 20 20 20 65 6E 6F 75 67 68 20 72 e is enough r
$005670 6F 6F 6D 20 61 6C 6F 6E 67 20 74 68 65 20 61 78 oom alon g the ax
$005680 69 73 20 66 6F 72 20 61 6C 6C 20 74 68 65 20 20 is for a ll the
$005690 6E 65 63 65 73 73 61 72 79 20 6C 61 62 65 6C 73 necessar y labels
$0056A0 2E 20 54 68 65 20 70 72 6F 67 72 61 6D 20 77 69 . The pr ogram wi
$0056B0 6C 6C 20 20 20 20 20 20 69 6E 66 6F 72 6D 20 79 ll inform y
$0056C0 6F 75 20 69 66 20 79 6F 75 20 65 6E 74 65 72 20 ou if yo u enter
$0056D0 61 20 62 61 64 20 76 61 6C 75 65 20 68 65 72 65 a bad va lue here
$0056E0 6F 72 20 69 6E 20 61 6E 79 20 6F 66 20 74 68 65 or in an y of the
$0056F0 20 6F 74 68 65 72 20 59 20 70 61 72 61 6D 65 74 other Y paramet
$005700 65 72 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 ers.
$005710 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005720 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005730 20 20 20 20 20 50 72 65 73 73 69 6E 67 20 43 20 Pre ssing C
$005740 66 72 6F 6D 20 74 68 65 20 63 6F 6D 6D 61 6E 64 from the command
$005750 20 6D 6F 64 65 20 20 20 73 69 6D 70 6C 79 20 63 mode simply c
$005760 68 61 6E 67 65 73 20 74 68 65 20 63 6F 6C 6F 72 hanges t he color
$005770 20 73 65 74 74 69 6E 67 2E 20 54 68 69 73 20 20 setting . This
$005780 73 65 74 74 69 6E 67 20 61 66 66 65 63 74 73 20 setting affects
$005790 6F 6E 6C 79 20 74 68 65 20 61 70 70 65 61 72 61 only the appeara
$0057A0 6E 63 65 20 6F 66 20 20 62 61 72 20 63 68 61 72 nce of bar char
$0057B0 74 73 2E 20 4C 69 6E 65 73 20 61 72 65 20 6B 65 ts. Line s are ke
$0057C0 79 65 64 20 62 79 20 73 79 6D 62 6F 6C 73 20 20 yed by s ymbols
$0057D0 72 61 74 68 65 72 20 74 68 61 6E 20 63 6F 6C 6F rather t han colo
$0057E0 72 20 69 6E 20 65 69 74 68 65 72 20 63 61 73 65 r in eit her case
$0057F0 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
$005800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005810 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005820 20 20 20 20 20 50 72 65 73 73 69 6E 67 20 47 20 Pre ssing G
$005830 61 6C 6C 6F 77 73 20 79 6F 75 20 74 6F 20 63 68 allows y ou to ch
$005840 61 6E 67 65 20 74 68 65 67 72 69 64 20 64 65 6E ange the grid den
$005850 73 69 74 79 2E 20 41 20 73 65 74 74 69 6E 67 20 sity. A setting
$005860 6F 66 20 7A 65 72 6F 20 6D 65 61 6E 73 20 6E 6F of zero means no
$005870 67 72 69 64 2C 20 77 68 69 6C 65 20 61 20 73 65 grid, wh ile a se
$005880 74 74 69 6E 67 20 6F 66 20 66 6F 75 72 20 63 61 tting of four ca
$005890 75 73 65 73 20 74 68 65 70 72 6F 67 72 61 6D 20 uses the program
$0058A0 74 6F 20 75 73 65 20 73 6F 6C 69 64 20 6C 69 6E to use s olid lin
$0058B0 65 73 20 66 6F 72 20 74 68 65 20 67 72 69 64 2E es for t he grid.
$0058C0 54 68 65 20 73 65 74 74 69 6E 67 73 20 69 6E 20 The sett ings in
$0058D0 62 65 74 77 65 65 6E 20 61 72 65 20 66 6F 72 20 between are for
$0058E0 76 61 72 69 6F 75 73 20 64 65 6E 73 69 74 69 65 various densitie
$0058F0 73 20 6F 66 20 64 6F 74 74 65 64 20 6C 69 6E 65 s of dot ted line
$005900 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 20 s.
$005910 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005930 20 20 20 20 20 20 20 20 20 20 20 20 20 46 69 6E Fin
$005940 61 6C 6C 79 2C 20 70 72 65 73 73 69 6E 67 20 63 ally, pr essing c
$005950 6F 6E 74 72 6F 6C 2D 50 20 20 20 20 20 20 20 20 ontrol-P
$005960 70 72 6F 63 65 73 73 65 73 20 74 68 65 20 63 68 processe s the ch
$005970 61 72 74 2C 20 61 73 20 69 6E 20 74 68 65 20 50 art, as in the P
$005980 69 65 20 43 68 61 72 74 70 72 6F 67 72 61 6D 2E ie Chart program.
$005990 20 49 66 20 79 6F 75 20 77 61 6E 74 20 74 6F 20 If you want to
$0059A0 72 65 74 75 72 6E 20 74 6F 20 4D 65 6E 75 20 20 return t o Menu
$0059B0 77 69 74 68 6F 75 74 20 70 72 6F 63 65 73 73 69 without processi
$0059C0 6E 67 20 61 20 63 68 61 72 74 2C 20 75 73 65 20 ng a cha rt, use
$0059D0 20 20 20 20 20 20 20 20 63 6F 6E 74 72 6F 6C 2D control-
$0059E0 51 2E 20 54 68 65 20 6F 70 74 69 6F 6E 73 20 61 Q. The o ptions a
$0059F0 76 61 69 6C 61 62 6C 65 20 61 66 74 65 72 20 20 vailable after
$005A00 74 68 65 20 63 68 61 72 74 20 69 73 20 70 72 6F the char t is pro
$005A10 63 65 73 73 65 64 20 61 72 65 20 74 68 65 20 73 cessed a re the s
$005A20 61 6D 65 20 61 73 20 20 74 68 65 79 20 77 65 72 ame as they wer
$005A30 65 20 69 6E 20 74 68 65 20 50 69 65 20 43 68 61 e in the Pie Cha
$005A40 72 74 20 70 72 6F 67 72 61 6D 2E 20 20 20 20 20 rt progr am.
$005A50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005A60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005A70 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 61 Tha
$005A80 74 20 63 6F 6D 70 6C 65 74 65 73 20 74 68 69 73 t comple tes this
$005A90 20 69 6E 74 72 6F 64 75 63 74 69 6F 6E 20 74 6F introdu ction to
$005AA0 74 68 65 20 53 6F 66 74 47 72 61 70 68 20 67 72 the Soft Graph gr
$005AB0 61 70 68 69 6E 67 20 73 79 73 74 65 6D 2E 20 57 aphing s ystem. W
$005AC0 68 61 74 20 20 20 20 20 66 6F 6C 6C 6F 77 73 20 hat follows
$005AD0 69 73 20 61 20 72 65 66 65 72 65 6E 63 65 20 6C is a ref erence l
$005AE0 69 73 74 20 74 6F 20 74 68 65 20 20 20 20 20 20 ist to t he
$005AF0 63 6F 6D 6D 61 6E 64 73 20 69 6E 20 74 68 65 20 commands in the
$005B00 76 61 72 69 6F 75 73 20 70 72 6F 67 72 61 6D 73 various programs
$005B10 2E 20 47 6F 6F 64 20 20 6C 75 63 6B 20 77 69 74 . Good luck wit
$005B20 68 20 53 6F 66 74 47 72 61 70 68 2C 20 61 6E 64 h SoftGr aph, and
$005B30 20 66 65 65 6C 20 66 72 65 65 20 74 6F 20 20 20 feel fr ee to
$005B40 63 6F 6E 74 61 63 74 20 53 6F 66 74 61 6C 6B 20 contact Softalk
$005B50 77 69 74 68 20 61 6E 79 20 70 72 6F 62 6C 65 6D with any problem
$005B60 73 20 79 6F 75 20 20 20 6D 61 79 20 68 61 76 65 s you may have
$005B70 20 77 69 74 68 20 65 69 74 68 65 72 20 74 68 65 with ei ther the
$005B80 20 64 69 73 6B 20 6F 72 20 74 68 65 20 20 20 20 disk or the
$005B90 70 72 6F 67 72 61 6D 73 2E 20 20 20 20 20 20 20 programs .
$005BA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005BB0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005BC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005BD0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005BE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005BF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005C00 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005C10 20 20 20 20 52 65 66 65 72 65 6E 63 65 20 43 61 Refe rence Ca
$005C20 72 64 20 20 20 20 20 20 20 20 20 20 20 20 20 20 rd
$005C30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005C40 20 4D 65 6E 75 20 20 20 20 20 20 20 20 20 20 20 Menu
$005C50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005C60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005C70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005C80 20 20 20 20 20 52 75 6E 20 61 6E 79 20 70 72 6F Run any pro
$005C90 67 72 61 6D 20 69 6E 20 53 6F 66 74 47 72 61 70 gram in SoftGrap
$005CA0 68 20 66 72 6F 6D 20 20 74 68 65 20 6D 61 69 6E h from the main
$005CB0 20 6D 65 6E 75 2E 20 53 65 6C 65 63 74 20 74 68 menu. S elect th
$005CC0 65 20 64 69 73 6B 20 6D 65 6E 75 20 74 6F 20 20 e disk m enu to
$005CD0 6C 6F 61 64 20 6F 72 20 73 61 76 65 20 64 61 74 load or save dat
$005CE0 61 20 66 69 6C 65 73 20 6F 72 20 70 69 63 74 75 a files or pictu
$005CF0 72 65 20 20 20 20 20 20 66 69 6C 65 73 2C 20 74 re files, t
$005D00 6F 20 63 61 74 61 6C 6F 67 20 74 68 65 20 64 69 o catalo g the di
$005D10 73 6B 2C 20 6F 72 20 74 6F 20 6C 6F 6F 6B 20 20 sk, or t o look
$005D20 61 74 20 61 20 70 69 63 74 75 72 65 20 69 6E 20 at a pic ture in
$005D30 6D 65 6D 6F 72 79 2E 20 20 20 20 20 20 20 20 20 memory.
$005D40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005D50 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005D60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005D70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005D80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005D90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005DA0 20 20 20 20 20 44 61 74 61 20 45 64 69 74 6F 72 Dat a Editor
$005DB0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005DC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005DD0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005DE0 20 20 20 20 20 20 20 20 20 20 20 20 20 41 6C 6C All
$005DF0 20 63 6F 6D 6D 61 6E 64 20 6D 6F 64 65 20 63 6F command mode co
$005E00 6D 6D 61 6E 64 73 20 61 72 65 20 20 20 20 20 20 mmands a re
$005E10 61 63 74 69 76 61 74 65 64 20 62 79 20 70 72 65 activate d by pre
$005E20 73 73 69 6E 67 20 74 68 65 20 63 6F 6E 74 72 6F ssing th e contro
$005E30 6C 20 6B 65 79 20 61 74 74 68 65 20 73 61 6D 65 l key at the same
$005E40 20 74 69 6D 65 20 61 73 20 74 68 65 20 6B 65 79 time as the key
$005E50 20 69 6E 64 69 63 61 74 65 64 2E 20 20 20 20 20 indicat ed.
$005E60 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005E70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005E80 20 20 20 20 20 20 20 20 20 49 20 20 20 20 20 20 I
$005E90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005EA0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005EB0 4A 20 4B 20 2D 20 4D 6F 76 65 20 74 68 65 20 63 J K - Mo ve the c
$005EC0 75 72 73 6F 72 20 66 72 6F 6D 20 63 65 6C 6C 20 ursor fr om cell
$005ED0 74 6F 20 20 20 20 20 20 20 4D 20 20 20 20 20 20 to M
$005EE0 20 63 65 6C 6C 2E 20 41 6C 73 6F 20 72 65 74 75 cell. A lso retu
$005EF0 72 6E 20 61 6E 64 20 72 69 67 68 74 20 20 20 20 rn and r ight
$005F00 20 20 20 20 20 20 20 20 20 61 72 72 6F 77 2E 20 arrow.
$005F10 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005F20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005F30 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005F40 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005F50 20 4C 20 20 2D 20 45 6E 74 65 72 20 6C 65 67 65 L - En ter lege
$005F60 6E 64 73 2E 20 20 20 20 20 20 20 20 20 20 20 20 nds.
$005F70 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005F80 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005F90 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005FA0 20 58 20 20 2D 20 45 6E 74 65 72 20 6C 61 62 65 X - En ter labe
$005FB0 6C 73 20 69 6E 20 58 20 66 69 65 6C 64 20 20 20 ls in X field
$005FC0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005FD0 20 61 75 74 6F 6D 61 74 69 63 61 6C 6C 79 2E 20 automat ically.
$005FE0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$005FF0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006000 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006010 20 20 20 20 20 20 20 20 20 43 20 20 2D 20 43 6C C - Cl
$006020 65 61 72 20 74 68 65 20 64 61 74 61 20 66 69 65 ear the data fie
$006030 6C 64 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 ld.
$006040 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006050 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006060 20 20 20 20 20 20 20 20 20 41 20 20 2D 20 41 64 A - Ad
$006070 64 20 61 20 6C 69 6E 65 20 61 74 20 74 68 65 20 d a line at the
$006080 69 6E 64 69 63 61 74 65 64 20 72 6F 77 2E 20 20 indicate d row.
$006090 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0060A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0060B0 20 20 20 20 20 20 20 20 20 44 20 20 2D 20 44 65 D - De
$0060C0 6C 65 74 65 20 61 20 6C 69 6E 65 20 66 72 6F 6D lete a l ine from
$0060D0 20 74 68 65 20 69 6E 64 69 63 61 74 65 64 20 20 the ind icated
$0060E0 20 20 20 20 20 20 20 20 20 72 6F 77 2E 20 20 20 row.
$0060F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006100 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006110 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006120 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006130 20 51 20 20 2D 20 51 75 69 74 20 61 6E 64 20 72 Q - Qu it and r
$006140 65 74 75 72 6E 20 74 6F 20 6D 65 6E 75 2E 20 20 eturn to menu.
$006150 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006160 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006170 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006180 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0061A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0061B0 20 20 20 20 20 20 50 69 65 20 43 68 61 72 74 20 Pi e Chart
$0061C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0061D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0061E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0061F0 20 20 20 20 20 20 20 20 53 70 61 63 65 20 2D 20 Space -
$006200 45 6E 74 65 72 20 6E 65 77 20 73 65 74 74 69 6E Enter ne w settin
$006210 67 20 61 74 20 70 61 72 61 6D 65 74 65 72 20 20 g at par ameter
$006220 20 20 20 20 20 20 20 20 20 20 20 69 6E 64 69 63 indic
$006230 61 74 65 64 20 62 79 20 63 75 72 73 6F 72 2E 20 ated by cursor.
$006240 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006250 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006260 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006270 52 65 74 75 72 6E 20 2D 20 41 63 63 65 70 74 20 Return - Accept
$006280 6E 65 77 6C 79 20 65 6E 74 65 72 65 64 20 73 65 newly en tered se
$006290 74 74 69 6E 67 2E 20 20 20 20 20 20 20 20 20 20 tting.
$0062A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0062B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0062C0 41 72 72 6F 77 73 20 2D 20 4D 6F 76 65 20 70 6F Arrows - Move po
$0062D0 69 6E 74 65 72 20 74 6F 20 6E 65 77 20 70 61 72 inter to new par
$0062E0 61 6D 65 74 65 72 2E 20 20 20 20 20 20 20 20 20 ameter.
$0062F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006300 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006310 43 6F 6E 74 72 6F 6C 2D 50 20 2D 20 50 72 6F 63 Control- P - Proc
$006320 65 73 73 20 63 68 61 72 74 2E 20 20 20 20 20 20 ess char t.
$006330 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006340 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006350 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006360 43 6F 6E 74 72 6F 6C 2D 51 20 2D 20 51 75 69 74 Control- Q - Quit
$006370 20 61 6E 64 20 72 65 74 75 72 6E 20 74 6F 20 4D and ret urn to M
$006380 65 6E 75 2E 20 20 20 20 20 20 20 20 20 20 20 20 enu.
$006390 45 73 63 61 70 65 20 61 62 6F 72 74 73 2E 20 20 Escape a borts.
$0063A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0063B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0063C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0063D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0063E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0063F0 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 ....
$006400 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006410 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006420 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006430 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006440 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006450 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006460 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006470 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006480 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$006490 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0064A0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0064B0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0064C0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0064D0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0064E0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ........ ........
$0064F0 00 00 00 00 00 00 00 00 00 00 00 00 63 68 61 72 ........ ....char
$006500 74 20 6F 66 20 74 68 69 73 20 64 61 74 61 2E 20 t of thi s data.
$006510 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006520 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006530 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006540 20 42 20 2D 20 53 65 74 20 62 65 67 69 6E 6E 69 B - Set beginni
$006550 6E 67 20 6F 66 20 58 20 61 78 69 73 2E 20 20 20 ng of X axis.
$006560 20 20 20 20 20 20 20 20 20 20 20 20 20 41 72 72 Arr
$006570 6F 77 73 20 6D 6F 76 65 20 70 6F 69 6E 74 65 72 ows move pointer
$006580 20 6F 6E 65 20 66 69 65 6C 64 2E 20 20 20 20 20 one fie ld.
$006590 20 20 20 20 20 52 65 74 75 72 6E 20 61 63 63 65 Ret urn acce
$0065A0 70 74 73 20 69 6E 64 69 63 61 74 65 64 20 66 69 pts indi cated fi
$0065B0 65 6C 64 2E 20 20 20 20 20 20 20 20 20 20 20 20 eld.
$0065C0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0065D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0065E0 20 45 20 2D 20 53 65 74 20 65 6E 64 20 6F 66 20 E - Set end of
$0065F0 58 20 61 78 69 73 2E 20 20 20 20 20 20 20 20 20 X axis.
$006600 20 20 20 20 20 20 20 20 20 20 20 20 20 53 61 6D Sam
$006610 65 20 61 73 20 42 2E 20 20 20 20 20 20 20 20 20 e as B.
$006620 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006630 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006640 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006650 20 20 20 20 20 20 20 20 20 54 20 2D 20 45 6E 74 T - Ent
$006660 65 72 20 74 69 74 6C 65 20 66 6F 72 20 63 68 61 er title for cha
$006670 72 74 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 rt.
$006680 20 20 20 20 20 52 65 74 75 72 6E 20 61 63 63 65 Ret urn acce
$006690 70 74 73 20 74 69 74 6C 65 20 6C 69 73 74 65 64 pts titl e listed
$0066A0 20 69 66 20 20 20 20 20 20 20 20 20 20 20 20 20 if
$0066B0 6E 6F 74 68 69 6E 67 20 68 61 73 20 62 65 65 6E nothing has been
$0066C0 20 63 68 61 6E 67 65 64 2E 20 20 20 20 20 20 20 changed .
$0066D0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0066E0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0066F0 20 20 20 20 20 20 20 20 20 59 20 2D 20 53 65 74 Y - Set
$006700 20 6C 6F 77 20 76 61 6C 75 65 2C 20 68 69 67 68 low val ue, high
$006710 20 76 61 6C 75 65 2C 20 61 6E 64 20 20 20 20 20 value, and
$006720 20 20 20 20 20 20 20 20 69 6E 63 72 65 6D 65 6E incremen
$006730 74 20 6F 66 20 59 20 61 78 69 73 2E 20 20 20 20 t of Y a xis.
$006740 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006750 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006760 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006770 20 43 20 2D 20 54 6F 67 67 6C 65 20 63 6F 6C 6F C - Tog gle colo
$006780 72 20 6F 6E 20 61 6E 64 20 6F 66 66 2E 20 20 20 r on and off.
$006790 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0067A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0067B0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0067C0 20 47 20 2D 20 53 65 74 20 67 72 69 64 20 64 65 G - Set grid de
$0067D0 6E 73 69 74 79 20 66 72 6F 6D 20 30 20 74 6F 20 nsity fr om 0 to
$0067E0 34 2E 20 20 20 20 20 20 20 20 20 20 20 30 20 2D 4. 0 -
$0067F0 20 4E 6F 20 67 72 69 64 2E 20 20 20 20 20 20 20 No grid .
$006800 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006810 20 20 20 20 20 34 20 2D 20 53 6F 6C 69 64 20 6C 4 - Solid l
$006820 69 6E 65 73 20 66 6F 72 20 67 72 69 64 2E 20 20 ines for grid.
$006830 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006840 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006850 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006860 63 6F 6E 74 72 6F 6C 2D 50 20 2D 20 50 72 6F 63 control- P - Proc
$006870 65 73 73 20 74 68 65 20 63 68 61 72 74 2E 20 20 ess the chart.
$006880 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006890 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0068A0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$0068B0 63 6F 6E 74 72 6F 6C 2D 51 20 2D 20 51 75 69 74 control- Q - Quit
$0068C0 20 61 6E 64 20 72 65 74 75 72 6E 20 74 6F 20 6D and ret urn to m
$0068D0 65 6E 75 2E 20 20 20 20 20 20 20 20 20 45 73 63 enu. Esc
$0068E0 61 70 65 20 61 62 6F 72 74 73 2E 20 20 20 20 20 ape abor ts.
$0068F0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006900 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006910 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006920 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006930 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006950 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006960 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
$006970 20 20 20 20 20 20 20 20 .. .. .. .. .. .. .. ..
** END **
Text found in 077_Volume_77.dsk/HELLO.B05.bas:
10 REM ************
20 REM * SOFTGRAPH HELLO
30 REM ************
40 HGR : TEXT
50 HOME :D$ = CHR$(4)
60 PRINT D$;"BLOAD LOGOFILE.1"
70 PRINT D$;"BLOAD LOGOFILE.2"
80 POKE -16297,0: POKE -16302,0
90 PRINT D$;"RUN LOGO"
Text found in 077_Volume_77.dsk/INSTRUCTIONS.bas:
10 HOME : VTAB 10: HTAB 13: PRINT "WAIT FOR LOAD"
20 PRINT CHR$(4);"BLOAD DOC.ML"
30 PRINT CHR$(4);"BLOAD DOCFILE,A5000"
40 LN = PEEK(43617) *256 + PEEK(43616):LOC = 5000:ND = LOC +LN -920
50 HOME : VTAB 8
60 PRINT "ARROWS -MOVE UP OR DOWN ONE LINE": PRINT "< AND > -MOVE UP OR DOWN ONE PAGE": PRINT "CONTROL-B -MOVE TO BEGINNING"
70 PRINT "CONTROL-E -MOVE TO END": PRINT "CONTROL-P -PRINT FILE"
80 PRINT "ESCAPE -TO QUIT TO MENU"
90 VTAB 17: HTAB 1: PRINT "DO YOU HAVE LOWER CASE (Y OR N)?";: GET A$
100 IF A$ = "N" THEN POKE 4961,223: GOTO 130
110 IF A$ = "Y" THEN POKE 4961,255: GOTO 130
120 GOTO 90
130 POKE 250, INT(LOC/256)
140 POKE 249,LOC - PEEK(250) *256
150 CALL 4930
160 GET A$
170 A = ASC(A$)
180 IF A = 8 THEN LOC = LOC -40: GOTO 250
184 IF A = 62 THEN LOC = LOC +920: GOTO 250
186 IF A = 60 THEN LOC = LOC -920: GOTO 250
190 IF A = 21 THEN LOC = LOC +40: GOTO 250
200 IF A = 2 THEN LOC = 5000: GOTO 130
210 IF A = 5 THEN LOC = ND: GOTO 130
220 IF A = 27 THEN PRINT : PRINT CHR$(4);"RUN SOFTGRAPH"
230 IF A = 16 THEN 290
240 GOTO 160
250 IF LOC <5000 THEN LOC = 5000
260 IF LOC >ND THEN LOC = ND: GOTO 130
270 IF A = 21 THEN CALL 4950: GOTO 160
280 GOTO 130
290 REM PRINT
300 HOME : VTAB 10
310 PRINT "IS YOUR PRINTER ON WITH PAPER SET?";
320 GET A$
330 IF A$ = "N" THEN 130
340 IF A$ < >"Y" THEN 320
350 POKE 4961,255
360 PRINT : PRINT CHR$(4);"PR#1"
370 LOC = 5000: POKE 249,136: POKE 250,19
380 PRINT : PRINT : PRINT : PRINT : PRINT : PRINT :LN = 6
390 CALL 4950: PRINT :LN = LN +1
400 IF PEEK(249) + PEEK(250) *256 > = ND +920 THEN 430
410 IF LN = 60 THEN PRINT : PRINT : PRINT : PRINT : PRINT : PRINT : GOTO 380
420 GOTO 390
430 PRINT CHR$(4);"PR#0"
440 PRINT CHR$(4);"RUN SOFTGRAPH"
Text found in 077_Volume_77.dsk/LOGO.bas:
10 REM ************
20 REM * SOFTGRAPH LOGO
30 REM ************
40 ONERR GOTO 460
50 POKE -16368,0: POKE -16304,0
60 IF PEEK( -16384) >127 THEN 490
70 DIM AM(16,2)
80 FOR X = 1 TO 16
90 READ AM(X,1),AM(X,2): NEXT X
100 X = 0
110 FOR T = 1 TO 50: GOSUB 420: FOR DL = 1 TO 55: NEXT DL
120 IF PEEK( -16384) >127 THEN 490
130 NEXT T
140 IF PEEK( -16384) >127 THEN 490
150 HCOLOR= 5
160 FOR XP = 5 TO 269 STEP 6
170 HPLOT XP,80 TO XP,146
180 FOR DL = 1 TO 16: NEXT DL
190 IF XP = 269 THEN 230
200 GOSUB 420
210 HPLOT XP +6,80 TO XP +6,146
220 FOR DL = 1 TO 16: NEXT DL
230 NEXT XP
240 IF PEEK( -16384) >127 THEN 490
250 FOR YP = 80 TO 146 STEP 6
260 HPLOT 5,YP TO 270,YP
270 GOSUB 420
280 FOR DL = 1 TO 45: NEXT DL
290 NEXT YP
300 FOR T = 1 TO 30: GOSUB 420: FOR DL = 1 TO 55: NEXT DL
310 IF PEEK( -16384) >127 THEN 490
320 NEXT T
330 GOSUB 420: POKE 250,146: POKE 251,79: CALL 16770
340 FOR T = 1 TO 60: GOSUB 420: FOR DL = 1 TO 55: NEXT DL
350 IF PEEK( -16384) >127 THEN 490
360 NEXT T
370 GOTO 490
380 DATA 0,96,135,96,14,97,149,97
390 DATA 28,98,163,98,42,99,177,99
400 DATA 56,100,191,100,70,101,205,101
410 DATA 84,102,219,102,98,103,233,103
420 X = X +1: IF X >16 THEN X = 1
430 POKE 250,AM(X,1): POKE 251,AM(X,2)
440 CALL 16840
450 RETURN
460 POKE 216,0:ER = PEEK(222)
470 IF ER = 255 THEN 490
480 STOP
490 POKE -16368,0: TEXT : HOME
500 PRINT : PRINT CHR$(4);"RUN SOFTGRAPH"
Text found in 077_Volume_77.dsk/MENU.bas:
10 DIM F$(15):D$ = CHR$(4)
20 ONERR GOTO 50
30 N = N +1: READ F$(N): IF N <15 THEN 30
40 NM = 15: GOTO 70
50 POKE 216,0:ER = PEEK(222):NM = N -1
60 IF ER < >42 THEN PRINT "ERROR #";ER; CHR$(7);: END
70 TEXT : HOME : INVERSE
80 VTAB 4: HTAB 6: PRINT "*** SOFTGRAPH MAIN MENU ***"
90 NORMAL : PRINT : PRINT
100 FOR N = 1 TO 15
110 IF F$(N) = "" THEN N = 15: GOTO 130
120 PRINT SPC( 8);N;" - ";F$(N)
125 IF NM <9 THEN PRINT
130 NEXT N
135 VT = PEEK(37) +2: IF VT >23 THEN VT = 23
140 VTAB VT: HTAB 6: PRINT "ENTER NUMBER OF CHOICE: ";: CALL -958: INPUT "";N$
150 N = VAL(N$): IF N <1 OR N >NM THEN 140
160 IF N >NM -2 THEN 180
170 HOME : VTAB 10: PRINT "INSERT PROGRAM DISK IN DRIVE 1": PRINT "AND HIT A KEY. USE ESCAPE TO ABORT.";: GET A$: IF A$ = CHR$(27) THEN 70$(4);"RUN";F$(N);",D1"
175 PRINT : PRINT CHR$(4);"RUN";F$(N);",D1"
180 IF N = NM THEN HOME : END
190 REM DOS MENU
200 HOME : VTAB 3: HTAB 6: PRINT "SOFTGRAPH DISK OPTIONS MENU"
205 PRINT : PRINT
210 HTAB 9: PRINT "1- LOAD A DATA FILE"
220 HTAB 9: PRINT "2- SAVE A DATA FILE"
225 PRINT
230 HTAB 9: PRINT "3- LOAD A CHART"
240 HTAB 9: PRINT "4- SAVE A CHART"
245 PRINT
250 HTAB 9: PRINT "5- VIEW THE HIRES SCREEN"
260 HTAB 9: PRINT "6- CATALOG"
265 PRINT
270 HTAB 9: PRINT "7- BACK TO MAIN MENU"
280 VTAB 18: HTAB 7: PRINT "SELECT AN OPTION: ";: CALL -958: INPUT "";N$
290 M = INT( VAL(N$)): IF M <1 OR M >7 THEN 280
300 ON M GOTO 302,302,302,302,640,600,70
302 HOME : IF INT(M/2) = M/2 THEN PRINT "SAVE ";: GOTO 304
303 PRINT "LOAD ";
304 IF M <3 THEN F$ = "D.": PRINT "A DATAFILE": GOTO 310
305 F$ = "C.": PRINT "A CHART"
310 VTAB 8: PRINT "FILENAME (,S#,D#): ";F$
320 VTAB 8: HTAB 20: PRINT F$;: CALL -958: GET N$:N = ASC(N$)
330 IF N = 8 THEN 370
340 IF N = 13 THEN 390
350 IF N <32 THEN 320
360 F$ = F$ +N$: GOTO 320
370 IF LEN(F$) <2 THEN F$ = "": GOTO 320
380 F$ = LEFT$(F$, LEN(F$) -1): GOTO 320
390 IF F$ = "" OR F$ = "C." OR F$ = "D." THEN 190
400 ONERR GOTO 480
410 PRINT
420 PRINT D$;"VERIFY";F$
430 POKE 216,0
440 IF M = 1 OR M = 3 THEN 510
450 VTAB 10: HTAB 1: PRINT "OVERWRITE EXISTING FILE (Y OR N)? ";: GET N$: IF N$ = "N" THEN 190
460 IF N$ < >"Y" THEN 450
470 PRINT : PRINT D$;"DELETE";F$: GOTO 510
480 POKE 216,0:ER = PEEK(222)
490 IF ER < >6 THEN PRINT "DOS ERROR #";ER; CHR$(7);: GET N$: GOTO 190
500 IF M = 1 OR M = 3 THEN PRINT "FILE NOT FOUND"; CHR$(7);: GET N$: GOTO 190
510 ON M GOTO 520,540,560,580
520 PRINT D$;"BLOAD";F$
530 GOTO 190
540 PRINT D$;"BSAVE";F$;",A25056,L800"
550 GOTO 190
560 PRINT D$;"BLOAD";F$;",A16384"
570 GOTO 190
580 PRINT D$;"BSAVE";F$;",A16384,L8192"
590 GOTO 190
600 PRINT : PRINT "CATALOG DRIVE #";: GET A$
610 HOME :N = VAL(A$): IF N <1 OR N >2 THEN N = 1
620 PRINT : PRINT D$;"CATALOG,D";N
630 PRINT : PRINT "HIT A KEY.";: GET A$: GOTO 190
640 POKE -16299,0: POKE -16302,0: POKE -16297,0: POKE -16304,0
650 GET A$: TEXT : GOTO 190
1000 DATA INSTRUCTIONS
1010 DATA DATA EDITOR,PIE CHART,BAR/LINE CHART
1090 DATA DISK MENU,QUIT
Text found in 077_Volume_77.dsk/PIE CHART.bas:
10 CLEAR : HOME : DIM L$(18): DIM V(18): DIM L1$(18): DIM V1(18): DIM LE$(4)
20 DIM PR(6):PR(1) = 1:PR(2) = 1:PR(3) = 1:PR(4) = 1:PR(5) = 1:PR(6) = 0: REM PARAMETERS
30 DEF FN X(C) = RA * SIN(C) +XC: DEF FN Y(C) = RA *.9 * COS(C) +YC
40 PI = 3.1415926:DL = 25056: REM CONSTANTS
50 VTAB 10: HTAB 15: PRINT "PIE CHART"
60 REM LEGEND READER
70 REM LEGENDS IN LE$(HF)
80 FOR HF = 2 TO 5
90 VF = -1: GOSUB 2500:LE$(HF -1) = W$
100 IF LEN(LE$(HF -1)) = 8 THEN 120
110 LE$(HF -1) = LE$(HF -1) +" ": GOTO 100: REM ONE SPACE
120 VF = 0: GOSUB 2500:LE$(HF -1) = LE$(HF -1) +W$
130 NEXT HF
140 REM OPTIONS I/O
150 TV = 0:LL = 0:NG = 0:CN = 0:NF = 0
160 HOME : HTAB 5: INVERSE : PRINT "SOFTGRAPH PIE CHART GENERATOR": NORMAL
170 POKE 32,7: VTAB 3
180 FOR HF = 1 TO 4: PRINT "LEGEND ";HF;": ";LE$(HF): NEXT HF
190 POKE 32,1: PRINT
200 PRINT "HOW MANY LABEL FIELDS (1 OR 2)?": PRINT : REM PR(1)
210 PRINT "CHART WHICH COLUMN (1 THROUGH 4)?": PRINT : REM PR(2)
220 PRINT "SORT: 0=DON'T; 1=VALUES; 2=LABELS:": PRINT : REM PR(3)
230 PRINT "COLOR: 0=NO; 1=YES:": PRINT : REM PR(4)
240 PRINT "STYLE: 0=SIDEWAYS; 1=UPRIGHT:": PRINT : REM PR(5)
250 PRINT "ROTATION: -180 TO 180:": PRINT : REM PR(6)
260 TEXT
270 FOR P = 1 TO 6: VTAB 6 +2 *P: HTAB 37: PRINT PR(P);: NEXT P
280 VTAB 20: HTAB 1: PRINT "ARROWS MOVE CURSOR": PRINT "SPACE SELECTS QUESTION": PRINT "CONTROL-P PROCESSES PIE CHART": PRINT "CONTROL-Q QUITS TO MENU"
290 P = 1
300 VTAB 6 +2 *P: HTAB 1: FLASH : PRINT ">";: NORMAL
310 HTAB 1: GET A$
320 A = ASC(A$)
330 IF A = 8 OR A = 21 THEN VTAB 6 +2 *P: HTAB 1: PRINT " ";: GOTO 380
340 IF A = 32 THEN 430
350 IF A = 17 THEN 2400
360 IF A = 16 THEN 550
370 GOTO 310
380 REM POINTER MOVE
390 P = P + SGN(A -10)
400 IF P = 0 THEN P = 6
410 IF P = 7 THEN P = 1
420 GOTO 300
430 REM GET NEW VALUE
440 VTAB 24: HTAB 1: INVERSE : PRINT "ENTER NEW VALUE: ";: NORMAL :W$ = ""
450 VTAB 24: HTAB 18: PRINT W$;
460 GET A$:A = ASC(A$)
470 IF A = 8 THEN 510
480 IF A = 13 THEN PR(P) = VAL(W$): VTAB 6 +2 *P: HTAB 37: PRINT PR(P);: CALL -868: VTAB 24: HTAB 1: CALL -868: GOTO 300
490 IF A <45 OR A >57 OR A = 46 OR A = 47 OR LEN(W$) = 4 THEN 450
500 W$ = W$ +A$: GOTO 450
510 IF LEN(W$) = 1 THEN W$ = "": PRINT CHR$(8);" ";
520 IF W$ = "" THEN 450
530 W$ = LEFT$(W$, LEN(W$) -1)
540 PRINT CHR$(8);" ";: GOTO 450
550 REM START PROCESSING
560 REM CHECK PARAMETERS
570 VTAB 6 +2 *P: HTAB 1: PRINT " ";
580 P = 1: IF PR(P) <1 OR PR(P) >2 THEN 650
590 P = 2: IF PR(P) <1 OR PR(P) >4 THEN 650
600 P = 3: IF PP(P) <0 OR PR(P) >2 THEN 650
610 P = 4: IF PR(P) <0 OR PR(P) >1 THEN 650
620 P = 5: IF PR(P) <0 OR PR(P) >1 THEN 650
630 P = 6: IF ABS(PR(P)) >180 THEN 650
640 GOTO 660
650 VTAB 6 +2 *P: HTAB 1: FLASH : PRINT ">"; CHR$(7);: NORMAL : VTAB 24: HTAB 1: PRINT "VALUE ILLEGAL";: GET A$: GOTO 310
660 REM READ LABELS
670 HOME : PRINT "READING LABELS": PRINT
680 FOR VF = 1 TO 18
690 HF = 1: GOSUB 2500:L$(VF) = W$
700 IF LEN(W$) = 0 THEN NF = VF -1:VF = 18: GOTO 750
710 IF PR(1) = 1 THEN 750
720 IF LEN(L$(VF)) = 8 THEN 740
730 L$(VF) = L$(VF) +" ": GOTO 720: REM ONE SPACE
740 HF = 2: GOSUB 2500:L$(VF) = L$(VF) +W$
750 HTAB 5: PRINT L$(VF): NEXT VF: IF NF = 0 THEN NF = 18
760 REM READ VALUES
770 PRINT "READING VALUES": PRINT
780 HF = PR(2) +1: FOR VF = 1 TO NF
790 GOSUB 2500
800 V(VF) = VAL(W$)
810 NEXT VF
820 LL = 0:GF = 1:NG = NF
830 FOR VF = 1 TO NF
840 IF V(VF) >0 THEN L1$(GF) = L$(VF):V1(GF) = V(VF): GOTO 880
850 PRINT "CANNOT GRAPH ";L$(VF);": ";V(VF)
860 SF = 1
870 NG = NG -1: GOTO 910
880 IF LEN(L$(VF)) >LL THEN LL = LEN(L$(VF))
890 HTAB 5: PRINT L$(VF);: HTAB 25: PRINT V(VF)
900 GF = GF +1
910 NEXT VF
920 PRINT : IF NG = 0 THEN PRINT "NO GRAPHABLE FIELDS FOUND": PRINT "HIT A KEY";: GET A$: GOTO 140
930 IF SF = 0 THEN 980
940 SF = 0: PRINT "OKAY TO CONTINUE? ";
950 GET A$: IF A$ < >"Y" AND A$ < >"N" THEN 950
960 IF A$ = "N" THEN 140
970 PRINT : PRINT
980 REM SORTING
990 IF PR(3) = 0 THEN 1130
1000 PRINT "SORTING"
1010 FOR VF = 1 TO NG
1020 CF = 1
1030 FOR GF = 2 TO NG
1040 ON PR(3) GOTO 1070,1050
1050 IF L1$(GF) V1(CF) THEN CF = GF
1080 NEXT GF
1090 L$(VF) = L1$(CF):V(VF) = V1(CF):L1$(CF) = CHR$(95):V1(CF) = 0
1100 TV = TV +V(VF)
1110 NEXT VF
1120 GOTO 1180
1130 REM COPY DATA
1140 FOR VF = 1 TO NG
1150 L$(VF) = L1$(VF):V(VF) = V1(VF)
1160 TV = TV +V(VF)
1170 NEXT VF
1180 IF PR(3) = 0 THEN 1230
1190 PRINT : FOR VF = 1 TO NG
1200 HTAB 5
1210 PRINT L$(VF); TAB( 25);V(VF)
1220 NEXT : PRINT
1230 PRINT "LEGEND: ";LE$(PR(2))
1240 PRINT : PRINT "LONGEST LABEL IS ";LL;" CHARACTERS"
1250 PRINT "TOTAL OF ALL VALUES IS ";TV
1260 PRINT : PRINT "FORMATTING CHART"
1270 REM FORMAT CHART
1280 D = 1:F = 2: IF PR(5) = 0 THEN D = 4
1290 CO = PR(4)
1300 IF PR(5) = 0 THEN 1360
1310 ROT= 0
1320 RA = (280 -((LL +3) *6 +20))/2: IF RA >88 THEN RA = 88: REM RADIUS
1330 XC = RA +4:YC = RA +12
1340 XW = 2 *RA +12:YW = (192 -(NF *7))/2
1350 GOTO 1400
1360 RA = (280 -((NG +4) *7))/2: IF RA >92 THEN RA = 92: REM RADIUS
1370 ROT= 48
1380 XC = RA +13:YC = 96
1390 XW = RA *2 +12:YW = (192 +((LL +4) *6))/2
1400 HGR2 : HCOLOR= 3: HPLOT 0,0 TO 279,0 TO 279,191 TO 0,191 TO 0,0: SCALE= 1
1410 RA = RA +1: HPLOT FN X(0), FN Y(0)
1420 FOR CD = 0 TO 2 *PI STEP .04: HPLOT TO FN X(CD), FN Y(CD): NEXT :RA = RA -1
1430 C1 = PR(6) *2 *PI/360
1440 FOR NS = 1 TO NG
1450 C2 = C1 +V(NS) *2 *PI/TV
1460 ON PR(4) +1 GOSUB 3000,2900
1470 C1 = C2
1480 NEXT
1490 PR(4) = CO
1500 W$ = LE$(PR(2)): IF PR(5) = 0 THEN X = 3:Y = (192 +( LEN(W$) *6))/2: GOSUB 9000: GOTO 1520
1510 X = (280 -( LEN(W$) *6))/2:Y = 3: GOSUB 9000
1520 HOME : GET A$
1530 TEXT : VTAB 1: PRINT "PIE CHART COMPLETED"
1540 PRINT : PRINT " 1. RETURN TO MENU"
1550 PRINT " 2. SEE CHART"
1560 PRINT " 3. RESET PARAMETERS"
1570 VTAB 7: HTAB 1: PRINT "WHAT NOW? ";: CALL -868: GET A$:A = VAL(A$)
1573 IF A <1 OR A >3 THEN 1570
1575 PRINT A$;
1577 GET A$: IF A$ = CHR$(8) THEN 1570
1580 IF A$ < > CHR$(13) THEN 1577
1590 ON A GOTO 2400,1600,140
1600 POKE -16304,0: POKE -16299,0: GOTO 1520
2400 REM RETURN TO MENU
2410 HOME : VTAB 10: PRINT "INSERT PROGRAM DISK IN DRIVE 1": PRINT "AND HIT ANY KEY. USE ESCAPE TO ABORT.";: GET A$
2415 IF A$ = CHR$(27) THEN 140
2420 PRINT : PRINT CHR$(4);"RUN MENU,D1"
2500 REM READ WORD
2510 PL = DL +40 *(VF +1) +8 *(HF -1) -1
2520 WL = 0:W$ = ""
2530 FOR LOC = 8 TO 1 STEP -1
2540 IF PEEK(PL +LOC) >32 THEN WL = LOC:LOC = 1
2550 NEXT LOC
2560 IF WL = 0 THEN RETURN
2570 FOR LOC = 1 TO WL
2580 W$ = W$ + CHR$( PEEK(PL +LOC))
2590 NEXT LOC
2600 RETURN
2700 REM LABEL ROUTINE
2710 W$ = "- " +L$(NS)
2720 IF PR(5) = 1 THEN 2780
2730 REM SIDEWAYS
2740 XW = XW +7:X = XW:Y = YW -12: GOSUB 9000
2750 IF PR(4) = 0 THEN 2840
2760 HCOLOR= CN: FOR Y = YW -2 TO YW +3: HPLOT XW,Y TO XW +4,Y: NEXT Y
2770 GOTO 2850
2780 REM UPRIGHT
2790 YW = YW +7:X = XW +12:Y = YW: GOSUB 9000
2800 IF PR(4) = 0 THEN 2840
2810 HCOLOR= CN: FOR X = XW -3 TO XW +2: HPLOT X,YW TO X,YW +5: NEXT X
2820 HCOLOR= INT(CN/5) *4 +3: HPLOT XW -3,YW TO XW +2,YW TO XW +2,YW +5 TO XW -3,YW +5 TO XW -3,YW
2830 GOTO 2850
2840 DRAW CN +22 AT XW,YW
2850 RETURN
2900 REM COLOR SLICE ROUTINE
2910 CN = CN +1: IF CN = 4 THEN CN = 5
2920 IF CN = 7 THEN PR(4) = 0:CN = 1: GOTO 3020
2930 HCOLOR= CN
2940 FOR CD = C1 TO C2 STEP .01
2950 HPLOT XC,YC TO FN X(CD), FN Y(CD)
2960 NEXT
2970 HCOLOR= INT(CN/5) *4 +3: HPLOT FN X(C1), FN Y(C1) TO XC,YC TO FN X(C2), FN Y(C2)
2980 GOSUB 2700
2990 RETURN
3000 REM B&W SLICE ROUTINE
3010 CN = CN +1
3020 HCOLOR= 3
3030 HPLOT XC,YC TO FN X(C2), FN Y(C2)
3040 RA = RA *.7: DRAW CN +22 AT FN X((C1 +C2)/2), FN Y((C1 +C2)/2):RA = RA/.7
3050 GOSUB 2700
3060 RETURN
9000 REM HGR PRINT
9010 C = 6: IF D >2 THEN C = -6
9020 ROT= 16 *(D +F +1)
9030 FOR CT = 1 TO LEN(W$)
9040 L = ASC( MID$ (W$,CT,1))
9050 IF 64 48 AND L <58 THEN SH = L -37: GOTO 9160
9070 IF L = 32 THEN 9170
9080 IF L >39 AND L <48 THEN SH = L -36: GOTO 9160
9090 IF L = 48 THEN SH = 37: GOTO 9160
9100 IF L >34 AND L <38 THEN SH = L -34: GOTO 9160
9110 IF L = 61 THEN SH = 21: GOTO 9160
9120 IF L = 63 THEN SH = 22: GOTO 9160
9130 IF L = 94 THEN SH = 49: GOTO 9160
9140 PRINT "ERR- NO SHAPE FOR CHARACTER: "; CHR$(L); CHR$(7)
9150 GOTO 9170
9160 DRAW SH AT X,Y
9170 IF D/2 < > INT(D/2) THEN X = X +C: GOTO 9190
9180 IF D/2 = INT(D/2) THEN Y = Y +C
9190 NEXT CT
9200 RETURN
Text found in 077_Volume_77.dsk/SOFTGRAPH.bas:
10 TEXT : HOME : SCALE= 1: ROT= 0
20 VTAB 10: HTAB 11: PRINT "SOFTGRAPH: LOADING"
30 POKE 232,0: POKE 233,96
40 PRINT CHR$(4);"BLOAD SOFTGRAPH.B-FILES"
50 PRINT CHR$(4);"RUN MENU"
- Addeddate
- 2014-08-18 01:02:55
- Emulator
- apple2e
- Emulator_ext
- dsk
- Identifier
- riag_010_077_Volume_77
- Scanner
- Internet Archive Python library 0.7.0
comment
Reviews
301 Views
DOWNLOAD OPTIONS
IN COLLECTIONS
Uploaded by Jason Scott on