CODE FIND
FILE INFORMATION
FILENAME(S): CODE FIND
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-10-20 14:30:32
APPEARS ON: 1 disk(s)
FILE HASH
82c1b95d541c797c66c8d4624dfc02d3fe8935332e40034569d75992778ddd72
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0026ED | CODE FIND | PRG | Treasure Chest - Klaus Der Suhler | 10 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1D 08 64 00 97 35 33 32 38 31 2C 31 3A 97 |....d..53281,1:.|
00000010: 35 33 32 38 30 2C 32 3A 99 22 93 1F 22 00 54 08 |53280,2:."..".T.|
00000020: 96 00 99 22 99 11 11 20 12 20 20 20 20 20 20 20 |..."... . |
00000030: 20 20 20 20 20 92 98 20 20 43 4F 44 45 20 46 49 | .. CODE FI|
00000040: 4E 44 20 20 12 99 20 20 20 20 20 20 20 20 20 20 |ND .. |
00000050: 20 20 20 22 00 77 08 C8 00 99 22 11 11 1D 1D 1D | ".w....".....|
00000060: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 81 50 52 4F |.............PRO|
00000070: 47 52 41 4D 45 44 22 00 95 08 FA 00 99 22 95 1D |GRAMED"......"..|
00000080: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000090: 1D 1D 42 59 22 00 BA 08 2C 01 99 22 11 11 11 1F |..BY"...,.."....|
000000A0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 42 4F |..............BO|
000000B0: 42 20 4A 41 43 4B 53 4F 4E 22 00 D4 08 5E 01 81 |B JACKSON"...^..|
000000C0: 54 B2 31 A4 32 30 30 30 3A 82 54 3A 97 35 33 32 |T.1.2000:.T:.532|
000000D0: 38 30 2C 33 00 FC 08 90 01 99 22 93 11 1D 50 52 |80,3......"...PR|
000000E0: 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 43 |ESS ANY KEY TO C|
000000F0: 4F 4E 54 49 4E 55 45 2E 2E 2E 2E 22 00 2B 09 C2 |ONTINUE....".+..|
00000100: 01 99 22 1E 93 11 1D 1D D4 48 45 20 CE 41 54 49 |.."......HE .ATI|
00000110: 4F 4E 41 4C 20 C5 4C 45 43 54 52 49 43 20 C3 4F |ONAL .LECTRIC .O|
00000120: 44 45 20 49 53 2E 2E 2E 2E 2E 22 00 4E 09 DB 01 |DE IS.....".N...|
00000130: 97 35 33 32 37 32 2C 32 33 3A 8F 20 55 50 50 45 |.53272,23:. UPPE|
00000140: 52 20 26 20 4C 4F 57 45 52 20 43 41 53 45 00 7C |R & LOWER CASE.||
00000150: 09 F4 01 99 22 11 C4 49 56 49 44 45 44 20 49 4E |...."..IVIDED IN|
00000160: 54 4F 20 27 C1 D2 D4 C9 C3 CC C5 D3 27 3A 20 28 |TO '........': (|
00000170: 45 58 41 4D 50 4C 45 29 2D 2D 2D 22 00 A3 09 0D |EXAMPLE)---"....|
00000180: 02 99 A3 31 30 29 3B 22 11 1C C1 52 54 2E 20 32 |...10);"...RT. 2|
00000190: 35 30 20 C7 D2 CF D5 CE C4 C9 CE C7 22 3A 8D 38 |50 .........":.8|
000001A0: 30 30 30 00 D4 09 26 02 99 22 1F 11 11 D4 48 49 |000...&.."....HI|
000001B0: 53 20 47 41 4D 45 20 57 49 4C 4C 20 48 45 4C 50 |S GAME WILL HELP|
000001C0: 20 59 4F 55 20 42 45 43 4F 4D 45 20 46 41 4D 49 | YOU BECOME FAMI|
000001D0: 4C 41 52 22 00 02 0A 3F 02 99 22 57 49 54 48 20 |LAR"...?.."WITH |
000001E0: 54 48 45 20 41 52 54 49 43 4C 45 20 4E 55 4D 42 |THE ARTICLE NUMB|
000001F0: 45 52 53 20 41 4E 44 20 53 4F 4D 45 54 48 49 4E |ERS AND SOMETHIN|
00000200: 47 22 00 36 0A 58 02 99 22 54 48 41 54 20 43 41 |G".6.X.."THAT CA|
00000210: 4E 20 42 45 20 46 4F 55 4E 44 20 49 4E 20 54 48 |N BE FOUND IN TH|
00000220: 45 53 45 20 41 52 54 49 43 4C 45 53 2E 2E 2E 22 |ESE ARTICLES..."|
00000230: 3A 8D 38 30 30 30 00 67 0A 71 02 99 22 11 11 90 |:.8000.g.q.."...|
00000240: D9 4F 55 20 57 49 4C 4C 20 42 45 20 53 48 4F 57 |.OU WILL BE SHOW|
00000250: 4E 20 41 4E 20 49 54 45 4D 20 4F 52 20 52 55 4C |N AN ITEM OR RUL|
00000260: 45 2C 20 41 4E 44 22 00 95 0A 8A 02 99 22 59 4F |E, AND"......"YO|
00000270: 55 20 41 52 45 20 54 4F 20 47 49 56 45 20 54 48 |U ARE TO GIVE TH|
00000280: 45 20 4E 55 4D 42 45 52 20 4F 46 20 54 48 45 20 |E NUMBER OF THE |
00000290: 41 52 54 2E 22 00 C1 0A A3 02 99 22 57 48 45 52 |ART."......"WHER|
000002A0: 45 20 54 48 49 53 20 49 4E 46 4F 52 4D 41 54 49 |E THIS INFORMATI|
000002B0: 4F 4E 20 43 41 4E 20 42 45 20 46 4F 55 4E 44 2E |ON CAN BE FOUND.|
000002C0: 22 00 CB 0A BC 02 8D 38 30 30 30 00 FB 0A EE 02 |"......8000.....|
000002D0: 99 22 11 11 81 1D 50 52 45 53 53 20 41 4E 59 20 |."....PRESS ANY |
000002E0: 4B 45 59 20 57 48 45 4E 20 59 4F 55 20 57 41 4E |KEY WHEN YOU WAN|
000002F0: 54 20 54 4F 20 42 45 47 49 4E 22 00 0E 0B 20 03 |T TO BEGIN"... .|
00000300: A1 4B 24 3A 8B 4B 24 B2 22 22 A7 38 30 30 00 1C |.K$:.K$."".800..|
00000310: 0B 84 03 57 B2 30 3A 52 B2 30 3A 9C 00 48 0B B6 |...W.0:R.0:..H..|
00000320: 03 99 22 93 11 11 11 11 1D 1D 1D 1D 1D 1D 1F 50 |.."............P|
00000330: 4C 45 41 53 45 20 4D 41 4B 45 20 41 20 53 45 4C |LEASE MAKE A SEL|
00000340: 45 43 54 49 4F 4E 3A 22 00 72 0B E8 03 99 22 11 |ECTION:".r....".|
00000350: 11 1D 1D 1D 1D 1D 1D 12 31 2E 92 20 31 30 20 51 |........1.. 10 Q|
00000360: 55 45 53 54 49 4F 4E 20 41 54 20 52 41 4E 44 4F |UESTION AT RANDO|
00000370: 4D 22 00 95 0B F2 03 99 22 11 1D 1D 1D 1D 1D 1D |M"......".......|
00000380: 12 32 2E 92 20 41 4C 4C 20 35 30 20 51 55 45 53 |.2.. ALL 50 QUES|
00000390: 54 49 4F 4E 53 00 B8 0B FC 03 99 22 11 11 1D 1D |TIONS......"....|
000003A0: 1D 1D 1D 1D 1C 43 48 4F 4F 53 45 20 27 31 27 20 |.....CHOOSE '1' |
000003B0: 4F 52 20 27 32 27 1F 22 00 CC 0B 06 04 A1 59 24 |OR '2'."......Y$|
000003C0: 3A 8B 59 24 B2 22 22 A7 31 30 33 30 00 DD 0B 1A |:.Y$."".1030....|
000003D0: 04 8B 59 24 B2 22 32 22 A7 32 36 35 30 00 EE 0B |..Y$."2".2650...|
000003E0: 4C 04 8B 59 24 B2 22 31 22 A7 31 31 35 30 00 F8 |L..Y$."1".1150..|
000003F0: 0B 7E 04 8D 33 33 35 30 00 05 0C B0 04 99 22 93 |.~..3350......".|
00000400: 22 3A 42 B2 31 00 1A 0C E2 04 81 4A B2 31 A4 31 |":B.1......J.1.1|
00000410: 30 3A 97 35 33 32 38 30 2C 37 00 2D 0C 14 05 4E |0:.53280,7.-...N|
00000420: B2 B5 28 BB 28 31 29 AC 35 30 29 AA 31 00 4C 0C |..(.(1).50).1.L.|
00000430: 46 05 99 22 11 9B 22 3B 42 3B 22 98 22 3B 54 42 |F.."..";B;".";TB|
00000440: 24 28 4E 2C 31 29 3A 42 B2 42 AA 31 00 6A 0C 78 |$(N,1):B.B.1.j.x|
00000450: 05 85 22 C7 49 56 45 20 54 48 45 20 C1 52 54 2E |..".IVE THE .RT.|
00000460: 20 4E 55 4D 42 45 52 22 3B 43 00 7F 0C AA 05 8B | NUMBER";C......|
00000470: 41 52 54 28 4E 2C 31 29 B2 43 A7 31 36 30 30 00 |ART(N,1).C.1600.|
00000480: B1 0C DC 05 97 35 33 32 38 30 2C 30 3A 99 22 1C |.....53280,0:.".|
00000490: 12 D7 52 4F 4E 47 2E 2E 2E 92 49 54 20 49 53 20 |..RONG....IT IS |
000004A0: 49 4E 20 22 3B 41 52 54 28 4E 2C 31 29 3B 22 1F |IN ";ART(N,1);".|
000004B0: 22 00 C8 0C E1 05 99 22 11 D3 45 45 20 22 3B 53 |"......"..EE ";S|
000004C0: 45 43 24 28 4E 2C 31 29 00 DE 0C E6 05 8D 39 30 |EC$(N,1)......90|
000004D0: 30 30 3A 81 54 B2 31 A4 33 30 30 3A 82 54 00 EE |00:.T.1.300:.T..|
000004E0: 0C 0E 06 57 B2 57 AA 31 3A 89 31 37 30 30 00 1C |...W.W.1:.1700..|
000004F0: 0D 40 06 97 35 33 32 38 30 2C 31 33 3A 99 22 12 |.@..53280,13:.".|
00000500: 1E C3 4F 52 52 45 43 54 92 22 3A 8D 38 30 30 30 |..ORRECT.":.8000|
00000510: 3A 81 54 B2 31 A4 33 30 30 3A 82 54 00 34 0D 59 |:.T.1.300:.T.4.Y|
00000520: 06 99 22 1F 11 D3 45 45 20 22 3B 53 45 43 24 28 |.."...EE ";SEC$(|
00000530: 4E 2C 31 29 00 3E 0D 72 06 52 B2 52 AA 31 00 45 |N,1).>.r.R.R.1.E|
00000540: 0D A4 06 82 4A 00 55 0D BD 06 81 54 B2 31 A4 38 |....J.U....T.1.8|
00000550: 30 30 3A 82 54 00 69 0D CC 06 88 53 43 B2 31 30 |00:.T.i....SC.10|
00000560: 30 AC 52 AD 28 52 AA 57 29 00 9A 0D D6 06 97 35 |0.R.(R.W)......5|
00000570: 33 32 38 30 2C 34 3A 99 22 93 11 11 1D 1D 1D 1D |3280,4:.".......|
00000580: 1D 9E D9 4F 55 52 20 53 43 4F 52 45 20 49 53 20 |...OUR SCORE IS |
00000590: 22 3B 53 43 3B 22 25 11 11 22 00 DD 0D E0 06 8B |";SC;"%.."......|
000005A0: 53 43 B2 31 30 30 B0 53 43 B1 38 30 A7 99 22 1E |SC.100.SC.80..".|
000005B0: 1D C5 58 43 45 4C 4C 45 4E 54 2C 20 59 4F 55 20 |..XCELLENT, YOU |
000005C0: 41 52 45 20 41 20 47 4F 4F 44 20 45 4C 45 43 54 |ARE A GOOD ELECT|
000005D0: 52 49 43 49 41 4E 22 3A 89 31 38 30 30 00 0E 0E |RICIAN":.1800...|
000005E0: EA 06 8B 53 43 B3 38 30 B0 53 43 B1 37 30 A7 99 |...SC.80.SC.70..|
000005F0: 22 9E 11 11 1D 1D 1D 1D 1D 1D D9 4F 55 20 4E 45 |"..........OU NE|
00000600: 45 44 20 4D 4F 52 45 20 53 54 55 44 59 22 00 42 |ED MORE STUDY".B|
00000610: 0E F4 06 8B 53 43 B3 37 30 A7 99 22 1C 11 11 1D |....SC.70.."....|
00000620: 1D 1D 1D 1D CD 41 59 42 45 20 59 4F 55 20 53 48 |.....AYBE YOU SH|
00000630: 4F 55 4C 44 20 42 45 20 41 20 50 4C 55 4D 42 45 |OULD BE A PLUMBE|
00000640: 52 22 00 6E 0E 08 07 99 22 1F 11 1D 1D 1D 1D C4 |R".n....".......|
00000650: 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 50 4C |O YOU WANT TO PL|
00000660: 41 59 20 41 47 41 49 4E 20 28 59 2F 4E 29 00 82 |AY AGAIN (Y/N)..|
00000670: 0E 3A 07 A1 4B 24 3A 8B 4B 24 B2 22 22 A7 31 38 |.:..K$:.K$."".18|
00000680: 35 30 00 92 0E 6C 07 8B 4B 24 B2 22 59 22 A7 39 |50...l..K$."Y".9|
00000690: 30 30 00 C6 0E 9E 07 99 22 98 11 11 11 1D D4 48 |00......"......H|
000006A0: 41 4E 4B 53 20 46 4F 52 20 50 4C 41 59 49 4E 47 |ANKS FOR PLAYING|
000006B0: 20 2D 2D 20 53 45 45 20 59 4F 55 20 41 47 41 49 | -- SEE YOU AGAI|
000006C0: 4E 22 3A 80 3A 8E 00 EE 0E D0 07 83 45 4C 45 43 |N":.:.......ELEC|
000006D0: 54 52 49 43 20 42 4F 49 4C 45 52 53 2C 34 32 34 |TRIC BOILERS,424|
000006E0: 2C 34 32 34 2D 47 20 26 20 34 32 34 2D 48 00 20 |,424-G & 424-H. |
000006F0: 0F DA 07 83 44 49 52 45 43 54 20 42 55 52 49 41 |....DIRECT BURIA|
00000700: 4C 2C 33 30 30 2C 53 45 43 2E 20 33 30 35 2D 35 |L,300,SEC. 305-5|
00000710: 20 41 4E 44 20 54 41 42 4C 45 20 33 30 30 2D 35 | AND TABLE 300-5|
00000720: 00 49 0F E4 07 83 4D 4F 54 4F 52 20 49 4E 2D 53 |.I....MOTOR IN-S|
00000730: 49 47 48 54 20 52 55 4C 45 2C 34 33 30 2C 53 45 |IGHT RULE,430,SE|
00000740: 43 2E 20 34 33 30 2D 38 36 00 7C 0F EE 07 83 44 |C. 430-86.|....D|
00000750: 45 4C 54 41 20 48 49 47 48 20 4C 45 47 2C 32 31 |ELTA HIGH LEG,21|
00000760: 35 2C 53 45 43 2E 20 32 31 35 2D 38 20 4F 52 41 |5,SEC. 215-8 ORA|
00000770: 4E 47 45 20 49 4E 20 43 4F 4C 4F 52 00 B6 0F F8 |NGE IN COLOR....|
00000780: 07 83 48 4F 53 50 49 54 41 4C 20 45 4D 45 52 47 |..HOSPITAL EMERG|
00000790: 45 4E 43 59 20 53 59 53 54 45 4D 53 2C 35 31 37 |ENCY SYSTEMS,517|
000007A0: 2C 53 45 43 2E 20 35 31 37 2D 36 30 20 54 4F 20 |,SEC. 517-60 TO |
000007B0: 35 31 37 2D 36 35 00 EE 0F 02 08 83 52 45 53 49 |517-65......RESI|
000007C0: 44 45 4E 54 49 41 4C 20 47 41 52 41 47 45 53 2C |DENTIAL GARAGES,|
000007D0: 32 31 30 2C 53 45 43 2E 20 32 31 30 2D 38 28 41 |210,SEC. 210-8(A|
000007E0: 29 28 32 29 2F 32 31 30 2D 35 32 28 46 29 00 12 |)(2)/210-52(F)..|
000007F0: 10 0C 08 83 43 41 52 54 52 49 44 47 45 20 46 55 |....CARTRIDGE FU|
00000800: 53 45 53 2C 32 34 30 2C 32 34 30 20 50 41 52 54 |SES,240,240 PART|
00000810: 20 46 00 36 10 16 08 83 53 57 49 4D 49 4E 47 20 | F.6....SWIMING |
00000820: 50 4F 4F 4C 20 48 45 41 54 45 52 53 2C 36 38 30 |POOL HEATERS,680|
00000830: 2C 36 38 30 2D 37 00 5F 10 20 08 83 53 55 50 50 |,680-7._. ..SUPP|
00000840: 4F 52 54 20 46 4F 52 20 46 49 58 54 55 52 45 53 |ORT FOR FIXTURES|
00000850: 2C 34 31 30 2C 34 31 30 20 50 41 52 54 20 44 00 |,410,410 PART D.|
00000860: 94 10 2A 08 83 50 45 52 4D 49 54 54 45 44 20 55 |..*..PERMITTED U|
00000870: 53 45 20 4F 46 20 46 4C 41 54 20 43 4F 4E 44 55 |SE OF FLAT CONDU|
00000880: 43 54 4F 52 20 43 41 42 4C 45 2C 33 32 38 2C 33 |CTOR CABLE,328,3|
00000890: 32 38 2D 34 00 B6 10 34 08 83 44 45 41 44 20 46 |28-4...4..DEAD F|
000008A0: 52 4F 4E 54 20 50 41 4E 45 4C 53 2C 33 38 34 2C |RONT PANELS,384,|
000008B0: 33 38 34 2D 31 38 00 E5 10 3E 08 83 44 45 4D 41 |384-18...>..DEMA|
000008C0: 4E 44 20 46 41 43 54 4F 52 20 46 4F 52 20 44 52 |ND FACTOR FOR DR|
000008D0: 59 45 52 53 2C 32 32 30 2C 54 41 42 4C 45 20 32 |YERS,220,TABLE 2|
000008E0: 32 30 2D 31 38 00 13 11 48 08 83 41 43 45 53 53 |20-18...H..ACESS|
000008F0: 49 42 4C 49 54 59 20 4F 46 20 4D 41 49 4E 20 53 |IBLITY OF MAIN S|
00000900: 57 49 54 43 48 2C 32 33 30 2C 32 33 30 2D 37 32 |WITCH,230,230-72|
00000910: 28 43 29 00 47 11 52 08 83 43 4F 4E 44 55 43 54 |(C).G.R..CONDUCT|
00000920: 4F 52 20 41 4D 50 41 43 49 54 59 2C 33 31 30 2C |OR AMPACITY,310,|
00000930: 54 41 42 4C 45 53 20 33 31 30 2D 31 36 20 54 4F |TABLES 310-16 TO|
00000940: 20 33 31 30 2D 31 39 00 6C 11 5C 08 83 43 41 4C | 310-19.l.\..CAL|
00000950: 43 2E 20 4F 46 20 53 49 47 4E 20 4C 4F 41 44 2C |C. OF SIGN LOAD,|
00000960: 36 30 30 2C 36 30 30 2D 36 28 43 29 00 93 11 66 |600,600-6(C)...f|
00000970: 08 83 43 41 42 4C 45 20 54 52 41 59 20 49 4E 53 |..CABLE TRAY INS|
00000980: 54 41 4C 4C 41 54 49 4F 4E 2C 33 31 38 2C 33 31 |TALLATION,318,31|
00000990: 38 2D 35 00 B5 11 70 08 83 53 55 50 50 4F 52 54 |8-5...p..SUPPORT|
000009A0: 20 4F 46 20 42 55 53 57 41 59 53 2C 33 36 34 2C | OF BUSWAYS,364,|
000009B0: 33 36 34 2D 35 00 D4 11 7A 08 83 55 53 45 20 4F |364-5...z..USE O|
000009C0: 46 20 42 55 53 48 49 4E 47 53 2C 33 34 36 2C 33 |F BUSHINGS,346,3|
000009D0: 34 36 2D 38 00 F6 11 84 08 83 53 45 41 4C 49 4E |46-8......SEALIN|
000009E0: 47 20 49 4E 20 43 4C 41 53 53 20 31 2C 35 30 31 |G IN CLASS 1,501|
000009F0: 2C 35 30 31 2D 35 00 1F 12 8E 08 83 42 52 41 4E |,501-5......BRAN|
00000A00: 43 48 20 43 4B 54 2E 20 46 4F 52 20 48 4F 54 20 |CH CKT. FOR HOT |
00000A10: 54 55 42 53 2C 36 38 30 2C 36 38 30 2D 34 30 00 |TUBS,680,680-40.|
00000A20: 3B 12 98 08 83 43 4F 4C 4F 52 20 43 4F 44 49 4E |;....COLOR CODIN|
00000A30: 47 2C 32 31 30 2C 32 31 30 2D 35 00 5A 12 A2 08 |G,210,210-5.Z...|
00000A40: 83 46 4C 4F 4F 52 20 42 4F 58 45 53 2C 33 37 30 |.FLOOR BOXES,370|
00000A50: 2C 33 37 30 2D 31 37 28 42 29 00 7B 12 AC 08 83 |,370-17(B).{....|
00000A60: 53 55 50 50 4F 52 54 20 46 4F 52 20 52 4F 4D 45 |SUPPORT FOR ROME|
00000A70: 58 2C 33 33 36 2C 33 33 36 2D 35 00 AF 12 B6 08 |X,336,336-5.....|
00000A80: 83 47 52 4E 44 20 45 4C 45 43 54 52 4F 44 45 20 |.GRND ELECTRODE |
00000A90: 43 4F 4E 44 55 43 54 4F 52 20 53 49 5A 45 2C 32 |CONDUCTOR SIZE,2|
00000AA0: 35 30 2C 54 41 42 4C 45 20 32 35 30 2D 39 34 00 |50,TABLE 250-94.|
00000AB0: CC 12 C0 08 83 42 41 52 45 20 4E 55 45 54 52 41 |.....BARE NUETRA|
00000AC0: 4C 2C 32 33 30 2C 32 33 30 2D 33 30 00 EF 12 CA |L,230,230-30....|
00000AD0: 08 83 42 45 4E 44 53 20 49 4E 20 47 52 45 45 4E |..BENDS IN GREEN|
00000AE0: 46 49 45 4C 44 2C 33 35 30 2C 33 35 30 2D 36 00 |FIELD,350,350-6.|
00000AF0: 14 13 D4 08 83 42 41 43 4B 46 49 4C 4C 20 46 4F |.....BACKFILL FO|
00000B00: 52 20 43 41 42 4C 45 2C 33 30 30 2C 33 30 30 2D |R CABLE,300,300-|
00000B10: 35 28 46 29 00 3D 13 DE 08 83 41 4D 50 41 43 49 |5(F).=....AMPACI|
00000B20: 54 59 20 4F 46 20 53 45 52 56 49 43 45 20 44 52 |TY OF SERVICE DR|
00000B30: 4F 50 2C 32 33 30 2C 32 33 30 2D 32 33 00 85 13 |OP,230,230-23...|
00000B40: E8 08 83 4C 4F 41 44 20 43 41 4C 43 55 2E 46 4F |...LOAD CALCU.FO|
00000B50: 52 20 52 41 4E 47 45 53 2C 32 32 30 2C 54 41 42 |R RANGES,220,TAB|
00000B60: 4C 45 20 32 32 30 2D 31 39 20 48 4F 55 53 45 48 |LE 220-19 HOUSEH|
00000B70: 4F 4C 44 20 32 32 30 2D 32 30 20 43 4F 4D 4D 45 |OLD 220-20 COMME|
00000B80: 52 43 49 41 4C 00 AE 13 F2 08 83 41 55 54 4F 2D |RCIAL......AUTO-|
00000B90: 54 52 41 4E 53 46 4F 52 4D 45 52 20 42 41 4C 4C |TRANSFORMER BALL|
00000BA0: 41 53 54 2C 34 31 30 2C 34 31 30 2D 37 38 00 D5 |AST,410,410-78..|
00000BB0: 13 FC 08 83 57 41 54 54 53 20 50 45 52 20 53 51 |....WATTS PER SQ|
00000BC0: 2E 46 54 2E 2C 32 32 30 2C 54 41 42 4C 45 20 32 |.FT.,220,TABLE 2|
00000BD0: 32 30 2D 31 31 00 FD 13 06 09 83 55 53 45 20 4F |20-11......USE O|
00000BE0: 46 20 44 4F 55 42 4C 45 20 4C 4F 43 4B 20 4E 55 |F DOUBLE LOCK NU|
00000BF0: 54 53 2C 32 35 30 2C 32 35 30 2D 37 36 00 27 14 |TS,250,250-76.'.|
00000C00: 10 09 83 57 49 52 45 20 55 4E 44 45 52 20 41 20 |...WIRE UNDER A |
00000C10: 42 49 4E 44 49 4E 47 20 53 43 52 45 57 2C 31 31 |BINDING SCREW,11|
00000C20: 30 2C 31 31 30 2D 34 00 51 14 1A 09 83 43 4C 41 |0,110-4.Q....CLA|
00000C30: 53 53 20 31 20 43 4F 4D 4D 45 52 43 49 41 4C 20 |SS 1 COMMERCIAL |
00000C40: 47 41 52 41 47 45 53 2C 35 31 31 2C 35 31 31 2D |GARAGES,511,511-|
00000C50: 32 00 79 14 24 09 83 4D 41 49 4E 20 53 57 2E 20 |2.y.$..MAIN SW. |
00000C60: 46 4F 52 20 46 49 52 45 20 41 4C 41 52 4D 2C 32 |FOR FIRE ALARM,2|
00000C70: 33 30 2C 32 33 30 2D 37 32 00 A1 14 2E 09 83 41 |30,230-72......A|
00000C80: 4D 50 41 43 49 54 59 20 4F 46 20 46 49 58 54 55 |MPACITY OF FIXTU|
00000C90: 52 45 20 57 49 52 45 2C 34 30 32 2C 34 30 32 2D |RE WIRE,402,402-|
00000CA0: 35 00 BE 14 38 09 83 43 4C 4F 53 45 54 20 4C 49 |5...8..CLOSET LI|
00000CB0: 47 48 54 53 2C 34 31 30 2C 34 31 30 2D 38 00 E3 |GHTS,410,410-8..|
00000CC0: 14 42 09 83 53 54 41 4E 44 41 52 44 20 46 55 53 |.B..STANDARD FUS|
00000CD0: 45 20 52 41 54 49 4E 47 53 2C 32 34 30 2C 32 34 |E RATINGS,240,24|
00000CE0: 30 2D 36 00 06 15 4C 09 83 44 45 4E 54 41 4C 20 |0-6...L..DENTAL |
00000CF0: 43 4C 49 4E 49 43 53 2C 35 31 37 2C 35 31 37 20 |CLINICS,517,517 |
00000D00: 50 41 52 54 20 43 00 2A 15 56 09 83 53 45 41 4C |PART C.*.V..SEAL|
00000D10: 49 4E 47 20 4F 46 20 47 41 53 20 50 55 4D 50 53 |ING OF GAS PUMPS|
00000D20: 2C 35 31 34 2C 35 31 34 2D 36 00 55 15 60 09 83 |,514,514-6.U.`..|
00000D30: 53 57 49 4D 49 4E 47 20 50 4F 4F 4C 20 52 45 43 |SWIMING POOL REC|
00000D40: 45 50 54 41 43 4C 45 53 2C 36 38 30 2C 36 38 30 |EPTACLES,680,680|
00000D50: 2D 36 28 41 29 00 77 15 6A 09 83 32 35 27 20 54 |-6(A).w.j..25' T|
00000D60: 41 50 20 52 55 4C 45 2C 32 34 30 2C 32 34 30 2D |AP RULE,240,240-|
00000D70: 32 31 20 45 58 2E 33 00 A9 15 74 09 83 57 41 54 |21 EX.3...t..WAT|
00000D80: 45 52 20 48 45 41 54 45 52 20 4C 4F 41 44 2C 34 |ER HEATER LOAD,4|
00000D90: 32 32 2C 34 32 32 2D 31 34 28 42 29 20 26 20 34 |22,422-14(B) & 4|
00000DA0: 32 32 2D 35 20 45 58 2E 32 00 D7 15 7E 09 83 41 |22-5 EX.2...~..A|
00000DB0: 4D 50 41 43 49 54 59 20 52 45 51 55 49 52 45 44 |MPACITY REQUIRED|
00000DC0: 20 46 4F 52 20 57 45 4C 44 45 52 53 2C 36 33 30 | FOR WELDERS,630|
00000DD0: 2C 36 33 30 2D 31 31 00 0B 16 88 09 83 57 4F 52 |,630-11......WOR|
00000DE0: 4B 49 4E 47 20 43 4C 45 41 52 41 4E 43 45 20 46 |KING CLEARANCE F|
00000DF0: 4F 52 20 45 4C 45 43 54 2E 20 45 51 55 49 50 2E |OR ELECT. EQUIP.|
00000E00: 2C 31 31 30 2C 31 31 30 2D 31 36 00 3A 16 92 09 |,110,110-16.:...|
00000E10: 83 53 45 41 4C 20 46 4F 52 20 44 49 46 46 45 52 |.SEAL FOR DIFFER|
00000E20: 45 4E 54 20 54 45 4D 50 45 52 41 54 55 52 45 53 |ENT TEMPERATURES|
00000E30: 2C 33 30 30 2C 33 30 30 2D 37 00 65 16 9C 09 83 |,300,300-7.e....|
00000E40: 52 41 54 49 4E 47 20 46 4F 52 20 58 2D 52 41 59 |RATING FOR X-RAY|
00000E50: 20 43 4F 4E 44 55 43 54 4F 52 53 2C 36 36 30 2C | CONDUCTORS,660,|
00000E60: 36 36 30 2D 36 00 8F 16 A6 09 83 47 4F 4F 44 20 |660-6......GOOD |
00000E70: 57 4F 52 4B 4D 41 4E 53 48 49 50 2C 31 31 30 2C |WORKMANSHIP,110,|
00000E80: 31 31 30 2D 31 32 20 26 20 31 31 30 2D 31 33 00 |110-12 & 110-13.|
00000E90: B9 16 B0 09 83 48 45 41 56 59 2D 44 55 54 59 20 |.....HEAVY-DUTY |
00000EA0: 4C 41 4D 50 48 4F 4C 44 45 52 53 2C 32 31 30 2C |LAMPHOLDERS,210,|
00000EB0: 32 31 30 2D 32 31 28 41 29 00 D9 16 BA 09 83 46 |210-21(A)......F|
00000EC0: 45 53 54 4F 4F 4E 20 4C 49 47 48 54 49 4E 47 2C |ESTOON LIGHTING,|
00000ED0: 32 32 35 2C 32 32 35 2D 34 00 04 17 C4 09 83 54 |225,225-4......T|
00000EE0: 48 45 52 4D 41 4C 20 45 58 50 41 4E 53 49 4F 4E |HERMAL EXPANSION|
00000EF0: 20 4A 4F 49 4E 54 53 2C 33 30 30 2C 33 30 30 2D | JOINTS,300,300-|
00000F00: 37 28 42 29 00 17 17 5A 0A 8D 33 33 35 30 3A 42 |7(B)...Z..3350:B|
00000F10: B2 31 3A 99 22 93 22 00 2C 17 8C 0A 81 4E B2 31 |.1:.".".,....N.1|
00000F20: A4 35 30 3A 97 35 33 32 38 30 2C 37 00 45 17 BE |.50:.53280,7.E..|
00000F30: 0A 99 22 11 9B 22 3B 42 3B 22 98 22 3B 54 42 24 |.."..";B;".";TB$|
00000F40: 28 4E 2C 31 29 00 5F 17 F0 0A 85 22 C7 49 56 45 |(N,1)._....".IVE|
00000F50: 20 C1 52 54 2E 20 4E 55 4D 42 45 52 22 3B 43 00 | .RT. NUMBER";C.|
00000F60: 69 17 18 0B 42 B2 42 AA 31 00 7E 17 22 0B 8B 41 |i...B.B.1.~."..A|
00000F70: 52 54 28 4E 2C 31 29 B2 43 A7 33 30 30 30 00 B9 |RT(N,1).C.3000..|
00000F80: 17 54 0B 97 35 33 32 38 30 2C 30 3A 99 22 1C 12 |.T..53280,0:."..|
00000F90: D7 52 4F 4E 47 2E 2E 2E 92 49 54 20 49 53 20 22 |.RONG....IT IS "|
00000FA0: 3B 41 52 54 28 4E 2C 31 29 3B 22 1F 22 3A 81 54 |;ART(N,1);".":.T|
00000FB0: B2 31 A4 33 30 30 3A 82 54 00 D1 17 59 0B 99 22 |.1.300:.T...Y.."|
00000FC0: 11 1F D3 45 45 20 22 3B 53 45 43 24 28 4E 2C 31 |...EE ";SEC$(N,1|
00000FD0: 29 00 E7 17 5E 0B 8D 39 30 30 30 3A 81 54 B2 31 |)...^..9000:.T.1|
00000FE0: A4 33 30 30 3A 82 54 00 F7 17 86 0B 57 B2 57 AA |.300:.T.....W.W.|
00000FF0: 31 3A 89 33 30 35 30 00 2B 18 B8 0B 97 35 33 32 |1:.3050.+....532|
00001000: 38 30 2C 31 33 3A 99 22 12 1E C3 4F 52 52 45 43 |80,13:."...ORREC|
00001010: 54 92 22 3A 8D 38 30 30 30 3A 81 54 B2 31 A4 33 |T.":.8000:.T.1.3|
00001020: 30 30 3A 82 54 3A 52 B2 52 AA 31 00 43 18 D1 0B |00:.T:R.R.1.C...|
00001030: 99 22 11 1F D3 45 45 20 22 3B 53 45 43 24 28 4E |."...EE ";SEC$(N|
00001040: 2C 31 29 00 4A 18 EA 0B 82 4E 00 5A 18 1C 0C 81 |,1).J....N.Z....|
00001050: 54 B2 31 A4 38 30 30 3A 82 54 00 64 18 4E 0C 8D |T.1.800:.T.d.N..|
00001060: 31 37 34 30 00 75 18 B2 0C 8B 4B 24 B2 22 59 22 |1740.u....K$."Y"|
00001070: A7 31 32 30 30 00 A7 18 E4 0C 99 22 98 11 11 11 |.1200......"....|
00001080: 1D 54 48 41 4E 4B 53 20 46 4F 52 20 50 4C 41 59 |.THANKS FOR PLAY|
00001090: 49 4E 47 20 2D 2D 20 53 45 45 20 59 4F 55 20 41 |ING -- SEE YOU A|
000010A0: 47 41 49 4E 22 3A 80 00 CB 18 16 0D 86 54 42 24 |GAIN":.......TB$|
000010B0: 28 35 30 2C 31 29 2C 41 52 54 28 35 30 2C 31 29 |(50,1),ART(50,1)|
000010C0: 2C 53 45 43 24 28 35 30 2C 31 29 00 D7 18 48 0D |,SEC$(50,1)...H.|
000010D0: 81 49 B2 31 A4 35 30 00 F8 18 7A 0D 87 54 42 24 |.I.1.50...z..TB$|
000010E0: 28 49 2C 31 29 2C 41 52 54 28 49 2C 31 29 2C 53 |(I,1),ART(I,1),S|
000010F0: 45 43 24 28 49 2C 31 29 00 01 19 AC 0D 82 49 3A |EC$(I,1)......I:|
00001100: 8E 00 1E 19 40 1F 8F 20 2A 2A 20 53 4F 55 4E 44 |....@.. ** SOUND|
00001110: 20 53 55 42 52 4F 55 54 49 4E 45 20 2A 2A 00 24 | SUBROUTINE **.$|
00001120: 19 4A 1F 3A 00 30 19 54 1F 53 B2 35 34 32 37 32 |.J.:.0.T.S.54272|
00001130: 00 3E 19 5E 1F 97 20 53 AA 32 34 2C 31 35 00 4C |.>.^.. S.24,15.L|
00001140: 19 68 1F 97 20 53 AA 36 2C 32 34 30 00 59 19 72 |.h.. S.6,240.Y.r|
00001150: 1F 97 20 53 AA 34 2C 31 37 00 68 19 7C 1F 81 20 |.. S.4,17.h.|.. |
00001160: 41 B2 31 20 A4 20 31 30 00 7F 19 86 1F 81 20 58 |A.1 . 10...... X|
00001170: B2 20 31 20 A4 20 32 35 35 20 20 A9 20 32 35 00 |. 1 . 255 . 25.|
00001180: 8B 19 90 1F 97 20 53 AA 31 2C 58 00 93 19 9A 1F |..... S.1,X.....|
00001190: 82 20 58 00 9B 19 A4 1F 82 20 41 00 A8 19 AE 1F |. X...... A.....|
000011A0: 97 20 53 AA 34 2C 33 32 00 AE 19 B8 1F 8E 00 CD |. S.4,32........|
000011B0: 19 28 23 8F 20 20 20 2A 2A 20 53 4F 55 4E 44 20 |.(#. ** SOUND |
000011C0: 53 55 42 52 4F 55 54 49 4E 45 20 2A 2A 00 D3 19 |SUBROUTINE **...|
000011D0: 32 23 3A 00 DF 19 3C 23 53 B2 35 34 32 37 32 00 |2#:...<#S.54272.|
000011E0: EC 19 46 23 97 20 53 AA 32 34 2C 37 00 FE 19 50 |..F#. S.24,7...P|
000011F0: 23 97 20 53 AA 35 2C 31 32 AC 31 36 AA 30 00 11 |#. S.5,12.16.0..|
00001200: 1A 5A 23 97 20 53 AA 36 2C 31 35 AC 31 36 AA 31 |.Z#. S.6,15.16.1|
00001210: 30 00 28 1A 64 23 81 20 58 B2 20 32 35 35 20 A4 |0.(.d#. X. 255 .|
00001220: 20 31 30 30 A9 20 AB 31 00 34 1A 6E 23 97 20 53 | 100. .1.4.n#. S|
00001230: AA 31 2C 58 00 41 1A 78 23 97 20 53 AA 34 2C 31 |.1,X.A.x#. S.4,1|
00001240: 37 00 56 1A 82 23 81 20 44 B2 31 20 A4 20 31 30 |7.V..#. D.1 . 10|
00001250: 20 3A 20 82 20 44 00 5E 1A 8C 23 82 20 58 00 6C | : . D.^..#. X.l|
00001260: 1A 96 23 97 20 53 AA 32 34 2C 31 35 00 79 1A A0 |..#. S.24,15.y..|
00001270: 23 97 20 53 AA 31 2C 31 35 00 87 1A AA 23 97 20 |#. S.1,15....#. |
00001280: 53 AA 34 2C 31 32 38 00 8D 1A B4 23 8E 00 00 00 |S.4,128....#....|
....D..53281,1:.53280,2:."..".T...."...
. .. CODE FIND ..
".W.H.."..................PROGRAMED".
....."....................BY"...,.."....
..............BOB JACKSON".T.^..T.1.2000
:.T:.53280,3......"...PRESS ANY KEY TO C
ONTINUE....".+.B..".....THE NATIONAL ELE
CTRIC CODE IS.....".N....53272,23:. UPPE
R & LOWER CASE.|....".DIVIDED INTO 'ARTI
CLES': (EXAMPLE)---".......10);"..ART. 2
50 GROUNDING":.8000.T.&.."...THIS GAME W
ILL HELP YOU BECOME FAMILAR"...?.."WITH
THE ARTICLE NUMBERS AND SOMETHING".6.X..
"THAT CAN BE FOUND IN THESE ARTICLES..."
:.8000.G.Q.."...YOU WILL BE SHOWN AN ITE
M OR RULE, AND"......"YOU ARE TO GIVE TH
E NUMBER OF THE ART.".A...."WHERE THIS I
NFORMATION CAN BE FOUND.".K....8000.....
."....PRESS ANY KEY WHEN YOU WANT TO BEG
IN"... ..K$:.K$."".800.....W.0:R.0:..H..
.."............PLEASE MAKE A SELECTION:"
.R....".........1.. 10 QUESTION AT RANDO
M"......"........2.. ALL 50 QUESTIONS...
...".........CHOOSE '1' OR '2'.".L....Y$
:.Y$."".1030......Y$."2".2650...L..Y$."1
".1150...~..3350......".":B.1......J.1.1
0:.53280,7.-...N..(.(1).50).1.L.F.."..";
B;".";TB$(N,1):B.B.1.J.X.."GIVE THE ART.
NUMBER";C.....ART(N,1).C.1600......532
80,0:."..WRONG....IT IS IN ";ART(N,1);".
".H....".SEE ";SEC$(N,1)......9000:.T.1.
300:.T.....W.W.1:.1700...@..53280,13:.".
.CORRECT.":.8000:.T.1.300:.T.4.Y.."..SEE
";SEC$(N,1).>.R.R.R.1.E....J.U....T.1.8
00:.T.I.L..SC.100.R.(R.W)...V..53280,4:.
".........YOUR SCORE IS ";SC;"%.."......
SC.100.SC.80.."..EXCELLENT, YOU ARE A GO
OD ELECTRICIAN":.1800......SC.80.SC.70..
".........YOU NEED MORE STUDY".B....SC.7
0.."........MAYBE YOU SHOULD BE A PLUMBE
R".N...."......DO YOU WANT TO PLAY AGAIN
(Y/N)...:..K$:.K$."".1850...L..K$."Y".9
00.F....".....THANKS FOR PLAYING -- SEE
YOU AGAIN":.:....P..ELECTRIC BOILERS,424
,424-G & 424-H. .Z..DIRECT BURIAL,300,SE
C. 305-5 AND TABLE 300-5.I....MOTOR IN-S
IGHT RULE,430,SEC. 430-86.|....DELTA HIG
H LEG,215,SEC. 215-8 ORANGE IN COLOR....
..HOSPITAL EMERGENCY SYSTEMS,517,SEC. 51
7-60 TO 517-65......RESIDENTIAL GARAGES,
210,SEC. 210-8(A)(2)/210-52(F)......CART
RIDGE FUSES,240,240 PART F.6....SWIMING
POOL HEATERS,680,680-7._. ..SUPPORT FOR
FIXTURES,410,410 PART D...*..PERMITTED U
SE OF FLAT CONDUCTOR CABLE,328,328-4...4
..DEAD FRONT PANELS,384,384-18...>..DEMA
ND FACTOR FOR DRYERS,220,TABLE 220-18...
H..ACESSIBLITY OF MAIN SWITCH,230,230-72
(C).G.R..CONDUCTOR AMPACITY,310,TABLES 3
10-16 TO 310-19.L.\..CALC. OF SIGN LOAD,
600,600-6(C)...F..CABLE TRAY INSTALLATIO
N,318,318-5...P..SUPPORT OF BUSWAYS,364,
364-5.T.Z..USE OF BUSHINGS,346,346-8....
..SEALING IN CLASS 1,501,501-5......BRAN
CH CKT. FOR HOT TUBS,680,680-40.;....COL
OR CODING,210,210-5.Z....FLOOR BOXES,370
,370-17(B).{....SUPPORT FOR ROMEX,336,33
6-5......GRND ELECTRODE CONDUCTOR SIZE,2
50,TABLE 250-94.L....BARE NUETRAL,230,23
0-30...J..BENDS IN GREENFIELD,350,350-6.
..T..BACKFILL FOR CABLE,300,300-5(F).=..
..AMPACITY OF SERVICE DROP,230,230-23...
...LOAD CALCU.FOR RANGES,220,TABLE 220-1
9 HOUSEHOLD 220-20 COMMERCIAL......AUTO-
TRANSFORMER BALLAST,410,410-78.U....WATT
S PER SQ.FT.,220,TABLE 220-11......USE O
F DOUBLE LOCK NUTS,250,250-76.'....WIRE
UNDER A BINDING SCREW,110,110-4.Q....CLA
SS 1 COMMERCIAL GARAGES,511,511-2.Y.$..M
AIN SW. FOR FIRE ALARM,230,230-72......A
MPACITY OF FIXTURE WIRE,402,402-5...8..C
LOSET LIGHTS,410,410-8...B..STANDARD FUS
E RATINGS,240,240-6...L..DENTAL CLINICS,
517,517 PART C.*.V..SEALING OF GAS PUMPS
,514,514-6.U.`..SWIMING POOL RECEPTACLES
,680,680-6(A).W.J..25' TAP RULE,240,240-
21 EX.3...T..WATER HEATER LOAD,422,422-1
4(B) & 422-5 EX.2.W.~..AMPACITY REQUIRED
FOR WELDERS,630,630-11......WORKING CLE
ARANCE FOR ELECT. EQUIP.,110,110-16.:...
.SEAL FOR DIFFERENT TEMPERATURES,300,300
-7.E....RATING FOR X-RAY CONDUCTORS,660,
660-6......GOOD WORKMANSHIP,110,110-12 &
110-13......HEAVY-DUTY LAMPHOLDERS,210,
210-21(A).Y....FESTOON LIGHTING,225,225-
4...D..THERMAL EXPANSION JOINTS,300,300-
7(B)...Z..3350:B.1:.".".,....N.1.50:.532
80,7.E...."..";B;".";TB$(N,1)._...."GIVE
ART. NUMBER";C.I...B.B.1.~."..ART(N,1).
C.3000...T..53280,0:."..WRONG....IT IS "
;ART(N,1);".":.T.1.300:.T.Q.Y.."..SEE ";
SEC$(N,1)...^..9000:.T.1.300:.T.....W.W.
1:.3050.+....53280,13:."..CORRECT.":.800
0:.T.1.300:.T:R.R.1.C.Q.."..SEE ";SEC$(N
,1).J....N.Z....T.1.800:.T.D.N..1740.U..
..K$."Y".1200......".....THANKS FOR PLAY
ING -- SEE YOU AGAIN":..K....TB$(50,1),A
RT(50,1),SEC$(50,1).W.H..I.1.50...Z..TB$
(I,1),ART(I,1),SEC$(I,1)......I:....@..
** SOUND SUBROUTINE **.$.J.:.0.T.S.54272
.>.^.. S.24,15.L.H.. S.6,240.Y.R.. S.4,1
7.H.|.. A.1 . 10..... X. 1 . 255 . 25.
..... S.1,X...... X...... A...... S.4,32
.......M.(#. ** SOUND SUBROUTINE **.S.
2#:...<#S.54272...F#. S.24,7...P#. S.5,1
2.16.0...Z#. S.6,15.16.10.(.D#. X. 255 .
100. .1.4.N#. S.1,X.A.X#. S.4,17.V..#.
D.1 . 10 : . D.^..#. X.L..#. S.24,15.Y.
#. S.1,15....#. S.4,128....#....
> CLICK IMAGE PREVIEW FOR FULL MODAL