DRILL OU/OW.C
FILE INFORMATION
FILENAME(S): DRILL OU/OW.C
FILE TYPE(S): PRG
FILE SIZE: 4.4K
FIRST SEEN: 2025-11-30 21:07:08
APPEARS ON: 1 disk(s)
FILE HASH
555cf3b8ab08c9824eb60103afe23f1b02905d779754d4fa031e634f40fa8d14
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUGMORENOV841 C | DRILL OU/OW.C | PRG | DuncanTwain | 8 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1B 08 05 00 8F 20 2A 2A 2A 47 52 41 4D 4D |....... ***GRAMM|
00000010: 41 52 20 44 52 49 4C 4C 2A 2A 2A 00 3E 08 07 00 |AR DRILL***.>...|
00000020: 8F 20 44 52 49 4C 4C 20 49 4E 20 53 50 45 4C 4C |. DRILL IN SPELL|
00000030: 49 4E 47 20 57 4F 52 44 53 20 57 49 54 48 00 65 |ING WORDS WITH.e|
00000040: 08 09 00 8F 20 2A 4F 55 2F 4F 57 2A 20 53 55 49 |.... *OU/OW* SUI|
00000050: 54 41 42 4C 45 20 46 4F 52 20 47 52 41 44 45 53 |TABLE FOR GRADES|
00000060: 20 34 2D 38 2E 00 6B 08 0A 00 8F 00 83 08 0B 00 | 4-8..k.........|
00000070: 8F 20 50 52 4F 47 52 41 4D 20 44 45 56 45 4C 4F |. PROGRAM DEVELO|
00000080: 50 45 44 00 A7 08 0D 00 8F 20 42 59 20 4A 20 4A |PED...... BY J J|
00000090: 20 55 52 53 41 4E 4F 20 53 50 52 49 4E 47 44 41 | URSANO SPRINGDA|
000000A0: 4C 45 20 50 41 52 4B 00 CB 08 0E 00 8F 20 42 52 |LE PARK...... BR|
000000B0: 41 43 45 42 45 4F 44 47 45 2C 20 4F 4E 54 41 52 |ACEBEODGE, ONTAR|
000000C0: 49 4F 20 41 50 52 49 4C 2F 38 33 00 D3 08 0F 00 |IO APRIL/83.....|
000000D0: 8F 20 CC 00 F4 08 10 00 8F 20 4C 49 4E 45 53 20 |. ....... LINES |
000000E0: 32 30 20 54 4F 20 35 31 30 20 53 45 54 20 55 50 |20 TO 510 SET UP|
000000F0: 20 41 4E 44 00 12 09 11 00 8F 20 50 52 49 4E 54 | AND...... PRINT|
00000100: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 54 49 54 | THE PROGRAM TIT|
00000110: 4C 45 00 18 09 12 00 8F 00 1E 09 13 00 8F 00 2C |LE.............,|
00000120: 09 14 00 99 22 93 11 11 11 11 11 22 00 54 09 15 |...."......".T..|
00000130: 00 97 20 35 33 32 38 30 2C 35 3A 97 35 33 32 38 |.. 53280,5:.5328|
00000140: 31 2C 37 3A 8F 20 53 43 52 45 45 4E 20 43 4F 4C |1,7:. SCREEN COL|
00000150: 4F 55 52 53 00 72 09 16 00 99 22 1C 22 3A 20 8F |OURS.r....".": .|
00000160: 20 53 45 54 20 43 55 52 53 4F 52 20 54 4F 20 52 | SET CURSOR TO R|
00000170: 45 44 00 7A 09 17 00 8F A0 CC 00 87 09 18 00 81 |ED.z............|
00000180: 20 49 B2 31 A4 32 35 00 95 09 19 00 99 20 A3 37 | I.1.25...... .7|
00000190: 29 22 BF 22 3B 00 9F 09 1E 00 8D 20 35 30 30 00 |)".";...... 500.|
000001A0: A5 09 28 00 82 00 AB 09 2D 00 99 00 B7 09 32 00 |..(.....-.....2.|
000001B0: 81 20 49 B2 31 A4 35 00 C5 09 3C 00 99 20 A3 33 |. I.1.5...<.. .3|
000001C0: 31 29 22 BF 22 00 CF 09 46 00 8D 20 35 30 30 00 |1)"."...F.. 500.|
000001D0: D5 09 50 00 82 00 E8 09 5A 00 81 20 49 B2 33 31 |..P.....Z.. I.31|
000001E0: 20 A4 20 37 20 A9 AB 31 00 F5 09 64 00 99 A3 49 | . 7 ..1...d...I|
000001F0: 29 22 91 BF 22 00 FF 09 6E 00 8D 20 35 30 30 00 |)".."...n.. 500.|
00000200: 05 0A 78 00 82 00 11 0A 82 00 81 20 49 B2 31 A4 |..x........ I.1.|
00000210: 35 00 20 0A 8C 00 99 20 A3 37 29 22 91 91 BF 22 |5. .... .7)"..."|
00000220: 00 2A 0A 96 00 8D 20 35 30 30 00 30 0A A0 00 82 |.*.... 500.0....|
00000230: 00 5B 0A AA 00 99 22 13 1D 1D 1D 1D 1D 1D 1D 1D |.[....".........|
00000240: 1D 1D 1D 1D 1D 1D 1D 1D 1D 11 11 11 11 11 11 11 |................|
00000250: 11 11 11 12 4F 55 2F 4F 57 12 22 00 78 0A B4 00 |....OU/OW.".x...|
00000260: 99 A3 31 34 29 22 11 11 11 11 11 42 59 20 4A 2E |..14)".....BY J.|
00000270: 20 55 52 53 41 4E 4F 22 00 89 0A BE 00 81 20 59 | URSANO"...... Y|
00000280: B2 31 A4 33 35 30 30 3A 82 00 92 0A C8 00 99 22 |.1.3500:......."|
00000290: 93 22 00 9C 0A F3 01 89 20 38 30 30 00 AB 0A F4 |."...... 800....|
000002A0: 01 81 20 4C B2 31 A4 33 30 3A 82 00 B1 0A FE 01 |.. L.1.30:......|
000002B0: 8E 00 B7 0A EE 02 8F 00 BD 0A F8 02 8F 00 D8 0A |................|
000002C0: 02 03 8F 20 4C 49 4E 45 53 20 38 30 30 20 54 4F |... LINES 800 TO|
000002D0: 20 39 35 30 20 41 52 45 00 F8 0A 0C 03 8F 20 49 | 950 ARE...... I|
000002E0: 4E 53 54 52 55 43 54 49 4F 4E 53 20 46 4F 52 20 |NSTRUCTIONS FOR |
000002F0: 53 54 55 44 45 4E 54 53 00 FE 0A 11 03 8F 00 04 |STUDENTS........|
00000300: 0B 12 03 8F 00 0D 0B 16 03 99 22 93 22 00 2F 0B |.........."."./.|
00000310: 20 03 99 A3 38 29 22 11 11 11 11 11 12 52 20 45 | ...8)"......R E|
00000320: 20 4D 20 45 20 4D 20 42 20 45 20 52 20 92 22 00 | M E M B E R .".|
00000330: 55 0B 2A 03 99 22 11 11 11 11 1D 1D 1D 1D 31 29 |U.*.."........1)|
00000340: 20 4F 55 20 4F 52 20 4F 57 20 43 41 4E 20 53 41 | OU OR OW CAN SA|
00000350: 59 20 4F 55 22 00 75 0B 34 03 99 22 11 11 11 1D |Y OU".u.4.."....|
00000360: 1D 1D 1D 32 29 20 4F 57 20 53 41 59 53 20 4C 4F |...2) OW SAYS LO|
00000370: 4E 47 20 4F 22 00 A2 0B 48 03 99 22 11 11 11 11 |NG O"...H.."....|
00000380: 11 11 1D 1D 1D 1D 1D 50 52 45 53 53 12 2A 41 4E |.......PRESS.*AN|
00000390: 59 20 4B 45 59 2A 92 57 48 45 4E 20 52 45 41 44 |Y KEY*.WHEN READ|
000003A0: 59 22 00 B8 0B 52 03 A1 20 4B 24 3A 8B 20 4B 24 |Y"...R.. K$:. K$|
000003B0: B2 22 22 A7 20 38 35 30 00 C1 0B 5C 03 99 22 93 |."". 850...\..".|
000003C0: 22 00 EF 0B 84 03 99 22 11 11 11 11 11 11 11 11 |"......"........|
000003D0: 11 1D 1D 1D 1D 1D 54 59 50 45 20 54 48 45 20 4D |......TYPE THE M|
000003E0: 49 53 53 49 4E 47 20 4C 45 54 54 45 52 53 22 00 |ISSING LETTERS".|
000003F0: 11 0C 8E 03 99 22 11 1D 1D 1D 1D 1D 54 4F 20 43 |....."......TO C|
00000400: 4F 4D 50 4C 45 54 45 20 54 48 45 20 57 4F 52 44 |OMPLETE THE WORD|
00000410: 22 00 2A 0C 98 03 99 22 11 11 11 11 1D 1D 1D 1D |".*...."........|
00000420: 1D 45 58 41 4D 50 4C 45 3A 22 00 40 0C 9D 03 99 |.EXAMPLE:".@....|
00000430: 20 22 1D 1D 1D 1D 1D A3 A3 A3 A3 A3 A3 A3 A3 22 | "............."|
00000440: 00 6C 0C A2 03 99 20 22 11 1D 1D 1D 1D 1D 1D 1D |.l.... "........|
00000450: 1D 1D 1D 1D 1D 53 48 2E 2E 54 20 57 4F 55 4C 44 |.....SH..T WOULD|
00000460: 20 42 45 20 53 48 12 4F 55 92 54 22 00 94 0C AC | BE SH.OU.T"....|
00000470: 03 99 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D C4 |..".............|
00000480: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 |................|
00000490: C4 C4 C4 22 00 C0 0C B6 03 99 22 11 11 11 11 11 |..."......".....|
000004A0: 1D 1D 1D 1D 1D 50 52 45 53 53 12 2A 41 4E 59 20 |.....PRESS.*ANY |
000004B0: 4B 45 59 2A 92 57 48 45 4E 20 52 45 41 44 59 22 |KEY*.WHEN READY"|
000004C0: 00 D6 0C C0 03 A1 20 4B 24 3A 8B 20 4B 24 B2 22 |...... K$:. K$."|
000004D0: 22 A7 20 39 36 30 00 DC 0C D0 07 8F 00 E2 0C D1 |". 960..........|
000004E0: 07 8F 00 EA 0C D4 07 8F 20 CC 00 08 0D D5 07 8F |........ .......|
000004F0: 20 50 55 54 54 49 4E 47 20 44 41 54 41 20 49 4E | PUTTING DATA IN|
00000500: 54 4F 20 41 52 52 41 59 00 28 0D DA 07 8F 20 41 |TO ARRAY.(.... A|
00000510: 24 3D 57 4F 52 44 20 57 49 54 48 20 42 4C 41 4E |$=WORD WITH BLAN|
00000520: 4B 28 4D 2E 2E 54 48 29 00 4A 0D DC 07 8F 20 42 |K(M..TH).J.... B|
00000530: 24 3D 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 |$=CORRECT ANSWER|
00000540: 28 4F 55 20 4F 52 20 4F 57 29 00 67 0D DE 07 8F |(OU OR OW).g....|
00000550: 20 43 24 3D 43 4F 52 52 45 43 54 20 57 4F 52 44 | C$=CORRECT WORD|
00000560: 28 4D 4F 55 54 48 29 00 81 0D E0 07 8F 20 50 31 |(MOUTH)...... P1|
00000570: 20 49 53 20 53 49 5A 45 20 4F 46 20 41 52 52 41 | IS SIZE OF ARRA|
00000580: 59 00 87 0D E2 07 8F 00 91 0D E3 07 50 31 B2 34 |Y...........P1.4|
00000590: 34 00 AB 0D E4 07 86 41 24 28 50 31 29 2C 42 24 |4......A$(P1),B$|
000005A0: 28 50 31 29 2C 43 24 28 50 31 29 00 B8 0D EE 07 |(P1),C$(P1).....|
000005B0: 81 20 49 B2 31 A4 50 31 00 CF 0D F8 07 87 41 24 |. I.1.P1......A$|
000005C0: 28 49 29 2C 42 24 28 49 29 2C 43 24 28 49 29 00 |(I),B$(I),C$(I).|
000005D0: D7 0D 02 08 82 20 49 00 DD 0D 0B 08 8F 00 00 0E |..... I.........|
000005E0: 0C 08 8F 20 20 52 41 4E 44 4F 4D 49 5A 45 20 41 |... RANDOMIZE A|
000005F0: 4E 44 20 50 52 45 53 45 4E 54 20 57 4F 52 44 53 |ND PRESENT WORDS|
00000600: 00 1B 0E 11 08 8F 20 41 4E 44 20 53 45 54 20 43 |...... AND SET C|
00000610: 4F 55 4E 54 45 52 20 41 54 20 30 00 21 0E 16 08 |OUNTER AT 0.!...|
00000620: 8F 00 27 0E 1B 08 8F 00 38 0E 20 08 49 B2 30 3A |..'.....8. .I.0:|
00000630: 43 4F B2 30 3A 4E B2 30 00 4E 0E 2A 08 49 B2 B5 |CO.0:N.0.N.*.I..|
00000640: 28 50 31 AC 28 BB 28 54 49 29 29 AA 31 29 00 57 |(P1.(.(TI)).1).W|
00000650: 0E 34 08 99 22 93 22 00 8B 0E 39 08 97 20 35 33 |.4.."."...9.. 53|
00000660: 32 38 30 2C 39 3A 97 35 33 32 38 31 2C 31 35 3A |280,9:.53281,15:|
00000670: 99 22 90 22 3A 20 8F 20 53 45 54 20 43 55 52 53 |.".": . SET CURS|
00000680: 4F 52 20 54 4F 20 42 4C 41 43 4B 00 97 0E 3E 08 |OR TO BLACK...>.|
00000690: 43 4F B2 43 4F AA 31 00 A4 0E 48 08 99 22 22 2C |CO.CO.1...H.."",|
000006A0: A3 31 33 29 00 B4 0E 52 08 99 22 11 11 11 22 41 |.13)...R.."..."A|
000006B0: 24 28 49 29 00 C2 0E 5C 08 99 22 91 22 2C A3 31 |$(I)...\..".",.1|
000006C0: 36 29 00 E4 0E 61 08 8F 20 43 48 45 43 4B 20 54 |6)...a.. CHECK T|
000006D0: 4F 20 53 45 45 20 54 48 41 54 20 41 4E 53 57 45 |O SEE THAT ANSWE|
000006E0: 52 20 49 53 00 F2 0E 63 08 8F 20 43 4F 52 52 45 |R IS...c.. CORRE|
000006F0: 43 54 00 F8 0E 64 08 8F 00 0C 0F 66 08 A1 44 24 |CT...d.....f..D$|
00000700: 3A 8B 44 24 B2 22 22 A7 32 31 35 30 00 20 0F 70 |:.D$."".2150. .p|
00000710: 08 A1 45 24 3A 8B 45 24 B2 22 22 A7 32 31 36 30 |..E$:.E$."".2160|
00000720: 00 2D 0F 75 08 5A 24 B2 44 24 AA 45 24 00 39 0F |.-.u.Z$.D$.E$.9.|
00000730: 7A 08 99 22 12 22 3B 5A 24 00 52 0F 84 08 8B 20 |z..".";Z$.R.... |
00000740: 44 24 AA 45 24 B2 42 24 28 49 29 20 A7 20 32 32 |D$.E$.B$(I) . 22|
00000750: 32 30 00 75 0F 8E 08 99 22 11 11 53 4F 52 52 59 |20.u...."..SORRY|
00000760: 2C 54 48 41 54 20 49 53 20 4E 4F 54 20 43 4F 52 |,THAT IS NOT COR|
00000770: 52 45 43 54 22 00 93 0F 98 08 99 22 11 11 54 48 |RECT"......"..TH|
00000780: 45 20 41 4E 53 57 45 52 20 49 53 20 22 3B 43 24 |E ANSWER IS ";C$|
00000790: 28 49 29 00 9E 0F A2 08 89 20 32 32 34 30 00 A8 |(I)...... 2240..|
000007A0: 0F AC 08 4E B2 4E AA 31 00 C9 0F B0 08 8F 20 53 |...N.N.1...... S|
000007B0: 54 55 44 45 4E 54 20 4F 50 54 49 4F 4E 20 54 4F |TUDENT OPTION TO|
000007C0: 20 43 4F 4E 54 49 4E 55 45 00 E1 0F B2 08 8F 20 | CONTINUE...... |
000007D0: 4F 52 20 54 4F 20 43 48 45 43 4B 20 53 43 4F 52 |OR TO CHECK SCOR|
000007E0: 45 00 E7 0F B4 08 8F 00 08 10 B6 08 99 22 11 11 |E............"..|
000007F0: 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 57 45 4C |.............WEL|
00000800: 4C 20 44 4F 4E 45 21 22 00 32 10 C0 08 99 22 11 |L DONE!".2....".|
00000810: 11 11 11 20 50 52 45 53 53 20 12 53 50 41 43 45 |... PRESS .SPACE|
00000820: 20 42 41 52 92 20 54 4F 20 43 4F 4E 54 49 4E 55 | BAR. TO CONTINU|
00000830: 45 22 00 57 10 CA 08 99 22 11 11 11 11 20 50 52 |E".W....".... PR|
00000840: 45 53 53 20 12 53 92 20 54 4F 20 53 45 45 20 12 |ESS .S. TO SEE .|
00000850: 53 43 4F 52 45 92 22 00 6C 10 E8 08 A1 20 52 24 |SCORE.".l.... R$|
00000860: 3A 8B 52 24 B2 22 22 A7 32 32 38 30 00 82 10 F2 |:.R$."".2280....|
00000870: 08 8B 20 52 24 B2 C7 28 33 32 29 20 A7 20 32 30 |.. R$..(32) . 20|
00000880: 39 30 00 96 10 FC 08 8B 20 52 24 B2 22 53 22 20 |90...... R$."S" |
00000890: A7 20 35 30 30 30 00 A1 10 0B 09 89 20 32 32 38 |. 5000...... 228|
000008A0: 30 00 BE 10 42 09 83 22 20 20 20 2E 2E 43 48 22 |0...B.." ..CH"|
000008B0: 2C 22 4F 55 22 2C 22 12 4F 55 43 48 92 22 00 DA |,"OU",".OUCH."..|
000008C0: 10 4C 09 83 22 41 52 52 2E 2E 22 2C 22 4F 57 22 |.L.."ARR..","OW"|
000008D0: 2C 22 12 41 52 52 4F 57 92 22 00 E0 10 C9 09 8F |,".ARROW."......|
000008E0: 00 E6 10 CE 09 8F 00 02 11 B8 0B 8F 20 44 41 54 |............ DAT|
000008F0: 41 20 53 54 41 54 45 4D 45 4E 54 53 20 42 45 47 |A STATEMENTS BEG|
00000900: 49 4E 00 0A 11 BC 0B 8F 20 CC 00 10 11 BD 0B 8F |IN...... .......|
00000910: 00 16 11 BE 0B 8F 00 1E 11 C0 0B 8F 20 CC 00 3A |............ ..:|
00000920: 11 C2 0B 83 22 41 4C 4C 2E 2E 22 2C 22 4F 57 22 |...."ALL..","OW"|
00000930: 2C 22 12 41 4C 4C 4F 57 92 22 00 54 11 CC 0B 83 |,".ALLOW.".T....|
00000940: 22 20 20 44 2E 2E 4E 22 2C 22 4F 57 22 2C 52 44 |" D..N","OW",RD|
00000950: 4F 57 4E 22 00 72 11 D6 0B 83 22 20 20 48 2E 2E |OWN".r...." H..|
00000960: 4E 44 22 2C 22 4F 55 22 2C 22 12 48 4F 55 4E 44 |ND","OU",".HOUND|
00000970: 92 22 00 8C 11 E0 0B 83 22 20 20 52 2E 2E 22 2C |."......" R..",|
00000980: 22 4F 57 22 2C 22 12 52 4F 57 92 22 00 AA 11 EA |"OW",".ROW."....|
00000990: 0B 83 22 20 20 48 2E 2E 53 45 22 2C 22 4F 55 22 |.." H..SE","OU"|
000009A0: 2C 22 12 48 4F 55 53 45 92 22 00 C7 11 F4 0B 83 |,".HOUSE."......|
000009B0: 22 20 42 52 2E 2E 4E 22 2C 22 4F 57 22 2C 22 12 |" BR..N","OW",".|
000009C0: 42 52 4F 57 4E 92 22 00 E1 11 FE 0B 83 22 20 20 |BROWN."......" |
000009D0: 4D 2E 2E 22 2C 22 4F 57 22 2C 22 12 4D 4F 57 92 |M..","OW",".MOW.|
000009E0: 22 00 FC 11 08 0C 83 22 20 42 4C 2E 2E 22 2C 22 |"......" BL..","|
000009F0: 4F 57 22 2C 22 12 42 4C 4F 57 92 22 00 18 12 12 |OW",".BLOW."....|
00000A00: 0C 83 22 20 20 48 2E 2E 4C 22 2C 22 4F 57 22 2C |.." H..L","OW",|
00000A10: 22 12 48 4F 57 4C 92 22 00 33 12 1C 0C 83 22 20 |".HOWL.".3...." |
00000A20: 53 54 2E 2E 22 2C 22 4F 57 22 2C 22 12 53 54 4F |ST..","OW",".STO|
00000A30: 57 92 22 00 51 12 26 0C 83 22 20 20 4D 2E 2E 54 |W.".Q.&.." M..T|
00000A40: 48 22 2C 22 4F 55 22 2C 22 12 4D 4F 55 54 48 92 |H","OU",".MOUTH.|
00000A50: 22 00 6E 12 30 0C 83 22 20 47 52 2E 2E 4C 22 2C |".n.0.." GR..L",|
00000A60: 22 4F 57 22 2C 22 12 47 52 4F 57 4C 92 22 00 8D |"OW",".GROWL."..|
00000A70: 12 3A 0C 83 22 20 53 48 2E 2E 45 52 22 2C 22 4F |.:.." SH..ER","O|
00000A80: 57 22 2C 22 12 53 48 4F 57 45 52 92 22 00 A8 12 |W",".SHOWER."...|
00000A90: 44 0C 83 22 20 4B 4E 2E 2E 22 2C 22 4F 57 22 2C |D.." KN..","OW",|
00000AA0: 22 12 4B 4E 4F 57 92 22 00 C6 12 4E 0C 83 22 20 |".KNOW."...N.." |
00000AB0: 20 53 2E 2E 4E 44 22 2C 22 4F 55 22 2C 22 12 53 | S..ND","OU",".S|
00000AC0: 4F 55 4E 44 92 22 00 E5 12 58 0C 83 22 20 41 52 |OUND."...X.." AR|
00000AD0: 2E 2E 4E 44 22 2C 22 4F 55 22 2C 22 12 41 52 4F |..ND","OU",".ARO|
00000AE0: 55 4E 44 92 22 00 FF 12 62 0C 83 22 20 20 42 2E |UND."...b.." B.|
00000AF0: 2E 22 2C 22 4F 57 22 2C 22 12 42 4F 57 92 22 00 |.","OW",".BOW.".|
00000B00: 1B 13 6C 0C 83 22 20 20 44 2E 2E 4E 22 2C 22 4F |..l.." D..N","O|
00000B10: 57 22 2C 22 12 44 4F 57 4E 92 22 00 39 13 76 0C |W",".DOWN.".9.v.|
00000B20: 83 22 20 20 50 2E 2E 4E 44 22 2C 22 4F 55 22 2C |." P..ND","OU",|
00000B30: 22 12 50 4F 55 4E 44 92 22 00 56 13 80 0C 83 22 |".POUND.".V...."|
00000B40: 20 53 48 2E 2E 54 22 2C 22 4F 55 22 2C 22 12 53 | SH..T","OU",".S|
00000B50: 48 4F 55 54 92 22 00 74 13 8A 0C 83 22 20 20 54 |HOUT.".t...." T|
00000B60: 2E 2E 45 52 22 2C 22 4F 57 22 2C 22 12 54 4F 57 |..ER","OW",".TOW|
00000B70: 45 52 92 22 00 8F 13 94 0C 83 22 20 53 48 2E 2E |ER."......" SH..|
00000B80: 22 2C 22 4F 57 22 2C 22 12 53 48 4F 57 92 22 00 |","OW",".SHOW.".|
00000B90: B0 13 9E 0C 83 22 20 47 52 2E 2E 49 4E 47 22 2C |....." GR..ING",|
00000BA0: 22 4F 57 22 2C 22 12 47 52 4F 57 49 4E 47 92 22 |"OW",".GROWING."|
00000BB0: 00 CD 13 A8 0C 83 22 20 43 52 2E 2E 44 22 2C 22 |......" CR..D","|
00000BC0: 4F 57 22 2C 22 12 43 52 4F 57 44 92 22 00 E7 13 |OW",".CROWD."...|
00000BD0: B2 0C 83 22 20 20 57 2E 2E 22 2C 22 4F 57 22 2C |..." W..","OW",|
00000BE0: 22 12 57 4F 57 92 22 00 01 14 BC 0C 83 22 20 20 |".WOW."......" |
00000BF0: 48 2E 2E 22 2C 22 4F 57 22 2C 22 12 48 4F 57 92 |H..","OW",".HOW.|
00000C00: 22 00 1E 14 C6 0C 83 22 20 20 20 2E 2E 43 48 22 |"......" ..CH"|
00000C10: 2C 22 4F 55 22 2C 22 12 4F 55 43 48 92 22 00 3A |,"OU",".OUCH.".:|
00000C20: 14 D0 0C 83 22 41 52 52 2E 2E 22 2C 22 4F 57 22 |...."ARR..","OW"|
00000C30: 2C 22 12 41 52 52 4F 57 92 22 00 5A 14 DA 0C 83 |,".ARROW.".Z....|
00000C40: 22 20 20 43 2E 2E 41 52 44 22 2C 22 4F 57 22 2C |" C..ARD","OW",|
00000C50: 22 12 43 4F 57 41 52 44 92 22 00 76 14 E4 0C 83 |".COWARD.".v....|
00000C60: 22 42 45 4C 2E 2E 22 2C 22 4F 57 22 2C 22 12 42 |"BEL..","OW",".B|
00000C70: 45 4C 4F 57 12 22 00 96 14 EE 0C 83 22 20 20 50 |ELOW."......" P|
00000C80: 2E 2E 44 45 52 22 2C 22 4F 57 22 2C 22 12 50 4F |..DER","OW",".PO|
00000C90: 57 44 45 52 92 22 00 B1 14 F8 0C 83 22 20 47 52 |WDER."......" GR|
00000CA0: 2E 2E 22 2C 22 4F 57 22 2C 22 12 47 52 4F 57 92 |..","OW",".GROW.|
00000CB0: 22 00 CC 14 02 0D 83 22 20 42 52 2E 2E 22 2C 22 |"......" BR..","|
00000CC0: 4F 57 22 2C 22 12 42 52 4F 57 92 22 00 EB 14 0C |OW",".BROW."....|
00000CD0: 0D 83 22 20 53 4C 2E 2E 4C 59 22 2C 22 4F 57 22 |.." SL..LY","OW"|
00000CE0: 2C 22 12 53 4C 4F 57 4C 59 12 22 00 09 15 16 0D |,".SLOWLY.".....|
00000CF0: 83 22 20 20 42 2E 2E 4E 44 22 2C 22 4F 55 22 2C |." B..ND","OU",|
00000D00: 22 12 42 4F 55 4E 44 92 22 00 28 15 20 0D 83 22 |".BOUND.".(. .."|
00000D10: 20 46 4C 2E 2E 45 52 22 2C 22 4F 57 22 2C 22 12 | FL..ER","OW",".|
00000D20: 46 4C 4F 57 45 52 92 22 00 45 15 2A 0D 83 22 20 |FLOWER.".E.*.." |
00000D30: 47 52 2E 2E 4C 22 2C 22 4F 57 22 2C 22 12 47 52 |GR..L","OW",".GR|
00000D40: 4F 57 4C 92 22 00 61 15 34 0D 83 22 42 45 4C 2E |OWL.".a.4.."BEL.|
00000D50: 2E 22 2C 22 4F 57 22 2C 22 12 42 45 4C 4F 57 92 |.","OW",".BELOW.|
00000D60: 22 00 7D 15 3E 0D 83 22 54 48 52 2E 2E 22 2C 22 |".}.>.."THR..","|
00000D70: 4F 57 22 2C 22 12 54 48 52 4F 57 92 22 00 98 15 |OW",".THROW."...|
00000D80: 48 0D 83 22 20 53 4E 2E 2E 22 2C 22 4F 57 22 2C |H.." SN..","OW",|
00000D90: 22 12 53 4E 4F 57 12 22 00 B5 15 52 0D 83 22 20 |".SNOW."...R.." |
00000DA0: 43 4C 2E 2E 4E 22 2C 22 4F 57 22 2C 22 12 43 4C |CL..N","OW",".CL|
00000DB0: 4F 57 4E 92 22 00 D3 15 5C 0D 83 22 20 20 50 2E |OWN."...\.." P.|
00000DC0: 2E 45 52 22 2C 22 4F 57 22 2C 22 12 50 4F 57 45 |.ER","OW",".POWE|
00000DD0: 52 92 22 00 F0 15 66 0D 83 22 20 44 52 2E 2E 4E |R."...f.." DR..N|
00000DE0: 22 2C 22 4F 57 22 2C 22 12 44 52 4F 57 4E 92 22 |","OW",".DROWN."|
00000DF0: 00 F6 15 24 13 8F 00 FC 15 2E 13 8F 00 1D 16 38 |...$...........8|
00000E00: 13 8F 20 4C 49 4E 45 53 20 35 30 30 30 2D 31 30 |.. LINES 5000-10|
00000E10: 31 31 30 20 47 49 56 45 53 20 54 48 45 00 39 16 |110 GIVES THE.9.|
00000E20: 42 13 8F 20 53 54 55 44 45 4E 54 20 48 49 53 20 |B.. STUDENT HIS |
00000E30: 53 43 4F 52 45 20 41 4E 44 00 58 16 4C 13 8F 20 |SCORE AND.X.L.. |
00000E40: 43 41 4C 43 55 4C 41 54 45 53 20 48 49 53 20 50 |CALCULATES HIS P|
00000E50: 45 52 20 43 45 4E 54 2E 00 7A 16 56 13 8F 20 48 |ER CENT..z.V.. H|
00000E60: 45 20 49 53 20 54 48 45 4E 20 47 49 56 45 4E 20 |E IS THEN GIVEN |
00000E70: 54 48 45 20 4F 50 54 49 4F 4E 00 98 16 60 13 8F |THE OPTION...`..|
00000E80: 20 4F 46 20 53 54 41 52 54 49 4E 47 20 41 47 41 | OF STARTING AGA|
00000E90: 49 4E 20 4F 52 20 4F 46 00 B2 16 6A 13 8F 20 4C |IN OR OF...j.. L|
00000EA0: 45 41 56 49 4E 47 20 54 48 45 20 50 52 4F 47 52 |EAVING THE PROGR|
00000EB0: 41 4D 00 B8 16 74 13 8F 00 BE 16 7E 13 8F 00 C7 |AM...t.....~....|
00000EC0: 16 88 13 99 22 93 22 00 ED 16 92 13 99 22 11 11 |...."."......"..|
00000ED0: 11 11 59 4F 55 20 47 4F 54 22 4E 22 43 4F 52 52 |..YOU GOT"N"CORR|
00000EE0: 45 43 54 20 4F 55 54 20 4F 46 22 43 4F 00 11 17 |ECT OUT OF"CO...|
00000EF0: 9C 13 99 22 11 11 54 48 41 54 20 49 53 22 3B B5 |..."..THAT IS";.|
00000F00: 28 4E AD 43 4F AC 31 30 30 AA 2E 35 29 22 1C 25 |(N.CO.100..5)".%|
00000F10: 22 00 46 17 10 27 99 22 11 11 11 11 11 11 1D 1D |".F..'."........|
00000F20: 1D 57 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 |.WOULD YOU LIKE |
00000F30: 54 4F 20 54 52 59 20 41 47 41 49 4E 3F 28 59 45 |TO TRY AGAIN?(YE|
00000F40: 53 2F 4E 4F 29 22 00 4F 17 15 27 85 20 41 24 00 |S/NO)".O..'. A$.|
00000F50: 69 17 1A 27 8B 20 C8 28 41 24 2C 31 29 B2 22 59 |i..'. .(A$,1)."Y|
00000F60: 22 20 A7 20 8A 20 37 39 30 00 72 17 1F 27 99 22 |" . . 790.r..'."|
00000F70: 93 22 00 7A 17 20 27 8F 20 CC 00 80 17 21 27 8F |.".z. '. ....!'.|
00000F80: 00 86 17 22 27 8F 00 A7 17 23 27 8F 20 54 48 45 |..."'....#'. THE|
00000F90: 20 42 41 4C 41 4E 43 45 20 4F 46 20 54 48 45 20 | BALANCE OF THE |
00000FA0: 50 52 4F 47 52 41 4D 00 C7 17 24 27 8F 20 50 52 |PROGRAM...$'. PR|
00000FB0: 49 4E 54 53 20 41 20 48 41 50 50 59 20 46 41 43 |INTS A HAPPY FAC|
00000FC0: 45 20 57 48 49 43 48 00 E9 17 25 27 8F 20 52 45 |E WHICH...%'. RE|
00000FD0: 4D 41 49 4E 53 20 4F 4E 20 54 48 45 20 53 43 52 |MAINS ON THE SCR|
00000FE0: 45 45 4E 20 55 4E 54 49 4C 00 05 18 26 27 8F 20 |EEN UNTIL...&'. |
00000FF0: 41 4E 59 20 4B 45 59 20 49 53 20 44 45 50 52 45 |ANY KEY IS DEPRE|
00001000: 53 53 45 44 2E 00 0B 18 27 27 8F 00 11 18 28 27 |SSED....''....('|
00001010: 8F 00 2D 18 29 27 99 22 11 11 22 3A 97 35 33 32 |..-.)'."..":.532|
00001020: 38 30 2C 35 3A 97 35 33 32 38 31 2C 30 00 49 18 |80,5:.53281,0.I.|
00001030: 2E 27 99 22 05 22 3A 20 8F 20 43 55 52 53 4F 52 |.'.".": . CURSOR|
00001040: 20 54 4F 20 57 48 49 54 45 00 5C 18 42 27 99 A3 | TO WHITE.\.B'..|
00001050: 31 34 29 22 20 20 20 20 D1 D1 D1 22 00 71 18 4C |14)" ...".q.L|
00001060: 27 99 A3 31 34 29 22 20 20 D1 D1 20 20 20 D1 D1 |'..14)" .. ..|
00001070: 22 00 87 18 56 27 99 A3 31 34 29 22 20 D1 20 20 |"...V'..14)" . |
00001080: 2A 20 2A 20 20 D1 22 00 9E 18 60 27 99 A3 31 34 |* * ."...`'..14|
00001090: 29 22 D1 20 20 20 20 C7 20 20 20 20 D1 22 00 B5 |)". . ."..|
000010A0: 18 6A 27 99 A3 31 34 29 22 D1 20 20 20 20 20 20 |.j'..14)". |
000010B0: 20 20 20 D1 22 00 CB 18 74 27 99 A3 31 34 29 22 | ."...t'..14)"|
000010C0: 20 D1 20 CD D2 D2 D2 CE 20 D1 22 00 E0 18 7E 27 | . ..... ."...~'|
000010D0: 99 A3 31 34 29 22 20 20 D1 20 20 20 20 20 D1 22 |..14)" . ."|
000010E0: 00 F4 18 88 27 99 A3 31 34 29 22 20 20 20 D1 D1 |....'..14)" ..|
000010F0: D1 D1 D1 22 00 FC 18 8D 27 8F 20 CC 00 27 19 3C |..."....'. ..'.<|
00001100: 28 99 22 11 11 1D 1D 1D 1D 1D 1D 4F 4B 41 59 2C |(."........OKAY,|
00001110: 20 54 48 41 4E 4B 20 59 4F 55 20 46 4F 52 20 50 | THANK YOU FOR P|
00001120: 4C 41 59 49 4E 47 22 00 55 19 46 28 99 22 11 1D |LAYING".U.F(."..|
00001130: 1D 1D 1D 1D 1D 2E 2E 2E 41 4E 44 20 48 41 56 45 |........AND HAVE|
00001140: 20 41 20 48 41 50 50 59 20 12 4F 55 2F 4F 57 92 | A HAPPY .OU/OW.|
00001150: 20 44 41 59 22 00 6D 19 50 28 A1 20 4A 24 3A 8B | DAY".m.P(. J$:.|
00001160: 20 4A 24 B2 22 22 A7 20 31 30 33 32 30 00 76 19 | J$."". 10320.v.|
00001170: 64 28 99 22 93 22 00 7C 19 65 28 80 00 84 19 5A |d(.".".|.e(....Z|
00001180: 4E 8F 20 CC 00 00 00 |N. .... |
....... ***GRAMMAR DRILL***.>.... DRILL
IN SPELLING WORDS WITH.E.... *OU/OW* SUI
TABLE FOR GRADES 4-8..K.......... PROGRA
M DEVELOPED...... BY J J URSANO SPRINGDA
LE PARK.K.... BRACEBEODGE, ONTARIO APRIL
/83.S.... L...... LINES 20 TO 510 SET UP
AND...... PRINT THE PROGRAM TITLE......
.......,...."......".T.... 53280,5:.5328
1,7:. SCREEN COLOURS.R....".": . SET CUR
SOR TO RED.Z.... L...... I.1.25...... .7
)".";...... 500...(.....-.....2.. I.1.5.
E.<.. .31)".".O.F.. 500.U.P.....Z.. I.31
. 7 ..1...D...I)".."...N.. 500...X.....
... I.1.5. .... .7)"...".*.... 500.0. ..
.[....".............................OU/O
W.".X.....14)".....BY J. URSANO"...... Y
.1.3500:....H.."."...... 800...... L.1.3
0:....................X.... LINES 800 TO
950 ARE...... INSTRUCTIONS FOR STUDENTS
.................."."./. ...8)"......R E
M E M B E R .".U.*.."........1) OU OR O
W CAN SAY OU".U.4..".......2) OW SAYS LO
NG O"...H.."...........PRESS.*ANY KEY*.W
HEN READY"...R.. K$:. K$."". 850.A.\..".
"......"..............TYPE THE MISSING L
ETTERS"......"......TO COMPLETE THE WORD
".*....".........EXAMPLE:".@.... "......
.......".L.... ".............SH..T WOULD
BE SH.OU.T"......"............DDDDDDDDD
DDDDDDDDDDD"......"..........PRESS.*ANY
KEY*.WHEN READY".V.... K$:. K$."". 960..
.P.....Q.....T.. L...U.. PUTTING DATA IN
TO ARRAY.(.Z.. A$=WORD WITH BLANK(M..TH)
.J.... B$=CORRECT ANSWER(OU OR OW).G....
C$=CORRECT WORD(MOUTH)...... P1 IS SIZE
OF ARRAY...........P1.44......A$(P1),B$
(P1),C$(P1)...... I.1.P1.O....A$(I),B$(I
),C$(I).W.... I............ RANDOMIZE A
ND PRESENT WORDS...... AND SET COUNTER A
T 0.!.....'.....8. .I.0:CO.0:N.0.N.*.I..
(P1.(.(TI)).1).W.4.."."...9.. 53280,9:.5
3281,15:.".": . SET CURSOR TO BLACK...>.
CO.CO.1...H.."",.13)...R.."..."A$(I).B.\
..".",.16)...A.. CHECK TO SEE THAT ANSWE
R IS...C.. CORRECT...D.....F..D$:.D$."".
2150. .P..E$:.E$."".2160.-.U.Z$.D$.E$.9.
Z..".";Z$.R.... D$.E$.B$(I) . 2220.U....
"..SORRY,THAT IS NOT CORRECT"......"..TH
E ANSWER IS ";C$(I)...... 2240.....N.N.1
.I.... STUDENT OPTION TO CONTINUE......
OR TO CHECK SCORE............"..........
.....WELL DONE!".2....".... PRESS .SPACE
BAR. TO CONTINUE".W.J..".... PRESS .S.
TO SEE .SCORE.".L.... R$:.R$."".2280....
.. R$.G(32) . 2090...... R$."S" . 5000..
.... 2280...B.." ..CH","OU",".OUCH.".Z
.L.."ARR..","OW",".ARROW."...I.....N....
.... DATA STATEMENTS BEGIN...... L......
............ L.:.B.."ALL..","OW",".ALLOW
.".T.L.." D..N","OW",RDOWN".R.V.." H..
ND","OU",".HOUND."......" R..","OW",".R
OW."......" H..SE","OU",".HOUSE.".G....
" BR..N","OW",".BROWN."......" M..","OW
",".MOW."......" BL..","OW",".BLOW."....
.." H..L","OW",".HOWL.".3...." ST..","O
W",".STOW.".Q.&.." M..TH","OU",".MOUTH.
".N.0.." GR..L","OW",".GROWL."...:.." SH
..ER","OW",".SHOWER."...D.." KN..","OW",
".KNOW.".F.N.." S..ND","OU",".SOUND."..
.X.." AR..ND","OU",".AROUND."...B.." B.
.","OW",".BOW."...L.." D..N","OW",".DOW
N.".9.V.." P..ND","OU",".POUND.".V...."
SH..T","OU",".SHOUT.".T...." T..ER","O
W",".TOWER."......" SH..","OW",".SHOW.".
....." GR..ING","OW",".GROWING.".M...."
CR..D","OW",".CROWD."......" W..","OW",
".WOW."......" H..","OW",".HOW."...F.."
..CH","OU",".OUCH.".:.P.."ARR..","OW"
,".ARROW.".Z.Z.." C..ARD","OW",".COWARD
.".V...."BEL..","OW",".BELOW."......" P
..DER","OW",".POWDER."......" GR..","OW"
,".GROW.".L...." BR..","OW",".BROW."....
.." SL..LY","OW",".SLOWLY."......" B..N
D","OU",".BOUND.".(. .." FL..ER","OW",".
FLOWER.".E.*.." GR..L","OW",".GROWL.".A.
4.."BEL..","OW",".BELOW.".}.>.."THR..","
OW",".THROW."...H.." SN..","OW",".SNOW."
...R.." CL..N","OW",".CLOWN.".S.\.." P.
.ER","OW",".POWER."...F.." DR..N","OW","
.DROWN."...$...........8.. LINES 5000-10
110 GIVES THE.9.B.. STUDENT HIS SCORE AN
D.X.L.. CALCULATES HIS PER CENT..Z.V.. H
E IS THEN GIVEN THE OPTION...`.. OF STAR
TING AGAIN OR OF...J.. LEAVING THE PROGR
AM...T.....~...G...."."......"....YOU GO
T"N"CORRECT OUT OF"CO......"..THAT IS";.
(N.CO.100..5)".%".F..'.".........WOULD Y
OU LIKE TO TRY AGAIN?(YES/NO)".O..'. A$.
I..'. H(A$,1)."Y" . . 790.R..'.".".Z. '.
L...!'...."'....#'. THE BALANCE OF THE
PROGRAM.G.$'. PRINTS A HAPPY FACE WHICH.
..%'. REMAINS ON THE SCREEN UNTIL...&'.
ANY KEY IS DEPRESSED....''....('..-.)'."
..":.53280,5:.53281,0.I..'.".": . CURSOR
TO WHITE.\.B'..14)" QQQ".Q.L'..14)"
QQ QQ"...V'..14)" Q * * Q"...`'..14
)"Q G Q"...J'..14)"Q Q".K.
T'..14)" Q MRRRN Q"...~'..14)" Q Q"
....'..14)" QQQQQ"....'. L.'.<(.".....
...OKAY, THANK YOU FOR PLAYING".U.F(."..
........AND HAVE A HAPPY .OU/OW. DAY".M.
P(. J$:. J$."". 10320.V.D(.".".|.E(....Z
N. L...
> CLICK IMAGE PREVIEW FOR FULL MODAL