ADD
FILE INFORMATION
FILENAME(S): ADD
FILE TYPE(S): PRG
FILE SIZE: 5K
FIRST SEEN: 2025-11-30 21:05:47
APPEARS ON: 3 disk(s)
FILE HASH
1b0cccf4c9b1d3be1f4c3361f13513128b4e9bb7119a4733f47d29a9b2b0a2b4
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CS TAPES PET 08 | ADD | PRG | DuncanTwain | 8 | 9 | DOWNLOAD FILE |
| UTILITY PET 04 | ADD | PRG | DuncanTwain | 19 | 0 | DOWNLOAD FILE |
| CURSOR 2 | ADD | PRG | DuncanTwain | 26 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 17 04 00 00 9C 3A 97 35 39 34 36 38 2C 31 |.......:.59468,1|
00000010: 34 3A 50 4B B2 31 34 00 40 04 01 00 8F 20 50 47 |4:PK.14.@.... PG|
00000020: 4D 20 43 4F 50 59 52 49 47 48 54 20 28 43 29 20 |M COPYRIGHT (C) |
00000030: 31 39 37 39 20 44 4F 4E 41 4C 44 20 52 4F 53 53 |1979 DONALD ROSS|
00000040: 00 5D 04 02 00 8F 20 43 55 52 53 4F 52 20 23 38 |.].... CURSOR #8|
00000050: 2C 20 4D 41 52 43 48 2C 20 31 39 37 39 00 7E 04 |, MARCH, 1979.~.|
00000060: 03 00 8F 20 42 4F 58 20 35 35 30 2C 20 47 4F 4C |... BOX 550, GOL|
00000070: 45 54 41 2C 20 43 41 2E 20 39 33 30 31 37 00 84 |ETA, CA. 93017..|
00000080: 04 04 00 3A 00 9C 04 0A 00 8F 20 41 53 20 4F 46 |...:...... AS OF|
00000090: 20 4D 41 59 20 32 36 2C 31 39 37 39 00 B9 04 5A | MAY 26,1979...Z|
000000A0: 00 50 47 24 B2 22 41 44 44 22 3A 4E 4D 24 B2 22 |.PG$."ADD":NM$."|
000000B0: 38 22 3A 8D 36 32 30 30 30 00 DD 04 64 00 52 24 |8":.62000...d.R$|
000000C0: B2 22 12 52 45 54 55 52 4E 92 22 3A 44 24 B2 22 |.".RETURN.":D$."|
000000D0: 11 11 11 11 11 11 11 11 11 11 11 11 22 00 F5 04 |............"...|
000000E0: 6E 00 46 4C B2 31 3A 8B C2 28 34 39 31 35 32 29 |n.FL.1:..(49152)|
000000F0: A7 46 4C B2 30 00 1E 05 78 00 99 22 D7 48 41 54 |.FL.0...x..".HAT|
00000100: 27 53 20 59 4F 55 52 20 4E 41 4D 45 3F 20 22 3B |'S YOUR NAME? ";|
00000110: 3A 8D 36 30 30 30 30 3A 46 24 B2 49 4E 24 00 58 |:.60000:F$.IN$.X|
00000120: 05 82 00 8B 46 24 B2 22 22 A7 46 24 B2 22 C7 52 |....F$."".F$.".R|
00000130: 55 4E 44 4F 4F 4E 22 3A 99 3A 99 22 C9 27 4C 4C |UNDOON":.:.".'LL|
00000140: A0 43 41 4C 4C A0 59 4F 55 20 22 3B 46 24 3B 22 |.CALL.YOU ";F$;"|
00000150: 2C 20 54 48 45 4E 2E 22 00 5E 05 87 00 99 00 6C |, THEN.".^.....l|
00000160: 05 8C 00 86 41 28 31 30 2C 31 30 29 00 88 05 C8 |....A(10,10)....|
00000170: 00 51 4C B2 32 34 35 3A 8B C2 28 34 39 31 35 32 |.QL.245:..(49152|
00000180: 29 A7 51 4C B2 32 31 36 00 96 05 84 03 52 B2 AB |).QL.216.....R..|
00000190: 31 3A 43 B2 AB 31 00 9F 05 8E 03 41 B2 31 36 00 |1:C..1.....A.16.|
000001A0: A7 05 E8 03 45 B2 30 00 BB 05 F2 03 81 58 B2 31 |....E.0......X.1|
000001B0: A4 43 3A 53 28 58 29 B2 30 3A 82 00 EA 05 4C 04 |.C:S(X).0:....L.|
000001C0: 4E B2 52 3A 50 52 24 B2 22 C8 4F 57 20 4D 41 4E |N.R:PR$.".OW MAN|
000001D0: 59 20 52 4F 57 53 3F 20 22 3A 8D 31 30 30 30 30 |Y ROWS? ":.10000|
000001E0: 3A 8B 4E B3 30 A7 31 31 30 30 00 1A 06 56 04 8B |:.N.0.1100...V..|
000001F0: 4E B3 32 B0 4E B1 39 A7 99 22 CF 4E 4C 59 20 32 |N.2.N.9..".NLY 2|
00000200: 20 54 4F 20 39 20 52 4F 57 53 20 41 4C 4C 4F 57 | TO 9 ROWS ALLOW|
00000210: 45 44 2E 22 3A 89 31 31 30 30 00 22 06 60 04 52 |ED.":.1100.".`.R|
00000220: B2 4E 00 54 06 6A 04 4E B2 43 3A 50 52 24 B2 22 |.N.T.j.N.C:PR$."|
00000230: C8 4F 57 20 4D 41 4E 59 20 43 4F 4C 55 4D 4E 53 |.OW MANY COLUMNS|
00000240: 3F 20 22 3A 8D 31 30 30 30 30 3A 8B 4E B3 30 A7 |? ":.10000:.N.0.|
00000250: 31 31 33 30 00 87 06 74 04 8B 4E B3 31 B0 4E B1 |1130...t..N.1.N.|
00000260: 39 A7 99 22 CF 4E 4C 59 20 31 20 54 4F 20 39 20 |9..".NLY 1 TO 9 |
00000270: 43 4F 4C 55 4D 4E 53 20 41 4C 4C 4F 57 45 44 2E |COLUMNS ALLOWED.|
00000280: 22 3A 89 31 31 33 30 00 8F 06 7E 04 43 B2 4E 00 |":.1130...~.C.N.|
00000290: 9A 06 B0 04 81 58 B2 31 A4 52 00 B1 06 BA 04 41 |.....X.1.R.....A|
000002A0: 28 58 2C 31 29 B2 B5 28 BB 28 31 29 AC 39 29 AA |(X,1)..(.(1).9).|
000002B0: 31 00 D2 06 C4 04 42 28 58 29 B2 41 28 58 2C 31 |1.....B(X).A(X,1|
000002C0: 29 3A 53 28 31 29 B2 53 28 31 29 AA 41 28 58 2C |):S(1).S(1).A(X,|
000002D0: 31 29 00 E0 06 CE 04 8B 43 B3 32 A7 31 32 39 30 |1)......C.2.1290|
000002E0: 00 EB 06 D8 04 81 59 B2 32 A4 43 00 01 07 E2 04 |......Y.2.C.....|
000002F0: 41 28 58 2C 59 29 B2 B5 28 BB 28 31 29 AC 31 30 |A(X,Y)..(.(1).10|
00000300: 29 00 19 07 EC 04 42 28 58 29 B2 31 30 AC 42 28 |).....B(X).10.B(|
00000310: 58 29 AA 41 28 58 2C 59 29 00 2E 07 F6 04 53 28 |X).A(X,Y).....S(|
00000320: 59 29 B2 53 28 59 29 AA 41 28 58 2C 59 29 00 35 |Y).S(Y).A(X,Y).5|
00000330: 07 00 05 82 59 00 3C 07 0A 05 82 58 00 46 07 14 |....Y.<....X.F..|
00000340: 05 99 22 93 11 22 00 51 07 1E 05 81 58 B2 31 A4 |.."..".Q....X.1.|
00000350: 52 00 60 07 28 05 99 A3 31 35 29 3B 42 28 58 29 |R.`.(...15);B(X)|
00000360: 00 67 07 32 05 82 58 00 89 07 3C 05 99 A3 31 35 |.g.2..X...<...15|
00000370: 29 3B C8 28 22 91 2B 11 9D C0 C0 C0 C0 C0 C0 C0 |);.(".+.........|
00000380: C0 C0 C0 22 2C 43 AA 36 29 00 91 07 46 05 4B B2 |...",C.6)...F.K.|
00000390: 30 00 A5 07 50 05 4D B2 31 35 AA 43 AA 34 30 AC |0...P.M.15.C.40.|
000003A0: 28 52 AA 33 29 00 B3 07 5A 05 81 5A B2 43 A4 31 |(R.3)...Z..Z.C.1|
000003B0: A9 AB 31 00 C3 07 64 05 53 28 5A 29 B2 53 28 5A |..1...d.S(Z).S(Z|
000003C0: 29 AA 4B 00 E0 07 6E 05 50 B2 B5 28 53 28 5A 29 |).K...n.P..(S(Z)|
000003D0: AD 31 30 29 3A 42 B2 53 28 5A 29 AB 50 AC 31 30 |.10):B.S(Z).P.10|
000003E0: 00 F5 07 78 05 50 4B B2 33 32 37 36 38 AA 4D AB |...x.PK.32768.M.|
000003F0: 28 43 AB 5A 29 00 0F 08 82 05 97 50 4B 2C 31 36 |(C.Z)......PK,16|
00000400: 30 3A 8D 31 33 30 30 30 3A 97 50 4B 2C 44 47 00 |0:.13000:.PK,DG.|
00000410: 2F 08 8C 05 8B 42 B3 B1 47 A7 53 37 B2 30 3A 4A |/....B..G.S7.0:J|
00000420: B2 42 3A 8D 31 33 35 30 30 3A 89 31 34 31 30 00 |.B:.13500:.1410.|
00000430: 41 08 96 05 8B 53 39 B3 B1 30 A7 8D 31 33 32 30 |A....S9..0..1320|
00000440: 30 00 4A 08 A0 05 53 35 B2 30 00 5B 08 AA 05 4B |0.J...S5.0.[...K|
00000450: B2 B5 28 53 28 5A 29 AD 31 30 29 00 69 08 B4 05 |..(S(Z).10).i...|
00000460: 8B 5A B2 31 89 31 35 34 30 00 89 08 BE 05 50 4B |.Z.1.1540.....PK|
00000470: B2 33 32 37 36 38 AA 4D AB 28 52 AA 32 29 AC 34 |.32768.M.(R.2).4|
00000480: 30 AB 28 43 AB 5A AA 31 29 00 A7 08 C8 05 97 50 |0.(C.Z.1)......P|
00000490: 4B 2C 31 36 30 3A 8D 31 33 30 30 30 3A 97 50 4B |K,160:.13000:.PK|
000004A0: 2C 31 32 38 AA 44 47 00 C7 08 D2 05 8B 47 B3 B1 |,128.DG......G..|
000004B0: 4B A7 53 37 B2 31 3A 4A B2 4B 3A 8D 31 33 35 30 |K.S7.1:J.K:.1350|
000004C0: 30 3A 89 31 34 38 30 00 D9 08 DC 05 8B 53 39 B3 |0:.1480......S9.|
000004D0: B1 30 A7 8D 31 33 32 30 30 00 E6 08 E6 05 97 50 |.0..13200......P|
000004E0: 4B AA 31 2C 33 32 00 EF 08 F0 05 53 35 B2 30 00 |K.1,32.....S5.0.|
000004F0: F6 08 FA 05 82 5A 00 04 09 04 06 8B 4B B2 30 A7 |.....Z......K.0.|
00000500: 31 35 39 30 00 1B 09 0E 06 50 4B B2 33 32 37 36 |1590.....PK.3276|
00000510: 38 AA 4D AB 28 43 AB 5A AA 31 29 00 35 09 18 06 |8.M.(C.Z.1).5...|
00000520: 97 50 4B 2C 31 36 30 3A 8D 31 33 30 30 30 3A 97 |.PK,160:.13000:.|
00000530: 50 4B 2C 44 47 00 55 09 22 06 8B 4B B3 B1 47 A7 |PK,DG.U."..K..G.|
00000540: 53 37 B2 31 3A 4A B2 4B 3A 8D 31 33 35 30 30 3A |S7.1:J.K:.13500:|
00000550: 89 31 35 36 30 00 67 09 2C 06 8B 53 39 B3 B1 30 |.1560.g.,..S9..0|
00000560: A7 8D 31 33 32 30 30 00 86 09 36 06 97 33 32 37 |..13200...6..327|
00000570: 36 38 AA 4D AB 28 52 AA 32 29 AC 34 30 AB 28 43 |68.M.(R.2).40.(C|
00000580: AB 5A 29 2C 39 36 00 9B 09 40 06 99 22 13 11 11 |.Z),96...@.."...|
00000590: 11 11 11 11 11 11 11 11 11 11 22 00 C6 09 4A 06 |.........."...J.|
000005A0: 8B 45 B2 31 A7 99 22 D4 48 41 54 20 49 53 20 43 |.E.1..".HAT IS C|
000005B0: 4F 52 52 45 43 54 2C 20 22 3B 46 24 3B 22 2E 22 |ORRECT, ";F$;"."|
000005C0: 3A 89 31 36 34 30 00 F5 09 54 06 99 22 D9 4F 55 |:.1640...T..".OU|
000005D0: 20 41 52 45 20 54 48 45 20 C7 D2 C5 C1 D4 C5 D3 | ARE THE .......|
000005E0: D4 2C 20 22 3B 46 24 3B 22 2E 20 D9 4F 55 20 44 |., ";F$;". .OU D|
000005F0: 49 44 22 3A 99 00 23 0A 5E 06 99 22 54 48 41 54 |ID":..#.^.."THAT|
00000600: 20 50 52 4F 42 4C 45 4D 20 57 49 54 48 4F 55 54 | PROBLEM WITHOUT|
00000610: 20 4D 41 4B 49 4E 47 20 41 20 4D 49 53 54 41 4B | MAKING A MISTAK|
00000620: 45 2E 22 00 43 0A 68 06 99 22 11 D7 41 4E 54 20 |E.".C.h.."..ANT |
00000630: 41 4E 4F 54 48 45 52 20 50 52 4F 42 4C 45 4D 3F |ANOTHER PROBLEM?|
00000640: 20 22 3B 00 53 0A 72 06 59 4E B2 31 3A 8D 31 34 | ";.S.r.YN.1:.14|
00000650: 30 30 30 00 65 0A 7C 06 8B 59 4E B2 31 A7 99 3A |000.e.|..YN.1..:|
00000660: 89 31 30 30 30 00 6D 0A 86 06 99 3A 80 00 8C 0A |.1000.m....:....|
00000670: 10 27 99 50 52 24 3B 3A 8D 36 30 30 30 30 3A 8B |.'.PR$;:.60000:.|
00000680: 49 4E 24 B2 22 22 A7 31 30 30 35 30 00 92 0A 15 |IN$."".10050....|
00000690: 27 99 00 B2 0A 1A 27 81 49 49 B2 31 A4 C3 28 49 |'.....'.II.1..(I|
000006A0: 4E 24 29 3A 47 24 B2 CA 28 49 4E 24 2C 49 49 2C |N$):G$..(IN$,II,|
000006B0: 31 29 00 E5 0A 24 27 3A 8B 47 24 B3 22 30 22 B0 |1)...$':.G$."0".|
000006C0: 47 24 B1 22 39 22 A7 99 22 CE 4F 20 22 3B 47 24 |G$."9"..".O ";G$|
000006D0: 3B 22 27 53 2C 20 50 4C 45 41 53 45 2E 22 3A 89 |;"'S, PLEASE.":.|
000006E0: 31 30 30 30 30 00 EE 0A 2E 27 3A 82 49 49 00 FD |10000....':.II..|
000006F0: 0A 38 27 4E B2 C5 28 49 4E 24 29 3A 8E 00 0B 0B |.8'N..(IN$):....|
00000700: 42 27 8B 4E B1 B2 30 A7 99 4E 3B 00 13 0B 4C 27 |B'.N..0..N;...L'|
00000710: 99 3A 8E 00 23 0B C8 32 53 57 B2 31 36 30 3A 54 |.:..#..2SW.160:T|
00000720: 4D B2 30 00 39 0B D2 32 A1 47 24 3A 8B 47 24 B3 |M.0.9..2.G$:.G$.|
00000730: B1 22 22 A7 31 33 30 34 30 00 5E 0B DC 32 8B 54 |."".13040.^..2.T|
00000740: 49 B1 54 4D A7 97 50 4B 2C 53 57 3A 53 57 B2 33 |I.TM..PK,SW:SW.3|
00000750: 35 31 AB 53 57 3A 54 4D B2 54 49 AA 33 30 00 69 |51.SW:TM.TI.30.i|
00000760: 0B E6 32 89 31 33 30 31 30 00 82 0B F0 32 8B 47 |..2.13010....2.G|
00000770: 24 B3 22 30 22 B0 47 24 B1 22 39 22 A7 31 33 30 |$."0".G$."9".130|
00000780: 31 30 00 98 0B FA 32 47 B2 C5 28 47 24 29 3A 44 |10....2G..(G$):D|
00000790: 47 B2 47 AA 34 38 3A 8E 00 CB 0B 2C 33 52 4F 57 |G.G.48:....,3ROW|
000007A0: B2 32 34 3A 8D 31 33 39 30 30 3A 99 A3 31 34 29 |.24:.13900:..14)|
000007B0: 3B 22 91 C8 C9 D4 20 12 D2 C5 D4 D5 D2 CE 92 20 |;".... ........ |
000007C0: D7 C8 C5 CE 20 D2 C5 C1 C4 D9 22 00 D1 0B 36 33 |.... ....."...63|
000007D0: 8E 00 E3 0B 90 33 52 4F 57 B2 31 34 3A 8D 31 33 |.....3ROW.14:.13|
000007E0: 39 30 30 00 1F 0C 9A 33 81 49 B2 52 4F 57 A4 32 |900....3.I.ROW.2|
000007F0: 34 3A 99 22 20 20 20 20 20 20 20 20 20 20 20 20 |4:." |
00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000810: 20 20 20 20 20 20 20 20 20 20 20 22 3A 82 49 00 | ":.I.|
00000820: 2F 0C A4 33 53 39 B2 30 3A 99 22 13 22 3A 8E 00 |/..3S9.0:.".":..|
00000830: 52 0C BC 34 45 B2 31 3A 53 35 B2 53 35 AA 31 3A |R..4E.1:S5.S5.1:|
00000840: 8B 53 35 B3 32 AF 53 39 B3 B1 30 A7 8D 31 33 32 |.S5.2.S9..0..132|
00000850: 30 30 00 64 0C C6 34 52 4F 57 B2 31 36 3A 8D 31 |00.d..4ROW.16:.1|
00000860: 33 39 30 30 00 9A 0C D0 34 8B 53 35 B1 31 A7 99 |3900....4.S5.1..|
00000870: 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" |
00000880: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000890: 20 20 20 20 20 20 20 20 91 22 00 AF 0C DA 34 53 | ."....4S|
000008A0: 39 B2 31 3A 8B 53 37 B2 30 A7 31 33 35 36 30 00 |9.1:.S7.0.13560.|
000008B0: D3 0C E4 34 99 46 24 3B 22 2C 20 54 48 45 A0 43 |...4.F$;", THE.C|
000008C0: 41 52 52 59 20 49 53 20 4E 4F 54 22 3B 47 3B 22 |ARRY IS NOT";G;"|
000008D0: 9D 2E 22 00 DE 0C EE 34 89 31 33 35 37 30 00 06 |.."....4.13570..|
000008E0: 0D F8 34 99 22 D3 4F 52 52 59 2C 20 22 3B 46 24 |..4.".ORRY, ";F$|
000008F0: 3B 22 2C 22 3B 47 3B 22 49 53 20 49 4E 43 4F 52 |;",";G;"IS INCOR|
00000900: 52 45 43 54 2E 22 00 25 0D 02 35 8B 53 35 B3 32 |RECT.".%..5.S5.2|
00000910: A7 99 22 D4 52 59 A0 41 47 41 49 4E 2E 22 3A 89 |..".RY.AGAIN.":.|
00000920: 31 33 35 39 35 00 53 0D 0C 35 99 22 D4 48 45 20 |13595.S..5.".HE |
00000930: 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 20 49 |CORRECT ANSWER I|
00000940: 53 22 3B 4A 3B 22 9D 2E 20 20 D7 48 45 4E 20 59 |S";J;".. .HEN Y|
00000950: 4F 55 22 00 90 0D 16 35 99 22 55 4E 44 45 52 53 |OU"....5."UNDERS|
00000960: 54 41 4E 44 20 59 4F 55 52 20 45 52 52 4F 52 2C |TAND YOUR ERROR,|
00000970: 20 54 59 50 45 20 49 4E A0 54 48 45 22 3A 99 22 | TYPE IN.THE":."|
00000980: 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 2E 22 |CORRECT ANSWER."|
00000990: 00 96 0D 1B 35 8E 00 AF 0D 4C 36 99 22 13 22 3A |....5....L6.".":|
000009A0: 97 51 4C 2C 52 4F 57 3A 99 22 91 22 3B 3A 8E 00 |.QL,ROW:.".";:..|
000009B0: BD 0D B0 36 53 57 B2 31 3A 54 4D B2 30 00 D3 0D |...6SW.1:TM.0...|
000009C0: BA 36 A1 47 24 3A 8B 47 24 B3 B1 22 22 A7 31 34 |.6.G$:.G$.."".14|
000009D0: 30 35 30 00 E4 0D C4 36 8B 54 49 B3 54 4D A7 31 |050....6.TI.TM.1|
000009E0: 34 30 31 30 00 03 0E CE 36 99 CA 28 22 FF 20 22 |4010....6..(". "|
000009F0: 2C 53 57 2C 31 29 3B 22 9D 22 3B 3A 53 57 B2 33 |,SW,1);".";:SW.3|
00000A00: AB 53 57 00 17 0E D8 36 54 4D B2 54 49 AA 33 30 |.SW....6TM.TI.30|
00000A10: 3A 89 31 34 30 31 30 00 2F 0E E2 36 8B 47 24 B2 |:.14010./..6.G$.|
00000A20: 22 59 22 A7 59 4E B2 31 3A 89 31 34 30 38 30 00 |"Y".YN.1:.14080.|
00000A30: 47 0E EC 36 8B 47 24 B2 22 4E 22 A7 59 4E B2 30 |G..6.G$."N".YN.0|
00000A40: 3A 89 31 34 30 38 30 00 5C 0E F6 36 8B 47 24 B3 |:.14080.\..6.G$.|
00000A50: B1 C7 28 31 33 29 A7 31 34 30 32 30 00 76 0E 00 |..(13).14020.v..|
00000A60: 37 99 CA 28 22 CE CF 20 D9 C5 D3 22 2C 31 AA 33 |7..(".. ...",1.3|
00000A70: AC 59 4E 2C 33 29 00 7C 0E 0A 37 8E 00 9D 0E 60 |.YN,3).|..7....`|
00000A80: EA 49 4E 24 B2 22 20 22 3A 5A 54 B2 54 49 3A 5A |.IN$." ":ZT.TI:Z|
00000A90: 43 B2 32 3A 5A 44 24 B2 C7 28 32 30 29 00 B3 0E |C.2:ZD$..(20)...|
00000AA0: 6A EA A1 5A 24 3A 8B 5A 24 B3 B1 22 22 A7 36 30 |j..Z$:.Z$.."".60|
00000AB0: 30 37 30 00 E3 0E 74 EA 8B 5A 54 B3 B2 54 49 A7 |070...t..ZT..TI.|
00000AC0: 99 CA 28 22 20 A6 22 2C 5A 43 2C 31 29 3B 22 9D |..(" .",ZC,1);".|
00000AD0: 22 3B 3A 5A 43 B2 33 AB 5A 43 3A 5A 54 B2 54 49 |";:ZC.3.ZC:ZT.TI|
00000AE0: AA 31 35 00 EE 0E 7E EA 89 36 30 30 31 30 00 1E |.15...~..60010..|
00000AF0: 0F A6 EA 5A B2 C6 28 5A 24 29 3A 5A 4C B2 C3 28 |...Z..(Z$):ZL..(|
00000B00: 49 4E 24 29 3A 8B 28 5A AF 31 32 37 29 B3 33 32 |IN$):.(Z.127).32|
00000B10: A7 99 22 20 9D 22 3B 3A 89 36 30 31 31 30 00 4E |.." .";:.60110.N|
00000B20: 0F B0 EA 8B 46 4C AF 28 5A AF 31 32 37 29 B1 36 |....FL.(Z.127).6|
00000B30: 34 AF 28 5A AF 31 32 37 29 B3 39 31 A7 5A 24 B2 |4.(Z.127).91.Z$.|
00000B40: C7 28 28 5A AA 31 32 38 29 AF 32 35 35 29 00 60 |.((Z.128).255).`|
00000B50: 0F BA EA 8B 5A 4C B1 32 35 34 A7 36 30 30 31 30 |....ZL.254.60010|
00000B60: 00 7B 0F C4 EA 49 4E 24 B2 49 4E 24 AA 5A 24 3A |.{...IN$.IN$.Z$:|
00000B70: 99 5A 24 3B 5A 44 24 3B 5A 24 3B 00 9A 0F CE EA |.Z$;ZD$;Z$;.....|
00000B80: 8B 5A B2 31 33 A7 49 4E 24 B2 CA 28 49 4E 24 2C |.Z.13.IN$..(IN$,|
00000B90: 32 29 3A 99 43 52 24 3B 3A 8E 00 C6 0F D8 EA 8B |2):.CR$;:.......|
00000BA0: 5A B2 32 30 AF 5A 4C B1 31 A7 49 4E 24 B2 C8 28 |Z.20.ZL.1.IN$..(|
00000BB0: 49 4E 24 2C 5A 4C AB 31 29 3A 99 22 9D 22 3B 3A |IN$,ZL.1):.".";:|
00000BC0: 89 36 30 30 31 30 00 F9 0F E2 EA 8B 5A B2 31 34 |.60010......Z.14|
00000BD0: 31 A7 5A 24 B2 C7 28 AB 32 30 AC 28 5A 4C B1 31 |1.Z$..(.20.(ZL.1|
00000BE0: 29 29 3A 81 5A B2 32 A4 5A 4C 3A 99 5A 24 3B 3A |)):.Z.2.ZL:.Z$;:|
00000BF0: 82 5A 3A 89 36 30 30 30 30 00 04 10 EC EA 89 36 |.Z:.60000......6|
00000C00: 30 30 31 30 00 14 10 28 EB 8B 50 4E B2 30 A7 36 |0010...(..PN.0.6|
00000C10: 30 32 35 30 00 30 10 32 EB 99 22 11 D0 52 45 53 |0250.0.2.."..RES|
00000C20: 53 20 12 D2 C5 D4 D5 D2 CE 92 20 54 4F 20 22 3B |S ........ TO ";|
00000C30: 00 4D 10 3C EB 8B 50 4E B2 4C 50 A7 99 22 42 45 |.M.<..PN.LP.."BE|
00000C40: 47 49 4E 3A 22 3B 3A 89 36 30 32 34 30 00 5F 10 |GIN:";:.60240._.|
00000C50: 46 EB 99 22 43 4F 4E 54 49 4E 55 45 3A 22 3B 00 |F.."CONTINUE:";.|
00000C60: 74 10 50 EB A1 54 24 3A 8B 54 24 B2 22 22 A7 36 |t.P..T$:.T$."".6|
00000C70: 30 32 34 30 00 96 10 5A EB 8B 50 4E B2 4C 50 A7 |0240...Z..PN.LP.|
00000C80: 97 35 39 34 36 38 2C 50 4B 3A 9C 3A 99 22 93 22 |.59468,PK:.:."."|
00000C90: 3B 3A 89 31 30 30 00 D9 10 64 EB 50 4E B2 50 4E |;:.100...d.PN.PN|
00000CA0: AA 31 3A 99 22 93 22 3B 50 47 24 3B 22 20 2D 20 |.1:.".";PG$;" - |
00000CB0: C3 55 52 53 4F 52 20 23 22 3B 4E 4D 24 3B 22 20 |.URSOR #";NM$;" |
00000CC0: 20 28 43 29 20 31 39 37 39 20 20 20 20 D0 41 47 | (C) 1979 .AG|
00000CD0: 45 22 3B 50 4E 3B 22 11 22 00 DF 10 6E EB 8E 00 |E";PN;"."...n...|
00000CE0: 18 11 30 F2 99 22 93 11 11 11 22 3B 50 47 24 3B |..0.."....";PG$;|
00000CF0: 22 20 C0 20 C3 55 52 53 4F 52 20 23 22 3B 4E 4D |" . .URSOR #";NM|
00000D00: 24 3B 22 20 20 C3 4F 50 59 52 49 47 48 54 20 28 |$;" .OPYRIGHT (|
00000D10: 43 29 20 31 39 37 39 22 00 2F 11 3A F2 99 22 11 |C) 1979"./.:..".|
00000D20: C1 44 44 49 54 49 4F 4E A0 44 52 49 4C 4C 22 00 |.DDITION.DRILL".|
00000D30: 55 11 44 F2 99 22 11 11 11 D7 41 4E 54 20 49 4E |U.D.."....ANT IN|
00000D40: 53 54 52 55 43 54 49 4F 4E 53 3F 20 22 3B 3A 8D |STRUCTIONS? ";:.|
00000D50: 36 30 30 30 30 00 6E 11 4E F2 8B C8 28 49 4E 24 |60000.n.N...(IN$|
00000D60: 2C 31 29 B3 B1 22 59 22 A7 36 32 30 39 30 00 79 |,1).."Y".62090.y|
00000D70: 11 58 F2 89 36 32 31 30 30 00 8A 11 8A F2 99 22 |.X..62100......"|
00000D80: 93 22 3B 3A 9C 3A 89 31 30 30 00 9A 11 94 F2 4C |.";:.:.100.....L|
00000D90: 50 B2 35 3A 8D 36 30 32 30 30 00 C8 11 9E F2 99 |P.5:.60200......|
00000DA0: 22 C6 49 52 53 54 2C 20 54 4F A0 42 45 20 46 52 |".IRST, TO.BE FR|
00000DB0: 49 45 4E 44 4C 59 2C 20 54 48 45 A0 D0 45 54 A0 |IENDLY, THE..ET.|
00000DC0: 57 49 4C 4C A0 41 53 4B 00 F4 11 A8 F2 99 22 46 |WILL.ASK......"F|
00000DD0: 4F 52 20 59 4F 55 52 A0 4E 41 4D 45 2E 20 28 C9 |OR YOUR.NAME. (.|
00000DE0: 46 20 59 4F 55 A0 44 4F 4E 27 54 20 53 41 59 20 |F YOU.DON'T SAY |
00000DF0: 57 48 41 54 00 1E 12 B2 F2 99 22 59 4F 55 52 A0 |WHAT......"YOUR.|
00000E00: 4E 41 4D 45 A0 49 53 2C 20 54 48 45 A0 D0 45 54 |NAME.IS, THE..ET|
00000E10: A0 57 49 4C 4C 20 43 41 4C 4C 20 59 4F 55 00 31 |.WILL CALL YOU.1|
00000E20: 12 BC F2 99 22 27 C7 52 55 4E 44 4F 4F 4E 27 2E |...."'.RUNDOON'.|
00000E30: 29 00 60 12 C6 F2 99 22 11 CE 45 58 54 2C 20 59 |).`...."..EXT, Y|
00000E40: 4F 55 27 4C 4C 20 42 45 A0 41 53 4B 45 44 A0 48 |OU'LL BE.ASKED.H|
00000E50: 4F 57 20 42 49 47 20 41 20 50 52 4F 42 4C 45 4D |OW BIG A PROBLEM|
00000E60: 00 8A 12 D0 F2 99 22 59 4F 55 A0 57 41 4E 54 20 |......"YOU.WANT |
00000E70: 28 42 59 A0 52 4F 57 53 20 41 4E 44 20 43 4F 4C |(BY.ROWS AND COL|
00000E80: 55 4D 4E 53 29 2E 20 C6 4F 52 00 B5 12 DA F2 99 |UMNS). .OR......|
00000E90: 22 45 58 41 4D 50 4C 45 2C 20 41 20 50 52 4F 42 |"EXAMPLE, A PROB|
00000EA0: 4C 45 4D 20 57 49 54 48 A0 32 20 52 4F 57 53 20 |LEM WITH.2 ROWS |
00000EB0: 41 4E 44 20 34 00 D9 12 E4 F2 99 22 43 4F 4C 55 |AND 4......"COLU|
00000EC0: 4D 4E 53 20 57 4F 55 4C 44 A0 4C 4F 4F 4B A0 4C |MNS WOULD.LOOK.L|
00000ED0: 49 4B 45 20 54 48 49 53 3A 00 05 13 EE F2 99 22 |IKE THIS:......"|
00000EE0: 11 11 22 3B A3 31 30 29 3B 22 31 32 38 39 9D 9D |..";.10);"1289..|
00000EF0: 9D 9D 9D 11 2B 34 35 32 37 11 9D 9D 9D 9D 9D C0 |....+4527.......|
00000F00: C0 C0 C0 C0 C0 00 17 13 F8 F2 99 22 11 11 22 3B |..........."..";|
00000F10: 3A 8D 36 30 32 30 30 00 47 13 02 F3 99 A3 31 35 |:.60200.G.....15|
00000F20: 29 3B 22 11 31 32 38 39 9D 9D 9D 9D 9D 11 2B 34 |);".1289......+4|
00000F30: 35 32 37 11 9D 9D 9D 9D 9D C0 C0 C0 C0 C0 C0 9D |527.............|
00000F40: 9D 11 12 3F 11 11 22 00 75 13 0C F3 99 22 D4 48 |...?..".u....".H|
00000F50: 45 A0 D0 45 54 20 57 49 4C 4C A0 43 48 4F 4F 53 |E..ET WILL.CHOOS|
00000F60: 45 20 41 A0 50 52 4F 42 4C 45 4D A0 41 4E 44 A0 |E A.PROBLEM.AND.|
00000F70: 50 52 49 4E 54 00 A2 13 16 F3 99 22 49 54 20 4C |PRINT......"IT L|
00000F80: 49 4B 45 A0 54 48 45 A0 4F 4E 45 A0 41 42 4F 56 |IKE.THE.ONE.ABOV|
00000F90: 45 2E 20 D4 48 45 20 12 3F 92 20 59 4F 55 A0 53 |E. .HE .?. YOU.S|
00000FA0: 45 45 00 CE 13 20 F3 99 22 4D 45 41 4E 53 A0 54 |EE... .."MEANS.T|
00000FB0: 48 41 54 20 59 4F 55 27 52 45 A0 53 55 50 50 4F |HAT YOU'RE.SUPPO|
00000FC0: 53 45 44 20 54 4F 20 54 59 50 45 20 49 4E 00 FC |SED TO TYPE IN..|
00000FD0: 13 2A F3 99 22 41 20 4E 55 4D 42 45 52 2E 20 20 |.*.."A NUMBER. |
00000FE0: C9 4E A0 54 48 49 53 20 43 41 53 45 2C 20 39 2B |.N.THIS CASE, 9+|
00000FF0: 37 3D 31 36 2C 20 53 4F 20 59 4F 55 00 29 14 34 |7=16, SO YOU.).4|
00001000: F3 99 22 57 4F 55 4C 44 20 54 59 50 45 20 36 20 |.."WOULD TYPE 6 |
00001010: 28 53 49 4E 43 45 A0 54 48 45 A0 31 20 49 53 A0 |(SINCE.THE.1 IS.|
00001020: 43 41 52 52 49 45 44 29 2E 00 34 14 3E F3 8D 36 |CARRIED)..4.>..6|
00001030: 30 32 30 30 00 69 14 48 F3 99 A3 31 37 29 3B 22 |0200.i.H...17);"|
00001040: 12 3F 92 11 9D 9D 9D 31 32 38 39 9D 9D 9D 9D 9D |.?.....1289.....|
00001050: 11 2B 34 35 32 37 11 9D 9D 9D 9D 9D C0 C0 C0 C0 |.+4527..........|
00001060: C0 C0 11 9D 9D 36 11 11 22 00 95 14 52 F3 99 22 |.....6.."...R.."|
00001070: C1 46 54 45 52 20 59 4F 55 A0 54 59 50 45 A0 41 |.FTER YOU.TYPE.A|
00001080: A0 4E 55 4D 42 45 52 2C 20 54 48 45 A0 D0 45 54 |.NUMBER, THE..ET|
00001090: 20 57 49 4C 4C 00 C4 14 5C F3 99 22 50 52 49 4E | WILL...\.."PRIN|
000010A0: 54 20 49 54 2C 20 41 4E 44 A0 4D 4F 56 45 A0 54 |T IT, AND.MOVE.T|
000010B0: 48 45 20 12 3F 92 20 54 4F 20 54 48 45 20 54 4F |HE .?. TO THE TO|
000010C0: 50 20 4F 46 00 EF 14 66 F3 99 22 54 48 45 A0 4E |P OF...f.."THE.N|
000010D0: 45 58 54 A0 43 4F 4C 55 4D 4E 2C 20 53 4F 20 59 |EXT.COLUMN, SO Y|
000010E0: 4F 55 A0 43 41 4E A0 54 59 50 45 20 54 48 45 00 |OU.CAN.TYPE THE.|
000010F0: 1D 15 70 F3 99 22 43 41 52 52 59 20 28 31 20 49 |..p.."CARRY (1 I|
00001100: 4E A0 54 48 49 53 A0 43 41 53 45 29 2E 20 20 C9 |N.THIS.CASE). .|
00001110: 46 20 54 48 45 52 45 20 49 53 4E 27 54 00 4A 15 |F THERE ISN'T.J.|
00001120: 7A F3 99 22 41 20 43 41 52 52 59 2C 20 59 4F 55 |z.."A CARRY, YOU|
00001130: A0 4D 55 53 54 20 53 54 49 4C 4C A0 54 59 50 45 |.MUST STILL.TYPE|
00001140: 20 41 20 5A 45 52 4F 20 54 4F 00 78 15 84 F3 99 | A ZERO TO.x....|
00001150: 22 54 45 4C 4C A0 54 48 45 A0 D0 45 54 20 54 48 |"TELL.THE..ET TH|
00001160: 41 54 A0 59 4F 55 A0 4B 4E 4F 57 A0 54 48 41 54 |AT.YOU.KNOW.THAT|
00001170: A0 54 48 45 52 45 27 53 00 88 15 8E F3 99 22 4E |.THERE'S......"N|
00001180: 4F A0 43 41 52 52 59 2E 00 93 15 98 F3 8D 36 30 |O.CARRY.......60|
00001190: 32 30 30 00 CC 15 A2 F3 99 A3 31 37 29 3B 22 12 |200.......17);".|
000011A0: 31 92 11 9D 9D 9D 31 32 38 39 9D 9D 9D 9D 9D 11 |1.....1289......|
000011B0: 2B 34 35 32 37 11 9D 9D 9D 9D 9D C0 C0 C0 C0 C0 |+4527...........|
000011C0: C0 11 9D 9D 9D 12 3F 92 36 11 11 22 00 FA 15 AC |......?.6.."....|
000011D0: F3 99 22 D4 48 45 A0 43 41 52 52 59 20 59 4F 55 |..".HE.CARRY YOU|
000011E0: A0 54 59 50 45 44 A0 57 49 4C 4C A0 54 48 45 4E |.TYPED.WILL.THEN|
000011F0: A0 42 45 20 53 48 4F 57 4E 2E 00 28 16 B6 F3 99 |.BE SHOWN..(....|
00001200: 22 D4 48 45 A0 D0 45 54 20 57 49 4C 4C 20 4D 4F |".HE..ET WILL MO|
00001210: 56 45 20 54 48 45 A0 12 3F 92 20 54 4F A0 54 48 |VE THE..?. TO.TH|
00001220: 45 20 42 4F 54 54 4F 4D 00 56 16 C0 F3 99 22 4F |E BOTTOM.V...."O|
00001230: 46 20 54 48 45 A0 43 4F 4C 55 4D 4E 2C 20 41 4E |F THE.COLUMN, AN|
00001240: 44 A0 57 41 49 54 20 46 4F 52 20 59 4F 55 20 54 |D.WAIT FOR YOU T|
00001250: 4F A0 54 59 50 45 00 84 16 CA F3 99 22 54 48 45 |O.TYPE......"THE|
00001260: 20 53 55 4D A0 4F 46 A0 54 48 45 20 53 45 43 4F | SUM.OF.THE SECO|
00001270: 4E 44 20 43 4F 4C 55 4D 4E 20 28 31 20 49 4E A0 |ND COLUMN (1 IN.|
00001280: 54 48 49 53 00 91 16 D4 F3 99 22 43 41 53 45 29 |THIS......"CASE)|
00001290: 2E 00 9C 16 DE F3 8D 36 30 32 30 30 00 D2 16 E8 |.......60200....|
000012A0: F3 99 A3 31 36 29 3B 22 12 3F 92 11 9D 9D 31 32 |...16);".?....12|
000012B0: 38 39 9D 9D 9D 9D 9D 11 2B 34 35 32 37 11 9D 9D |89......+4527...|
000012C0: 9D 9D 9D C0 C0 C0 C0 C0 C0 11 9D 9D 9D 31 36 11 |.............16.|
000012D0: 11 22 00 FD 16 F2 F3 99 22 D4 48 49 4E 47 53 20 |."......".HINGS |
000012E0: 57 49 4C 4C A0 43 4F 4E 54 49 4E 55 45 20 4C 49 |WILL.CONTINUE LI|
000012F0: 4B 45 A0 54 48 49 53 20 28 53 55 4D 2C 00 25 17 |KE.THIS (SUM,.%.|
00001300: FC F3 99 22 43 41 52 52 59 2C 20 53 55 4D 2C 20 |..."CARRY, SUM, |
00001310: 43 41 52 52 59 2C 20 2E 2E 2E 29 20 55 4E 54 49 |CARRY, ...) UNTI|
00001320: 4C 20 54 48 45 00 3E 17 06 F4 99 22 50 52 4F 42 |L THE.>...."PROB|
00001330: 4C 45 4D A0 49 53 A0 53 4F 4C 56 45 44 2E 00 6B |LEM.IS.SOLVED..k|
00001340: 17 10 F4 99 22 11 C1 46 54 45 52 20 54 48 45 20 |...."..FTER THE |
00001350: 50 52 4F 42 4C 45 4D A0 49 53 20 53 4F 4C 56 45 |PROBLEM.IS SOLVE|
00001360: 44 2C 20 59 4F 55 20 57 49 4C 4C 00 94 17 1A F4 |D, YOU WILL.....|
00001370: 99 22 42 45 20 4F 46 46 45 52 45 44 20 41 4E 4F |."BE OFFERED ANO|
00001380: 54 48 45 52 20 50 52 4F 42 4C 45 4D 2E 20 C9 46 |THER PROBLEM. .F|
00001390: 20 59 4F 55 00 C1 17 24 F4 99 22 44 45 43 49 44 | YOU...$.."DECID|
000013A0: 45 A0 54 4F 20 44 4F 20 49 54 2C 20 59 4F 55 A0 |E.TO DO IT, YOU.|
000013B0: 43 41 4E A0 4B 45 45 50 20 54 48 45 A0 53 41 4D |CAN.KEEP THE.SAM|
000013C0: 45 00 EA 17 2E F4 99 22 4E 55 4D 42 45 52 20 4F |E......"NUMBER O|
000013D0: 46 20 52 4F 57 53 20 41 4E 44 A0 43 4F 4C 55 4D |F ROWS AND.COLUM|
000013E0: 4E 53 20 42 59 A0 4A 55 53 54 00 15 18 38 F4 99 |NS BY.JUST...8..|
000013F0: 22 50 52 45 53 53 49 4E 47 20 12 D2 C5 D4 D5 D2 |"PRESSING ......|
00001400: CE 92 20 57 48 45 4E 20 59 4F 55 A0 41 52 45 A0 |.. WHEN YOU.ARE.|
00001410: 41 53 4B 45 44 00 25 18 42 F4 99 22 46 4F 52 A0 |ASKED.%.B.."FOR.|
00001420: 54 48 45 4D 2E 00 30 18 4C F4 8D 36 30 32 30 30 |THEM..0.L..60200|
00001430: 00 00 00 |... |
.......:.59468,14:PK.14.@.... PGM COPYRI
GHT (C) 1979 DONALD ROSS.].... CURSOR #8
, MARCH, 1979.~.... BOX 550, GOLETA, CA.
93017.....:...... AS OF MAY 26,1979...Z
.PG$."ADD":NM$."8":.62000...D.R$.".RETUR
N.":D$."............"...N.FL.1:.B(49152)
.FL.0...X.."WHAT'S YOUR NAME? ";:.60000:
F$.IN$.X....F$."".F$."GRUNDOON":.:."I'LL
CALL YOU ";F$;", THEN.".^.....L....A(10
,10)...H.QL.245:.B(49152).QL.216.....R..
1:C..1.....A.16.....E.0......X.1.C:S(X).
0:....L.N.R:PR$."HOW MANY ROWS? ":.10000
:.N.0.1100...V..N.2.N.9.."ONLY 2 TO 9 RO
WS ALLOWED.":.1100.".`.R.N.T.J.N.C:PR$."
HOW MANY COLUMNS? ":.10000:.N.0.1130...T
..N.1.N.9.."ONLY 1 TO 9 COLUMNS ALLOWED.
":.1130...~.C.N......X.1.R.....A(X,1)..(
.(1).9).1.R.D.B(X).A(X,1):S(1).S(1).A(X,
1)...N..C.2.1290...X..Y.2.C.....A(X,Y)..
(.(1).10).....B(X).10.B(X).A(X,Y).....S(
Y).S(Y).A(X,Y).5....Y.<....X.F...."..".Q
....X.1.R.`.(...15);B(X).G.2..X...<...15
);H(".+............",C.6)...F.K.0...P.M.
15.C.40.(R.3)...Z..Z.C.1..1.C.D.S(Z).S(Z
).K...N.P..(S(Z).10):B.S(Z).P.10...X.PK.
32768.M.(C.Z)......PK,160:.13000:.PK,DG.
/....B..G.S7.0:J.B:.13500:.1410.A....S9.
.0..13200.J. .S5.0.[...K..(S(Z).10).I...
.Z.1.1540.....PK.32768.M.(R.2).40.(C.Z.1
)...H..PK,160:.13000:.PK,128.DG.G.R..G..
K.S7.1:J.K:.13500:.1480.Y....S9..0..1320
0......PK.1,32.....S5.0......Z......K.0.
1590.....PK.32768.M.(C.Z.1).5....PK,160:
.13000:.PK,DG.U."..K..G.S7.1:J.K:.13500:
.1560.G.,..S9..0..13200...6..32768.M.(R.
2).40.(C.Z),96...@..".............".F.J.
.E.1.."THAT IS CORRECT, ";F$;".":.1640..
.T.."YOU ARE THE GREATEST, ";F$;". YOU D
ID":..#.^.."THAT PROBLEM WITHOUT MAKING
A MISTAKE.".C.H..".WANT ANOTHER PROBLEM?
";.S.R.YN.1:.14000.E.|..YN.1..:.1000.M.
...:.....'.PR$;:.60000:.IN$."".10050....
'.....'.II.1.C(IN$):G$.J(IN$,II,1)...$':
.G$."0".G$."9".."NO ";G$;"'S, PLEASE.":.
10000....':.II...8'N.E(IN$):....B'.N..0.
.N;...L'.:..#.H2SW.160:TM.0.9.R2.G$:.G$.
."".13040.^..2.TI.TM..PK,SW:SW.351.SW:TM
.TI.30.I..2.13010....2.G$."0".G$."9".130
10....2G.E(G$):DG.G.48:..K.,3ROW.24:.139
00:..14);".HIT .RETURN. WHEN READY".Q.63
.....3ROW.14:.13900....3.I.ROW.24:."
":.I.
/..3S9.0:.".":..R..4E.1:S5.S5.1:.S5.2.S9
..0..13200.D.F4ROW.16:.13900...P4.S5.1..
"
."...Z4S9.1:.S7.0.13560.S..4.F$;", THE C
ARRY IS NOT";G;".."....4.13570....4."SOR
RY, ";F$;",";G;"IS INCORRECT.".%..5.S5.2
.."TRY AGAIN.":.13595.S..5."THE CORRECT
ANSWER IS";J;".. WHEN YOU"....5."UNDERS
TAND YOUR ERROR, TYPE IN THE":."CORRECT
ANSWER."....5....L6.".":.QL,ROW:.".";:..
...6SW.1:TM.0.S..6.G$:.G$.."".14050...D6
.TI.TM.14010...N6.J(". ",SW,1);".";:SW.3
.SW...X6TM.TI.30:.14010./..6.G$."Y".YN.1
:.14080.G..6.G$."N".YN.0:.14080.\..6.G$.
.G(13).14020.V..7.J("NO YES",1.3.YN,3).|
..7....`.IN$." ":ZT.TI:ZC.2:ZD$.G(20)...
J..Z$:.Z$.."".60070...T..ZT..TI..J(" .",
ZC,1);".";:ZC.3.ZC:ZT.TI.15...~..60010..
...Z.F(Z$):ZL.C(IN$):.(Z.127).32.." .";:
.60110.N....FL.(Z.127).64.(Z.127).91.Z$.
G((Z.128).255).`....ZL.254.60010.{.D.IN$
.IN$.Z$:.Z$;ZD$;Z$;...N..Z.13.IN$.J(IN$,
2):.CR$;:..F.X..Z.20.ZL.1.IN$.H(IN$,ZL.1
):.".";:.60010......Z.141.Z$.G(.20.(ZL.1
)):.Z.2.ZL:.Z$;:.Z:.60000......60010...(
..PN.0.60250.0.2..".PRESS .RETURN. TO ";
.M.<..PN.LP.."BEGIN:";:.60240._.F.."CONT
INUE:";.T.P..T$:.T$."".60240...Z..PN.LP.
.59468,PK:.:.".";:.100.Y.D.PN.PN.1:.".";
PG$;" - CURSOR #";NM$;" (C) 1979 PAG
E";PN;"."...N.....0.."....";PG$;" . CURS
OR #";NM$;" COPYRIGHT (C) 1979"./.:..".
ADDITION DRILL".U.D.."...WANT INSTRUCTIO
NS? ";:.60000.N.N..H(IN$,1).."Y".62090.Y
.X..62100......".";:.:.100.....LP.5:.602
00.H...."FIRST, TO BE FRIENDLY, THE PET
WILL ASK......"FOR YOUR NAME. (IF YOU DO
N'T SAY WHAT......"YOUR NAME IS, THE PET
WILL CALL YOU.1...."'GRUNDOON'.).`.F.."
.NEXT, YOU'LL BE ASKED HOW BIG A PROBLEM
...P.."YOU WANT (BY ROWS AND COLUMNS). F
OR...Z.."EXAMPLE, A PROBLEM WITH 2 ROWS
AND 4.Y...."COLUMNS WOULD LOOK LIKE THIS
:......"..";.10);"1289......+4527.......
..........."..";:.60200.G.....15);".1289
......+4527................?..".U...."TH
E PET WILL CHOOSE A PROBLEM AND PRINT...
..."IT LIKE THE ONE ABOVE. THE .?. YOU S
EE.N. .."MEANS THAT YOU'RE SUPPOSED TO T
YPE IN...*.."A NUMBER. IN THIS CASE, 9+
7=16, SO YOU.).4.."WOULD TYPE 6 (SINCE T
HE 1 IS CARRIED)..4.>..60200.I.H...17);"
.?.....1289......+4527...............6..
"...R.."AFTER YOU TYPE A NUMBER, THE PET
WILL.D.\.."PRINT IT, AND MOVE THE .?. T
O THE TOP OF...F.."THE NEXT COLUMN, SO Y
OU CAN TYPE THE...P.."CARRY (1 IN THIS C
ASE). IF THERE ISN'T.J.Z.."A CARRY, YOU
MUST STILL TYPE A ZERO TO.X...."TELL TH
E PET THAT YOU KNOW THAT THERE'S......"N
O CARRY.......60200.L.....17);".1.....12
89......+4527.................?.6.."....
.."THE CARRY YOU TYPED WILL THEN BE SHOW
N..(...."THE PET WILL MOVE THE .?. TO TH
E BOTTOM.V...."OF THE COLUMN, AND WAIT F
OR YOU TO TYPE...J.."THE SUM OF THE SECO
ND COLUMN (1 IN THIS...T.."CASE).......6
0200.R.....16);".?....1289......+4527...
.............16.."......"THINGS WILL CON
TINUE LIKE THIS (SUM,.%...."CARRY, SUM,
CARRY, ...) UNTIL THE.>...."PROBLEM IS S
OLVED..K....".AFTER THE PROBLEM IS SOLVE
D, YOU WILL......"BE OFFERED ANOTHER PRO
BLEM. IF YOU.A.$.."DECIDE TO DO IT, YOU
CAN KEEP THE SAME......"NUMBER OF ROWS A
ND COLUMNS BY JUST...8.."PRESSING .RETUR
N. WHEN YOU ARE ASKED.%.B.."FOR THEM..0.
L..60200...
> CLICK IMAGE PREVIEW FOR FULL MODAL