DRILL IE/EI.C
FILE INFORMATION
FILENAME(S): DRILL IE/EI.C
FILE TYPE(S): PRG
FILE SIZE: 4K
FIRST SEEN: 2025-11-30 21:07:08
APPEARS ON: 1 disk(s)
FILE HASH
93f6c3ddf37c21827a286e2275eeccb6abbd31b809f8bf94b2d6b5b8bc7254ba
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUGMORENOV841 C | DRILL IE/EI.C | PRG | DuncanTwain | 27 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 02 00 99 22 9B 22 00 10 08 03 00 8F |......."."......|
00000010: 00 2A 08 05 00 8F 20 2A 2A 2A 47 52 41 4D 4D 41 |.*.... ***GRAMMA|
00000020: 52 20 44 52 49 4C 4C 2A 2A 2A 00 4D 08 07 00 8F |R DRILL***.M....|
00000030: 20 44 52 49 4C 4C 20 49 4E 20 53 50 45 4C 4C 49 | DRILL IN SPELLI|
00000040: 4E 47 20 57 4F 52 44 53 20 57 49 54 48 00 74 08 |NG WORDS WITH.t.|
00000050: 09 00 8F 20 2A 49 45 2F 45 49 2A 20 53 55 49 54 |... *IE/EI* SUIT|
00000060: 41 42 4C 45 20 46 4F 52 20 47 52 41 44 45 53 20 |ABLE FOR GRADES |
00000070: 34 2D 38 2E 00 7A 08 0A 00 8F 00 A0 08 0B 00 8F |4-8..z..........|
00000080: 20 50 52 4F 47 52 41 4D 4D 45 20 44 45 56 45 4C | PROGRAMME DEVEL|
00000090: 4F 50 45 44 20 42 59 20 4A 20 55 52 53 41 4E 4F |OPED BY J URSANO|
000000A0: 00 BB 08 0C 00 8F 20 53 50 52 49 4E 47 44 41 4C |...... SPRINGDAL|
000000B0: 45 20 50 41 52 4B 20 52 4F 41 44 00 DD 08 0D 00 |E PARK ROAD.....|
000000C0: 8F 20 42 52 41 43 45 42 52 4F 44 47 45 2E 20 4F |. BRACEBRODGE. O|
000000D0: 4E 54 41 52 49 4F 20 28 31 39 38 33 29 00 FD 08 |NTARIO (1983)...|
000000E0: 0E 00 8F 20 52 4F 41 44 2C 20 42 52 41 43 45 42 |... ROAD, BRACEB|
000000F0: 52 49 44 47 45 2C 4F 4E 54 41 52 49 4F 00 05 09 |RIDGE,ONTARIO...|
00000100: 0F 00 8F 20 CC 00 0C 09 12 00 8F CC 00 23 09 13 |... .........#..|
00000110: 00 97 35 33 32 38 30 2C 38 3A 97 20 35 33 32 38 |..53280,8:. 5328|
00000120: 31 2C 36 00 31 09 14 00 99 22 93 11 11 11 11 11 |1,6.1...."......|
00000130: 22 00 3E 09 18 00 81 20 49 B2 31 A4 32 35 00 4C |".>.... I.1.25.L|
00000140: 09 19 00 99 20 A3 37 29 22 D1 22 3B 00 56 09 1E |.... .7)".";.V..|
00000150: 00 8D 20 35 30 30 00 5C 09 28 00 82 00 62 09 2D |.. 500.\.(...b.-|
00000160: 00 99 00 6E 09 32 00 81 20 49 B2 31 A4 35 00 7C |...n.2.. I.1.5.||
00000170: 09 3C 00 99 20 A3 33 31 29 22 D1 22 00 86 09 46 |.<.. .31)"."...F|
00000180: 00 8D 20 35 30 30 00 8C 09 50 00 82 00 9F 09 5A |.. 500...P.....Z|
00000190: 00 81 20 49 B2 33 31 20 A4 20 37 20 A9 AB 31 00 |.. I.31 . 7 ..1.|
000001A0: AC 09 64 00 99 A3 49 29 22 91 D1 22 00 B6 09 6E |..d...I)".."...n|
000001B0: 00 8D 20 35 30 30 00 BC 09 78 00 82 00 C8 09 82 |.. 500...x......|
000001C0: 00 81 20 49 B2 31 A4 35 00 D7 09 8C 00 99 20 A3 |.. I.1.5...... .|
000001D0: 37 29 22 91 91 D1 22 00 E1 09 96 00 8D 20 35 30 |7)"..."...... 50|
000001E0: 30 00 E7 09 A0 00 82 00 10 0A AA 00 99 22 13 1D |0............"..|
000001F0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000200: 11 11 11 11 11 11 11 11 12 49 45 2F 45 49 12 22 |.........IE/EI."|
00000210: 00 2D 0A B4 00 99 A3 31 34 29 22 11 11 11 11 11 |.-.....14)".....|
00000220: 42 59 20 4A 2E 20 55 52 53 41 4E 4F 22 00 3E 0A |BY J. URSANO".>.|
00000230: BE 00 81 20 59 B2 31 A4 33 35 30 30 3A 82 00 47 |... Y.1.3500:..G|
00000240: 0A C8 00 99 22 93 22 00 51 0A F3 01 89 20 38 30 |....".".Q.... 80|
00000250: 30 00 60 0A F4 01 81 20 4C B2 31 A4 34 35 3A 82 |0.`.... L.1.45:.|
00000260: 00 66 0A FE 01 8E 00 6C 0A EE 02 8F 00 74 0A EF |.f.....l.....t..|
00000270: 02 8F 20 CC 00 7A 0A F8 02 8F 00 95 0A 02 03 8F |.. ..z..........|
00000280: 20 4C 49 4E 45 53 20 38 30 30 20 54 4F 20 39 36 | LINES 800 TO 96|
00000290: 30 20 41 52 45 00 B5 0A 0C 03 8F 20 49 4E 53 54 |0 ARE...... INST|
000002A0: 52 55 43 54 49 4F 4E 53 20 46 4F 52 20 53 54 55 |RUCTIONS FOR STU|
000002B0: 44 45 4E 54 53 00 BB 0A 11 03 8F 00 C1 0A 12 03 |DENTS...........|
000002C0: 8F 00 CA 0A 16 03 99 22 93 22 00 EC 0A 20 03 99 |......."."... ..|
000002D0: A3 38 29 22 11 11 11 11 11 12 52 20 45 20 4D 20 |.8)"......R E M |
000002E0: 45 20 4D 20 42 20 45 20 52 20 92 22 00 08 0B 2A |E M B E R ."...*|
000002F0: 03 99 22 11 11 11 11 1D 1D 1D 1D 31 29 20 49 45 |.."........1) IE|
00000300: 20 53 41 59 53 20 45 22 00 21 0B 34 03 99 22 11 | SAYS E".!.4..".|
00000310: 1D 1D 1D 1D 32 29 20 45 49 20 53 41 59 53 20 41 |....2) EI SAYS A|
00000320: 22 00 4E 0B 3E 03 99 22 11 1D 1D 1D 1D 33 29 20 |".N.>..".....3) |
00000330: 50 55 54 20 49 20 42 45 46 4F 52 45 20 45 20 45 |PUT I BEFORE E E|
00000340: 58 43 45 50 54 20 41 46 54 45 52 20 43 2E 00 7B |XCEPT AFTER C..{|
00000350: 0B 48 03 99 22 11 11 11 11 11 11 1D 1D 1D 1D 1D |.H.."...........|
00000360: 50 52 45 53 53 12 2A 41 4E 59 20 4B 45 59 2A 92 |PRESS.*ANY KEY*.|
00000370: 57 48 45 4E 20 52 45 41 44 59 22 00 91 0B 52 03 |WHEN READY"...R.|
00000380: A1 20 4B 24 3A 8B 20 4B 24 B2 22 22 A7 20 38 35 |. K$:. K$."". 85|
00000390: 30 00 9A 0B 5C 03 99 22 93 22 00 C8 0B 84 03 99 |0...\.."."......|
000003A0: 22 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 54 |"..............T|
000003B0: 59 50 45 20 54 48 45 20 4D 49 53 53 49 4E 47 20 |YPE THE MISSING |
000003C0: 4C 45 54 54 45 52 53 22 00 EA 0B 8E 03 99 22 11 |LETTERS"......".|
000003D0: 1D 1D 1D 1D 1D 54 4F 20 43 4F 4D 50 4C 45 54 45 |.....TO COMPLETE|
000003E0: 20 54 48 45 20 57 4F 52 44 22 00 03 0C 98 03 99 | THE WORD"......|
000003F0: 22 11 11 11 11 1D 1D 1D 1D 1D 45 58 41 4D 50 4C |".........EXAMPL|
00000400: 45 3A 22 00 19 0C 9D 03 99 20 22 1D 1D 1D 1D 1D |E:"...... ".....|
00000410: A3 A3 A3 A3 A3 A3 A3 A3 22 00 45 0C A2 03 99 20 |........".E.... |
00000420: 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 47 52 |".............GR|
00000430: 2E 2E 46 20 57 4F 55 4C 44 20 42 45 20 47 52 12 |..F WOULD BE GR.|
00000440: 49 45 92 46 22 00 6D 0C AC 03 99 22 1D 1D 1D 1D |IE.F".m...."....|
00000450: 1D 1D 1D 1D 1D 1D 1D 1D C4 C4 C4 C4 C4 C4 C4 C4 |................|
00000460: C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 C4 22 00 99 0C |............"...|
00000470: B6 03 99 22 11 11 11 11 11 1D 1D 1D 1D 1D 50 52 |..."..........PR|
00000480: 45 53 53 12 2A 41 4E 59 20 4B 45 59 2A 92 57 48 |ESS.*ANY KEY*.WH|
00000490: 45 4E 20 52 45 41 44 59 22 00 AF 0C C0 03 A1 20 |EN READY"...... |
000004A0: 4B 24 3A 8B 20 4B 24 B2 22 22 A7 20 39 36 30 00 |K$:. K$."". 960.|
000004B0: C5 0C E8 03 97 35 33 32 38 30 2C 38 3A 97 35 33 |.....53280,8:.53|
000004C0: 32 38 31 2C 30 00 CD 0C C6 07 8F 20 CC 00 D3 0C |281,0...... ....|
000004D0: D0 07 8F 00 D9 0C D1 07 8F 00 F7 0C D5 07 8F 20 |............... |
000004E0: 50 55 54 54 49 4E 47 20 44 41 54 41 20 49 4E 54 |PUTTING DATA INT|
000004F0: 4F 20 41 52 52 41 59 00 17 0D DA 07 8F 20 41 24 |O ARRAY...... A$|
00000500: 3D 57 4F 52 44 20 57 49 54 48 20 42 4C 41 4E 4B |=WORD WITH BLANK|
00000510: 28 46 2E 2E 4C 44 29 00 39 0D DC 07 8F 20 42 24 |(F..LD).9.... B$|
00000520: 3D 43 4F 52 52 45 43 54 20 41 4E 53 57 45 52 28 |=CORRECT ANSWER(|
00000530: 49 45 20 4F 52 20 45 49 29 00 56 0D DE 07 8F 20 |IE OR EI).V.... |
00000540: 43 24 3D 43 4F 52 52 45 43 54 20 57 4F 52 44 28 |C$=CORRECT WORD(|
00000550: 46 49 45 4C 44 29 00 70 0D E0 07 8F 20 50 31 20 |FIELD).p.... P1 |
00000560: 49 53 20 53 49 5A 45 20 4F 46 20 41 52 52 41 59 |IS SIZE OF ARRAY|
00000570: 00 76 0D E2 07 8F 00 80 0D E3 07 50 31 B2 33 31 |.v.........P1.31|
00000580: 00 9A 0D E4 07 86 41 24 28 50 31 29 2C 42 24 28 |......A$(P1),B$(|
00000590: 50 31 29 2C 43 24 28 50 31 29 00 A7 0D EE 07 81 |P1),C$(P1)......|
000005A0: 20 49 B2 31 A4 50 31 00 BE 0D F8 07 87 41 24 28 | I.1.P1......A$(|
000005B0: 49 29 2C 42 24 28 49 29 2C 43 24 28 49 29 00 C6 |I),B$(I),C$(I)..|
000005C0: 0D 02 08 82 20 49 00 CC 0D 0B 08 8F 00 EF 0D 0C |.... I..........|
000005D0: 08 8F 20 20 52 41 4E 44 4F 4D 49 5A 45 20 41 4E |.. RANDOMIZE AN|
000005E0: 44 20 50 52 45 53 45 4E 54 20 57 4F 52 44 53 00 |D PRESENT WORDS.|
000005F0: 0A 0E 11 08 8F 20 41 4E 44 20 53 45 54 20 43 4F |..... AND SET CO|
00000600: 55 4E 54 45 52 20 41 54 20 30 00 12 0E 12 08 8F |UNTER AT 0......|
00000610: 20 CC 00 18 0E 16 08 8F 00 1E 0E 1B 08 8F 00 2F | ............../|
00000620: 0E 20 08 49 B2 30 3A 43 4F B2 30 3A 4E B2 30 00 |. .I.0:CO.0:N.0.|
00000630: 45 0E 2A 08 49 B2 B5 28 50 31 AC 28 BB 28 54 49 |E.*.I..(P1.(.(TI|
00000640: 29 29 AA 31 29 00 4E 0E 34 08 99 22 93 22 00 5A |)).1).N.4..".".Z|
00000650: 0E 3E 08 43 4F B2 43 4F AA 31 00 67 0E 48 08 99 |.>.CO.CO.1.g.H..|
00000660: 22 22 2C A3 31 33 29 00 77 0E 52 08 99 22 11 11 |"",.13).w.R.."..|
00000670: 11 22 41 24 28 49 29 00 85 0E 5C 08 99 22 91 22 |."A$(I)...\.."."|
00000680: 2C A3 31 36 29 00 A7 0E 61 08 8F 20 43 48 45 43 |,.16)...a.. CHEC|
00000690: 4B 20 54 4F 20 53 45 45 20 54 48 41 54 20 41 4E |K TO SEE THAT AN|
000006A0: 53 57 45 52 20 49 53 00 B5 0E 63 08 8F 20 43 4F |SWER IS...c.. CO|
000006B0: 52 52 45 43 54 00 BB 0E 64 08 8F 00 CF 0E 66 08 |RRECT...d.....f.|
000006C0: A1 44 24 3A 8B 44 24 B2 22 22 A7 32 31 35 30 00 |.D$:.D$."".2150.|
000006D0: E3 0E 70 08 A1 45 24 3A 8B 45 24 B2 22 22 A7 32 |..p..E$:.E$."".2|
000006E0: 31 36 30 00 F0 0E 75 08 5A 24 B2 44 24 AA 45 24 |160...u.Z$.D$.E$|
000006F0: 00 FC 0E 7A 08 99 22 12 22 3B 5A 24 00 15 0F 84 |...z..".";Z$....|
00000700: 08 8B 20 44 24 AA 45 24 B2 42 24 28 49 29 20 A7 |.. D$.E$.B$(I) .|
00000710: 20 32 32 32 30 00 38 0F 8E 08 99 22 11 11 53 4F | 2220.8...."..SO|
00000720: 52 52 59 2C 54 48 41 54 20 49 53 20 4E 4F 54 20 |RRY,THAT IS NOT |
00000730: 43 4F 52 52 45 43 54 22 00 56 0F 98 08 99 22 11 |CORRECT".V....".|
00000740: 11 54 48 45 20 41 4E 53 57 45 52 20 49 53 20 22 |.THE ANSWER IS "|
00000750: 3B 43 24 28 49 29 00 61 0F A2 08 89 20 32 32 34 |;C$(I).a.... 224|
00000760: 30 00 6B 0F AC 08 4E B2 4E AA 31 00 8C 0F B0 08 |0.k...N.N.1.....|
00000770: 8F 20 53 54 55 44 45 4E 54 20 4F 50 54 49 4F 4E |. STUDENT OPTION|
00000780: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 00 A4 0F B2 | TO CONTINUE....|
00000790: 08 8F 20 4F 52 20 54 4F 20 43 48 45 43 4B 20 53 |.. OR TO CHECK S|
000007A0: 43 4F 52 45 00 AA 0F B4 08 8F 00 CB 0F B6 08 99 |CORE............|
000007B0: 22 11 11 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
000007C0: 57 45 4C 4C 20 44 4F 4E 45 21 22 00 FD 0F C0 08 |WELL DONE!".....|
000007D0: 99 20 22 11 11 11 11 11 11 11 50 52 45 53 53 20 |. ".......PRESS |
000007E0: 12 53 50 41 43 45 20 42 41 52 92 20 46 4F 52 20 |.SPACE BAR. FOR |
000007F0: 41 4E 4F 54 48 45 52 20 57 4F 52 44 22 00 23 10 |ANOTHER WORD".#.|
00000800: CA 08 99 20 22 11 11 11 11 11 50 52 45 53 53 20 |... ".....PRESS |
00000810: 12 53 92 20 54 4F 20 53 45 45 20 12 53 92 43 4F |.S. TO SEE .S.CO|
00000820: 52 45 22 00 38 10 E8 08 A1 20 52 24 3A 8B 52 24 |RE".8.... R$:.R$|
00000830: B2 22 22 A7 32 32 38 30 00 4E 10 F2 08 8B 20 52 |."".2280.N.... R|
00000840: 24 B2 C7 28 33 32 29 20 A7 20 32 30 39 30 00 62 |$..(32) . 2090.b|
00000850: 10 FC 08 8B 20 52 24 B2 22 53 22 20 A7 20 35 30 |.... R$."S" . 50|
00000860: 30 30 00 6D 10 0B 09 89 20 32 32 38 30 00 73 10 |00.m.... 2280.s.|
00000870: C9 09 8F 00 79 10 CE 09 8F 00 95 10 B8 0B 8F 20 |....y.......... |
00000880: 44 41 54 41 20 53 54 41 54 45 4D 45 4E 54 53 20 |DATA STATEMENTS |
00000890: 42 45 47 49 4E 00 9B 10 BD 0B 8F 00 A1 10 BE 0B |BEGIN...........|
000008A0: 8F 00 BF 10 1C 0C 83 22 20 20 57 2E 2E 47 48 22 |......." W..GH"|
000008B0: 2C 22 45 49 22 2C 22 12 57 45 49 47 48 92 22 00 |,"EI",".WEIGH.".|
000008C0: DC 10 26 0C 83 22 20 43 48 2E 2E 46 22 2C 22 49 |..&.." CH..F","I|
000008D0: 45 22 2C 22 12 43 48 49 45 46 92 22 00 FA 10 30 |E",".CHIEF."...0|
000008E0: 0C 83 22 20 20 4E 2E 2E 43 45 22 2C 22 49 45 22 |.." N..CE","IE"|
000008F0: 2C 22 12 4E 49 45 43 45 92 22 00 1A 11 3A 0C 83 |,".NIECE."...:..|
00000900: 22 42 45 4C 2E 2E 56 45 22 2C 22 49 45 22 2C 22 |"BEL..VE","IE","|
00000910: 12 42 45 4C 49 45 56 45 92 22 00 3B 11 44 0C 83 |.BELIEVE.".;.D..|
00000920: 22 20 46 52 2E 2E 47 48 54 22 2C 22 45 49 22 2C |" FR..GHT","EI",|
00000930: 22 12 46 52 45 49 47 48 54 92 22 00 5A 11 4E 0C |".FREIGHT.".Z.N.|
00000940: 83 22 20 20 20 2E 2E 47 48 54 22 2C 22 45 49 22 |." ..GHT","EI"|
00000950: 2C 22 12 45 49 47 48 54 92 22 00 7A 11 58 0C 83 |,".EIGHT.".z.X..|
00000960: 22 20 20 50 2E 2E 43 45 53 22 2C 22 49 45 22 2C |" P..CES","IE",|
00000970: 22 12 50 49 45 43 45 53 92 22 00 97 11 62 0C 83 |".PIECES."...b..|
00000980: 22 20 54 48 2E 2E 46 22 2C 22 49 45 22 2C 22 12 |" TH..F","IE",".|
00000990: 54 48 49 45 46 92 22 00 BB 11 6C 0C 83 22 20 20 |THIEF."...l.." |
000009A0: 52 2E 2E 4E 44 45 45 52 22 2C 22 45 49 22 2C 22 |R..NDEER","EI","|
000009B0: 12 52 45 49 4E 44 45 45 52 92 22 00 DC 11 76 0C |.REINDEER."...v.|
000009C0: 83 22 20 42 52 2E 2E 46 4C 59 22 2C 22 49 45 22 |." BR..FLY","IE"|
000009D0: 2C 22 12 42 52 49 45 46 4C 59 92 22 00 F9 11 80 |,".BRIEFLY."....|
000009E0: 0C 83 22 20 43 48 2E 2E 46 22 2C 22 49 45 22 2C |.." CH..F","IE",|
000009F0: 22 12 43 48 49 45 46 92 22 00 18 12 8A 0C 83 22 |".CHIEF."......"|
00000A00: 20 53 4C 2E 2E 47 48 22 2C 22 45 49 22 2C 22 12 | SL..GH","EI",".|
00000A10: 53 4C 45 49 47 48 92 22 00 37 12 94 0C 83 22 20 |SLEIGH.".7...." |
00000A20: 53 48 2E 2E 4C 44 22 2C 22 49 45 22 2C 22 12 53 |SH..LD","IE",".S|
00000A30: 48 49 45 4C 44 92 22 00 5C 12 9E 0C 83 22 20 20 |HIELD.".\...." |
00000A40: 4E 2E 2E 47 48 42 4F 55 52 22 2C 22 45 49 22 2C |N..GHBOUR","EI",|
00000A50: 22 12 4E 45 49 47 48 42 4F 55 52 22 00 7C 12 A8 |".NEIGHBOUR".|..|
00000A60: 0C 83 22 20 20 50 2E 2E 52 43 45 22 2C 22 49 45 |.." P..RCE","IE|
00000A70: 22 2C 22 12 50 49 45 52 43 45 92 22 00 9A 12 B2 |",".PIERCE."....|
00000A80: 0C 83 22 53 48 52 2E 2E 4B 22 2C 22 49 45 22 2C |.."SHR..K","IE",|
00000A90: 22 12 53 48 52 49 45 4B 92 22 00 B8 12 BC 0C 83 |".SHRIEK."......|
00000AA0: 22 20 20 56 2E 2E 4E 53 22 2C 22 45 49 22 2C 22 |" V..NS","EI","|
00000AB0: 12 56 45 49 4E 53 12 22 00 D7 12 C6 0C 83 22 20 |.VEINS."......" |
00000AC0: 20 44 2E 2E 53 45 4C 22 2C 22 49 45 22 2C 22 12 | D..SEL","IE",".|
00000AD0: 44 49 45 53 45 4C 22 00 F6 12 D0 0C 83 22 20 47 |DIESEL"......" G|
00000AE0: 52 2E 2E 56 45 22 2C 22 49 45 22 2C 22 12 47 52 |R..VE","IE",".GR|
00000AF0: 49 45 56 45 92 22 00 14 13 DA 0C 83 22 20 20 4E |IEVE."......" N|
00000B00: 2E 2E 47 48 22 2C 22 45 49 22 2C 22 12 4E 45 49 |..GH","EI",".NEI|
00000B10: 47 48 12 22 00 34 13 E4 0C 83 22 20 20 46 2E 2E |GH.".4...." F..|
00000B20: 52 43 45 22 2C 22 49 45 22 2C 22 12 46 49 45 52 |RCE","IE",".FIER|
00000B30: 43 45 92 22 00 50 13 EE 0C 83 22 20 20 50 2E 2E |CE.".P...." P..|
00000B40: 52 22 2C 22 49 45 22 2C 22 12 50 49 45 52 92 22 |R","IE",".PIER."|
00000B50: 00 6E 13 F8 0C 83 22 20 20 59 2E 2E 4C 44 22 2C |.n...." Y..LD",|
00000B60: 22 49 45 22 2C 22 12 59 49 45 4C 44 92 22 00 8D |"IE",".YIELD."..|
00000B70: 13 02 0D 83 22 20 50 52 2E 2E 53 54 22 2C 22 49 |...." PR..ST","I|
00000B80: 45 22 2C 22 12 50 52 49 45 53 54 92 22 00 AB 13 |E",".PRIEST."...|
00000B90: 0C 0D 83 22 42 45 4C 2E 2E 46 22 2C 22 49 45 22 |..."BEL..F","IE"|
00000BA0: 2C 22 12 42 45 4C 49 45 46 92 22 00 C9 13 16 0D |,".BELIEF.".....|
00000BB0: 83 22 52 45 4C 2E 2E 46 22 2C 22 49 45 22 2C 22 |."REL..F","IE","|
00000BC0: 12 52 45 4C 49 45 46 92 22 00 E7 13 20 0D 83 22 |.RELIEF."... .."|
00000BD0: 20 20 53 2E 2E 47 45 22 2C 22 49 45 22 2C 22 12 | S..GE","IE",".|
00000BE0: 53 49 45 47 45 92 22 00 08 14 2A 0D 83 22 20 54 |SIEGE."...*.." T|
00000BF0: 48 2E 2E 56 45 53 22 2C 22 49 45 22 2C 22 12 54 |H..VES","IE",".T|
00000C00: 48 49 45 56 45 53 92 22 00 28 14 34 0D 83 22 41 |HIEVES.".(.4.."A|
00000C10: 43 48 2E 2E 56 45 22 2C 22 49 45 22 2C 22 12 41 |CH..VE","IE",".A|
00000C20: 43 48 49 45 56 45 92 22 00 44 14 3E 0D 83 22 20 |CHIEVE.".D.>.." |
00000C30: 20 52 2E 2E 4E 22 2C 22 45 49 22 2C 22 12 52 45 | R..N","EI",".RE|
00000C40: 49 4E 92 22 00 60 14 48 0D 83 22 20 20 56 2E 2E |IN.".`.H.." V..|
00000C50: 4C 22 2C 22 45 49 22 2C 22 12 56 45 49 4C 92 22 |L","EI",".VEIL."|
00000C60: 00 66 14 24 13 8F 00 6C 14 2E 13 8F 00 74 14 2F |.f.$...l.....t./|
00000C70: 13 8F 20 CC 00 7C 14 37 13 8F 20 CC 00 9D 14 38 |.. ..|.7.. ....8|
00000C80: 13 8F 20 4C 49 4E 45 53 20 35 30 30 30 2D 31 30 |.. LINES 5000-10|
00000C90: 31 31 30 20 47 49 56 45 53 20 54 48 45 00 B9 14 |110 GIVES THE...|
00000CA0: 42 13 8F 20 53 54 55 44 45 4E 54 20 48 49 53 20 |B.. STUDENT HIS |
00000CB0: 53 43 4F 52 45 20 41 4E 44 00 D8 14 4C 13 8F 20 |SCORE AND...L.. |
00000CC0: 43 41 4C 43 55 4C 41 54 45 53 20 48 49 53 20 50 |CALCULATES HIS P|
00000CD0: 45 52 20 43 45 4E 54 2E 00 FA 14 56 13 8F 20 48 |ER CENT....V.. H|
00000CE0: 45 20 49 53 20 54 48 45 4E 20 47 49 56 45 4E 20 |E IS THEN GIVEN |
00000CF0: 54 48 45 20 4F 50 54 49 4F 4E 00 18 15 60 13 8F |THE OPTION...`..|
00000D00: 20 4F 46 20 53 54 41 52 54 49 4E 47 20 46 52 45 | OF STARTING FRE|
00000D10: 53 48 20 4F 52 20 4F 46 00 32 15 6A 13 8F 20 4C |SH OR OF.2.j.. L|
00000D20: 45 41 56 49 4E 47 20 54 48 45 20 50 52 4F 47 52 |EAVING THE PROGR|
00000D30: 41 4D 00 38 15 74 13 8F 00 3E 15 7E 13 8F 00 47 |AM.8.t...>.~...G|
00000D40: 15 88 13 99 22 93 22 00 6D 15 92 13 99 22 11 11 |....".".m...."..|
00000D50: 11 11 59 4F 55 20 47 4F 54 22 4E 22 43 4F 52 52 |..YOU GOT"N"CORR|
00000D60: 45 43 54 20 4F 55 54 20 4F 46 22 43 4F 00 91 15 |ECT OUT OF"CO...|
00000D70: 9C 13 99 22 11 11 57 48 49 43 48 20 49 53 22 3B |..."..WHICH IS";|
00000D80: B5 28 4E AD 43 4F AC 31 30 30 AA 2E 35 29 22 25 |.(N.CO.100..5)"%|
00000D90: 22 00 C6 15 10 27 99 22 11 11 11 11 11 11 1D 1D |"....'."........|
00000DA0: 1D 57 4F 55 4C 44 20 59 4F 55 20 4C 49 4B 45 20 |.WOULD YOU LIKE |
00000DB0: 54 4F 20 54 52 59 20 41 47 41 49 4E 3F 28 59 45 |TO TRY AGAIN?(YE|
00000DC0: 53 2F 4E 4F 29 22 00 D8 15 15 27 85 20 41 24 3A |S/NO)"....'. A$:|
00000DD0: 8F 20 41 4E 53 57 45 52 00 F2 15 1A 27 8B 20 C8 |. ANSWER....'. .|
00000DE0: 28 41 24 2C 31 29 B2 22 59 22 20 A7 20 8A 20 37 |(A$,1)."Y" . . 7|
00000DF0: 39 30 00 FB 15 1F 27 99 22 93 22 00 03 16 20 27 |90....'."."... '|
00000E00: 8F 20 CC 00 09 16 21 27 8F 00 0F 16 22 27 8F 00 |. ....!'...."'..|
00000E10: 30 16 23 27 8F 20 54 48 45 20 42 41 4C 41 4E 43 |0.#'. THE BALANC|
00000E20: 45 20 4F 46 20 54 48 45 20 50 52 4F 47 52 41 4D |E OF THE PROGRAM|
00000E30: 00 50 16 24 27 8F 20 50 52 49 4E 54 53 20 41 20 |.P.$'. PRINTS A |
00000E40: 48 41 50 50 59 20 46 41 43 45 20 57 48 49 43 48 |HAPPY FACE WHICH|
00000E50: 00 58 16 25 27 8F 20 CC 00 74 16 26 27 8F 20 41 |.X.%'. ..t.&'. A|
00000E60: 4E 59 20 4B 45 59 20 49 53 20 44 45 50 52 45 53 |NY KEY IS DEPRES|
00000E70: 53 45 44 2E 00 7C 16 27 27 8F 20 CC 00 82 16 28 |SED..|.''. ....(|
00000E80: 27 8F 00 9A 16 29 27 97 35 33 32 38 30 2C 34 3A |'....)'.53280,4:|
00000E90: 97 20 35 33 32 38 31 2C 31 35 00 B7 16 2E 27 99 |. 53281,15....'.|
00000EA0: 22 1C 22 3A 8F 20 53 45 54 20 43 55 52 53 4F 52 |".":. SET CURSOR|
00000EB0: 20 54 4F 20 52 45 44 00 C3 16 38 27 99 20 22 11 | TO RED...8'. ".|
00000EC0: 11 11 22 00 D6 16 42 27 99 A3 31 34 29 22 20 20 |.."...B'..14)" |
00000ED0: 20 20 D1 D1 D1 22 00 EB 16 4C 27 99 A3 31 34 29 | ..."...L'..14)|
00000EE0: 22 20 20 D1 D1 20 20 20 D1 D1 22 00 01 17 56 27 |" .. .."...V'|
00000EF0: 99 A3 31 34 29 22 20 D1 20 20 2A 20 2A 20 20 D1 |..14)" . * * .|
00000F00: 22 00 18 17 60 27 99 A3 31 34 29 22 D1 20 20 20 |"...`'..14)". |
00000F10: 20 C8 20 20 20 20 D1 22 00 2F 17 6A 27 99 A3 31 | . ."./.j'..1|
00000F20: 34 29 22 D1 20 20 20 20 20 20 20 20 20 D1 22 00 |4)". .".|
00000F30: 45 17 74 27 99 A3 31 34 29 22 20 D1 20 CD A4 A4 |E.t'..14)" . ...|
00000F40: A4 CE 20 D1 22 00 5A 17 7E 27 99 A3 31 34 29 22 |.. .".Z.~'..14)"|
00000F50: 20 20 D1 20 20 20 20 20 D1 22 00 6E 17 88 27 99 | . .".n..'.|
00000F60: A3 31 34 29 22 20 20 20 D1 D1 D1 D1 D1 22 00 99 |.14)" ....."..|
00000F70: 17 3C 28 99 22 11 11 1D 1D 1D 1D 1D 1D 4F 4B 41 |.<(."........OKA|
00000F80: 59 2C 20 54 48 41 4E 4B 20 59 4F 55 20 46 4F 52 |Y, THANK YOU FOR|
00000F90: 20 50 4C 41 59 49 4E 47 22 00 C8 17 46 28 99 22 | PLAYING"...F(."|
00000FA0: 11 1D 1D 1D 1D 1D 1D 2E 2E 2E 41 4E 44 20 48 41 |..........AND HA|
00000FB0: 56 45 20 41 20 48 41 50 50 59 20 12 49 45 2F 45 |VE A HAPPY .IE/E|
00000FC0: 49 92 20 44 41 59 2E 22 00 E0 17 50 28 A1 20 4A |I. DAY."...P(. J|
00000FD0: 24 3A 8B 20 4A 24 B2 22 22 A7 20 31 30 33 32 30 |$:. J$."". 10320|
00000FE0: 00 E9 17 64 28 99 22 93 22 00 EF 17 65 28 80 00 |...d(."."...e(..|
00000FF0: 00 00 |.. |
.......".".......*.... ***GRAMMAR DRILL*
**.M.... DRILL IN SPELLING WORDS WITH.T.
... *IE/EI* SUITABLE FOR GRADES 4-8..Z..
... .... PROGRAMME DEVELOPED BY J URSANO
...... SPRINGDALE PARK ROAD...... BRACEB
RODGE. ONTARIO (1983)...... ROAD, BRACEB
RIDGE,ONTARIO...... L......L.#....53280,
8:. 53281,6.1...."......".>.... I.1.25.L
.... .7)"Q";.V.... 500.\.(...B.-...N.2..
I.1.5.|.<.. .31)"Q"...F.. 500...P.....Z
.. I.31 . 7 ..1...D...I)".Q"...N.. 500..
.X...H.... I.1.5.W.... .7)"..Q"...... 50
0... ........"..........................
.IE/EI.".-.....14)".....BY J. URSANO".>.
... Y.1.3500:..G.H..".".Q.... 800.`....
L.1.45:..F.....L.....T.... L.Z..........
LINES 800 TO 960 ARE...... INSTRUCTIONS
FOR STUDENTS.......A.....J...."."... ..
.8)"......R E M E M B E R ."...*..".....
...1) IE SAYS E".!.4..".....2) EI SAYS A
".N.>..".....3) PUT I BEFORE E EXCEPT AF
TER C..{.H.."...........PRESS.*ANY KEY*.
WHEN READY"...R.. K$:. K$."". 850...\.."
.".H...."..............TYPE THE MISSING
LETTERS"......"......TO COMPLETE THE WOR
D"......".........EXAMPLE:"...... ".....
........".E.... ".............GR..F WOUL
D BE GR.IE.F".M...."............DDDDDDDD
DDDDDDDDDDDD"......"..........PRESS.*ANY
KEY*.WHEN READY"...... K$:. K$."". 960.
E....53280,8:.53281,0.M.F.. L.S.P...Y.Q.
....U.. PUTTING DATA INTO ARRAY...Z.. A$
=WORD WITH BLANK(F..LD).9.... B$=CORRECT
ANSWER(IE OR EI).V.... C$=CORRECT WORD(
FIELD).P.... P1 IS SIZE OF ARRAY.V......
...P1.31......A$(P1),B$(P1),C$(P1)......
I.1.P1......A$(I),B$(I),C$(I).F.... I.L
.......... RANDOMIZE AND PRESENT WORDS.
..... AND SET COUNTER AT 0...... L......
......./. .I.0:CO.0:N.0.E.*.I..(P1.(.(TI
)).1).N.4..".".Z.>.CO.CO.1.G.H.."",.13).
W.R.."..."A$(I)...\..".",.16)...A.. CHEC
K TO SEE THAT ANSWER IS...C.. CORRECT...
D...O.F..D$:.D$."".2150...P..E$:.E$."".2
160...U.Z$.D$.E$...Z..".";Z$...... D$.E$
.B$(I) . 2220.8...."..SORRY,THAT IS NOT
CORRECT".V...."..THE ANSWER IS ";C$(I).A
.... 2240.K...N.N.1...... STUDENT OPTION
TO CONTINUE...... OR TO CHECK SCORE....
...K...."...............WELL DONE!".....
. ".......PRESS .SPACE BAR. FOR ANOTHER
WORD".#.J.. ".....PRESS .S. TO SEE .S.CO
RE".8.... R$:.R$."".2280.N.... R$.G(32)
. 2090.B.... R$."S" . 5000.M.... 2280.S.
I...Y.N........ DATA STATEMENTS BEGIN...
..............." W..GH","EI",".WEIGH.".
..&.." CH..F","IE",".CHIEF."...0.." N..
CE","IE",".NIECE."...:.."BEL..VE","IE","
.BELIEVE.".;.D.." FR..GHT","EI",".FREIGH
T.".Z.N.." ..GHT","EI",".EIGHT.".Z.X..
" P..CES","IE",".PIECES."...B.." TH..F"
,"IE",".THIEF."...L.." R..NDEER","EI","
.REINDEER."...V.." BR..FLY","IE",".BRIEF
LY."......" CH..F","IE",".CHIEF."......"
SL..GH","EI",".SLEIGH.".7...." SH..LD",
"IE",".SHIELD.".\...." N..GHBOUR","EI",
".NEIGHBOUR".|...." P..RCE","IE",".PIER
CE."......"SHR..K","IE",".SHRIEK."......
" V..NS","EI",".VEINS.".W.F.." D..SEL"
,"IE",".DIESEL"...P.." GR..VE","IE",".GR
IEVE."...Z.." N..GH","EI",".NEIGH.".4..
.." F..RCE","IE",".FIERCE.".P...." P..
R","IE",".PIER.".N...." Y..LD","IE",".Y
IELD."......" PR..ST","IE",".PRIEST."...
..."BEL..F","IE",".BELIEF.".I...."REL..F
","IE",".RELIEF."... .." S..GE","IE",".
SIEGE."...*.." TH..VES","IE",".THIEVES."
.(.4.."ACH..VE","IE",".ACHIEVE.".D.>.."
R..N","EI",".REIN.".`.H.." V..L","EI",
".VEIL.".F.$...L.....T./.. L.|.7.. L...8
.. LINES 5000-10110 GIVES THE...B.. STUD
ENT HIS SCORE AND.X.L.. CALCULATES HIS P
ER CENT....V.. HE IS THEN GIVEN THE OPTI
ON...`.. OF STARTING FRESH OR OF.2.J.. L
EAVING THE PROGRAM.8.T...>.~...G....".".
M...."....YOU GOT"N"CORRECT OUT OF"CO...
..."..WHICH IS";.(N.CO.100..5)"%".F..'."
.........WOULD YOU LIKE TO TRY AGAIN?(YE
S/NO)".X..'. A$:. ANSWER....'. H(A$,1)."
Y" . . 790....'."."... '. L...!'...."'..
0.#'. THE BALANCE OF THE PROGRAM.P.$'. P
RINTS A HAPPY FACE WHICH.X.%'. L.T.&'. A
NY KEY IS DEPRESSED..|.''. L...('....)'.
53280,4:. 53281,15....'.".":. SET CURSOR
TO RED.C.8'. "...".V.B'..14)" QQQ"..
.L'..14)" QQ QQ"...V'..14)" Q * * Q
"...`'..14)"Q H Q"./.J'..14)"Q
Q".E.T'..14)" Q M...N Q".Z.~'..14)"
Q Q".N..'..14)" QQQQQ"...<(."...
.....OKAY, THANK YOU FOR PLAYING".H.F(."
..........AND HAVE A HAPPY .IE/EI. DAY."
...P(. J$:. J$."". 10320...D(."."...E(..
..
> CLICK IMAGE PREVIEW FOR FULL MODAL