CARD CONTROL
FILE INFORMATION
FILENAME(S): CARD CONTROL
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-11-30 18:12:10
APPEARS ON: 1 disk(s)
FILE HASH
b1fa00e6df247424a6d7e8de923646f1e6aaebd93a2d4838a90e88697343f69e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOADSTAR 29 S 2 | CARD CONTROL | PRG | Sailor, Ganheden | 25 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 0A 00 8D 36 30 31 30 30 3A 99 22 93 |.......60100:.".|
00000010: 0E 8E 22 3A 97 36 35 30 2C 31 32 38 00 39 08 64 |..":.650,128.9.d|
00000020: 00 97 35 33 32 38 30 2C 30 3A 97 35 33 32 38 31 |..53280,0:.53281|
00000030: 2C 30 3A 97 36 34 36 2C 35 00 51 08 6E 00 99 C7 |,0:.646,5.Q.n...|
00000040: 28 31 34 37 29 3A 81 58 B2 31 A4 31 30 3A 99 3A |(147):.X.1.10:.:|
00000050: 82 00 89 08 96 00 4E B2 31 30 30 3A 86 44 24 28 |......N.100:.D$(|
00000060: 4E 29 2C 42 24 28 4E 29 2C 45 24 28 4E 29 2C 46 |N),B$(N),E$(N),F|
00000070: 24 28 4E 29 2C 4C 24 28 4E 29 2C 47 24 28 34 30 |$(N),L$(N),G$(40|
00000080: 29 3A 42 4B 24 B2 22 AF 22 00 B5 08 98 00 43 24 |):BK$.".".....C$|
00000090: 28 31 29 B2 22 44 22 3A 43 24 28 32 29 B2 22 43 |(1)."D":C$(2)."C|
000000A0: 22 3A 43 24 28 33 29 B2 22 52 22 3A 43 24 28 34 |":C$(3)."R":C$(4|
000000B0: 29 B2 22 51 22 00 DB 08 9B 00 99 22 93 9E 20 20 |)."Q"......".. |
000000C0: 20 20 20 20 20 20 20 20 43 52 45 44 49 54 20 43 | CREDIT C|
000000D0: 41 52 44 20 43 4F 4E 54 52 4F 4C 00 00 09 9C 00 |ARD CONTROL.....|
000000E0: 99 22 99 20 20 20 20 20 20 20 20 20 20 B7 B7 B7 |.". ...|
000000F0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000100: 00 0F 09 A0 00 81 58 B2 31 A4 36 3A 99 3A 82 00 |......X.1.6:.:..|
00000110: 2A 09 AA 00 99 A3 31 34 29 22 9E 2A 2A 2A 20 4D |*.....14)".*** M|
00000120: 45 4E 55 20 2A 2A 2A 22 3A 99 00 53 09 B4 00 99 |ENU ***":..S....|
00000130: A3 35 29 22 9A 44 20 05 2D 20 9F 44 49 53 50 4C |.5)".D .- .DISPL|
00000140: 41 59 20 43 52 45 44 49 54 20 43 41 52 44 20 44 |AY CREDIT CARD D|
00000150: 41 54 41 00 7F 09 BE 00 99 A3 35 29 22 9A 43 20 |ATA.......5)".C |
00000160: 05 2D 20 9F 43 52 45 41 54 45 2F 41 44 44 20 43 |.- .CREATE/ADD C|
00000170: 52 45 44 49 54 20 43 41 52 44 20 44 41 54 41 00 |REDIT CARD DATA.|
00000180: AC 09 C8 00 99 A3 35 29 22 9A 52 20 05 2D 20 9F |......5)".R .- .|
00000190: 52 45 50 4F 52 54 20 4C 4F 53 54 20 4F 52 20 44 |REPORT LOST OR D|
000001A0: 41 4D 41 47 45 44 20 43 41 52 44 53 00 C2 09 D2 |AMAGED CARDS....|
000001B0: 00 99 A3 35 29 22 9A 51 20 05 2D 20 9F 51 55 49 |...5)".Q .- .QUI|
000001C0: 54 11 00 FD 09 DC 00 99 22 13 11 11 11 11 11 11 |T.......".......|
000001D0: 11 11 11 11 11 11 11 11 11 9A 22 A3 31 31 29 22 |..........".11)"|
000001E0: 45 4E 54 45 52 20 53 45 4C 45 43 54 49 4F 4E 3A |ENTER SELECTION:|
000001F0: 20 9D 99 22 3B 42 4B 24 3B 22 9E 22 3B 00 13 0A | ..";BK$;".";...|
00000200: E1 00 4D 4F B2 31 36 3A 4E 43 B2 31 3A 8D 36 30 |..MO.16:NC.1:.60|
00000210: 35 30 30 00 31 0A EB 00 81 42 B2 31 A4 34 3A 8B |500.1....B.1.4:.|
00000220: 43 24 28 42 29 B2 41 24 A7 41 B2 42 3A 89 32 35 |C$(B).A$.A.B:.25|
00000230: 30 00 37 0A EC 00 82 00 40 0A ED 00 89 32 32 30 |0.7.....@....220|
00000240: 00 59 0A FA 00 91 41 89 32 38 30 2C 35 30 30 2C |.Y....A.280,500,|
00000250: 36 39 30 2C 36 30 30 30 30 00 5F 0A 04 01 3A 00 |690,60000._...:.|
00000260: 65 0A 0E 01 3A 00 8E 0A 18 01 99 22 93 9E 20 20 |e...:......".. |
00000270: 20 20 20 20 20 20 44 49 53 50 4C 41 59 20 43 52 | DISPLAY CR|
00000280: 45 44 49 54 20 43 41 52 44 20 44 41 54 41 00 B6 |EDIT CARD DATA..|
00000290: 0A 19 01 99 22 99 20 20 20 20 20 20 20 20 B7 B7 |....". ..|
000002A0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
000002B0: B7 B7 B7 B7 B7 B7 00 C8 0A 1D 01 8D 31 32 34 30 |............1240|
000002C0: 3A 8B 41 42 A7 31 35 35 00 D2 0A 1E 01 8D 31 34 |:.AB.155......14|
000002D0: 30 30 00 E4 0A 1F 01 8D 31 33 35 30 3A 8B 45 52 |00......1350:.ER|
000002E0: A7 31 35 35 00 0B 0B 22 01 99 22 43 52 45 44 49 |.155...".."CREDI|
000002F0: 54 20 43 41 52 44 53 20 4F 4E 20 46 49 4C 45 20 |T CARDS ON FILE |
00000300: 54 4F 20 44 41 54 45 3A 22 3A 99 00 37 0B 2C 01 |TO DATE:":..7.,.|
00000310: 99 22 12 4E 41 4D 45 92 22 A3 31 36 29 22 12 41 |.".NAME.".16)".A|
00000320: 43 43 54 2E 20 23 92 22 A3 33 30 29 22 12 45 58 |CCT. #.".30)".EX|
00000330: 50 20 44 41 54 45 92 00 5D 0B 36 01 99 22 2D 2D |P DATE..].6.."--|
00000340: 2D 2D 22 A3 31 36 29 22 2D 2D 2D 2D 2D 2D 2D 22 |--".16)"-------"|
00000350: A3 33 30 29 22 2D 2D 2D 2D 2D 2D 2D 2D 00 66 0B |.30)"--------.f.|
00000360: 40 01 4B 31 B2 30 00 71 0B 4A 01 81 58 B2 31 A4 |@.K1.0.q.J..X.1.|
00000370: 4E 00 7E 0B 54 01 84 31 2C 44 24 28 58 29 00 93 |N.~.T..1,D$(X)..|
00000380: 0B 5E 01 8B 44 24 28 58 29 B2 22 45 4E 44 22 A7 |.^..D$(X)."END".|
00000390: 34 34 30 00 A2 0B 68 01 8B 4B 31 B3 31 37 A7 34 |440...h..K1.17.4|
000003A0: 30 30 00 CB 0B 72 01 99 3A 99 A3 38 29 22 50 52 |00...r..:..8)"PR|
000003B0: 45 53 53 20 12 52 45 54 55 52 4E 92 20 54 4F 20 |ESS .RETURN. TO |
000003C0: 43 4F 4E 54 49 4E 55 45 22 3A 99 00 E2 0B 7C 01 |CONTINUE":....|.|
000003D0: A1 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 29 A7 33 |.A$:.A$...(13).3|
000003E0: 38 30 00 EB 0B 86 01 4B 31 B2 30 00 0A 0C 90 01 |80.....K1.0.....|
000003F0: 84 31 2C 42 24 28 58 29 2C 45 24 28 58 29 2C 46 |.1,B$(X),E$(X),F|
00000400: 24 28 58 29 2C 4C 24 28 58 29 00 2B 0C 9A 01 99 |$(X),L$(X).+....|
00000410: 44 24 28 58 29 3B A3 31 35 29 3B 42 24 28 58 29 |D$(X);.15);B$(X)|
00000420: 3B A3 33 34 29 3B 45 24 28 58 29 00 37 0C A4 01 |;.34);E$(X).7...|
00000430: 4B 31 B2 4B 31 AA 31 00 3E 0C AE 01 82 58 00 71 |K1.K1.1.>....X.q|
00000440: 0C B8 01 A0 31 3A 99 3A 99 22 45 4E 44 20 4F 46 |....1:.:."END OF|
00000450: 20 46 49 4C 45 2E 22 3A 99 3A 99 A3 31 32 29 22 | FILE.":.:..12)"|
00000460: 12 50 52 45 53 53 20 4D 20 46 4F 52 20 4D 45 4E |.PRESS M FOR MEN|
00000470: 55 00 84 0C C2 01 A1 41 24 3A 8B 41 24 B2 22 22 |U......A$:.A$.""|
00000480: A7 34 35 30 00 95 0C CC 01 8B 41 24 B3 B1 22 4D |.450......A$.."M|
00000490: 22 A7 34 35 30 00 A0 0C D6 01 9C 3A 89 31 35 30 |".450......:.150|
000004A0: 00 A6 0C E0 01 3A 00 AC 0C EA 01 3A 00 D6 0C F4 |.....:.....:....|
000004B0: 01 99 22 93 9E 20 20 20 20 20 20 43 52 45 41 54 |..".. CREAT|
000004C0: 45 2F 41 44 44 20 43 52 45 44 49 54 20 43 41 52 |E/ADD CREDIT CAR|
000004D0: 44 20 44 41 54 41 00 FF 0C F5 01 99 22 99 20 20 |D DATA......". |
000004E0: 20 20 20 20 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 | ............|
000004F0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 00 |................|
00000500: 07 0D F9 01 58 B2 31 00 25 0D FE 01 8D 31 32 34 |....X.1.%....124|
00000510: 30 3A 8D 31 32 36 30 3A 8D 31 34 34 30 3A 99 C7 |0:.1260:.1440:..|
00000520: 28 31 34 37 29 00 30 0D 08 02 81 58 B2 58 A4 4E |(147).0....X.X.N|
00000530: 00 56 0D 12 02 99 22 93 20 20 20 20 20 20 20 20 |.V....". |
00000540: 20 20 9B 54 59 50 45 20 05 45 4E 44 9B 20 54 4F | .TYPE .END. TO|
00000550: 20 45 58 49 54 2E 00 6E 0D 1C 02 99 22 11 1E 45 | EXIT..n...."..E|
00000560: 4E 54 52 59 20 23 20 12 99 22 3B 58 3A 99 00 91 |NTRY # ..";X:...|
00000570: 0D 21 02 99 22 20 20 20 20 20 20 20 20 20 20 20 |.!.." |
00000580: 20 20 99 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 91 | ..............|
00000590: 91 00 AD 0D 26 02 99 22 81 4E 41 4D 45 20 4F 46 |....&..".NAME OF|
000005A0: 20 43 41 52 44 3A 9E 22 3B 42 4B 24 3B 00 CE 0D | CARD:.";BK$;...|
000005B0: 2B 02 4D 4F B2 31 39 30 3A 4E 43 B2 31 32 3A 8D |+.MO.190:NC.12:.|
000005C0: 36 30 35 30 30 3A 44 24 28 58 29 B2 41 24 00 E3 |60500:D$(X).A$..|
000005D0: 0D 30 02 8B 44 24 28 58 29 B2 22 45 4E 44 22 A7 |.0..D$(X)."END".|
000005E0: 36 37 30 00 09 0E 35 02 99 22 11 11 20 20 20 20 |670...5..".. |
000005F0: 20 20 20 20 20 20 99 B7 B7 B7 B7 B7 B7 B7 B7 B7 | ..........|
00000600: B7 B7 B7 B7 B7 B7 91 91 22 00 22 0E 3A 02 99 22 |........".".:.."|
00000610: 81 41 43 43 4F 55 4E 54 20 23 3A 9E 22 3B 42 4B |.ACCOUNT #:.";BK|
00000620: 24 3B 00 41 0E 3F 02 4D 4F B2 32 3A 4E 43 B2 31 |$;.A.?.MO.2:NC.1|
00000630: 35 3A 8D 36 30 35 30 30 3A 42 24 28 58 29 B2 41 |5:.60500:B$(X).A|
00000640: 24 00 6E 0E 41 02 99 22 11 11 20 20 20 20 20 20 |$.n.A..".. |
00000650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000660: 20 20 20 20 20 20 99 B7 B7 B7 B7 B7 91 91 00 99 | ..........|
00000670: 0E 44 02 99 22 81 45 58 50 49 52 41 54 49 4F 4E |.D..".EXPIRATION|
00000680: 20 44 41 54 45 20 28 45 58 3A 20 30 31 2F 38 34 | DATE (EX: 01/84|
00000690: 29 3A 9E 22 3B 42 4B 24 3B 00 B9 0E 49 02 4D 4F |):.";BK$;...I.MO|
000006A0: B2 31 33 30 3A 4E 43 B2 35 3A 8D 36 30 35 30 30 |.130:NC.5:.60500|
000006B0: 3A 45 24 28 58 29 B2 41 24 00 EE 0E 4B 02 99 22 |:E$(X).A$...K.."|
000006C0: 11 11 11 20 99 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |... ............|
000006D0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
000006E0: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 91 91 91 00 15 |................|
000006F0: 0F 4E 02 99 22 81 43 4F 4D 50 41 4E 59 20 50 2E |.N..".COMPANY P.|
00000700: 4F 2E 20 4F 52 20 53 54 52 45 45 54 20 41 44 44 |O. OR STREET ADD|
00000710: 52 45 53 53 22 00 41 0F 53 02 99 22 3A 9E 22 3B |RESS".A.S..":.";|
00000720: 42 4B 24 3B 3A 4E 43 B2 33 38 3A 4D 4F B2 31 39 |BK$;:NC.38:MO.19|
00000730: 30 3A 8D 36 30 35 30 30 3A 46 24 28 58 29 B2 41 |0:.60500:F$(X).A|
00000740: 24 00 76 0F 55 02 99 22 11 11 11 20 99 B7 B7 B7 |$.v.U.."... ....|
00000750: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000760: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00000770: B7 B7 B7 91 91 91 00 AE 0F 58 02 99 22 81 43 49 |.........X..".CI|
00000780: 54 59 20 53 54 41 54 45 20 26 20 5A 49 50 20 28 |TY STATE & ZIP (|
00000790: 53 4F 52 52 59 2C 20 4E 4F 20 43 4F 4D 4D 41 53 |SORRY, NO COMMAS|
000007A0: 2E 29 22 3A 99 22 3A 9E 22 3B 42 4B 24 3B 00 CF |.)":.":.";BK$;..|
000007B0: 0F 5D 02 4D 4F B2 31 39 30 3A 4E 43 B2 33 38 3A |.].MO.190:NC.38:|
000007C0: 8D 36 30 35 30 30 3A 4C 24 28 58 29 B2 41 24 00 |.60500:L$(X).A$.|
000007D0: ED 0F 6C 02 99 3A 99 22 49 53 20 44 41 54 41 20 |..l..:."IS DATA |
000007E0: 43 4F 52 52 45 43 54 20 28 59 2F 4E 29 00 00 10 |CORRECT (Y/N)...|
000007F0: 76 02 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 36 33 30 |v..Z$:.Z$."".630|
00000800: 00 10 10 80 02 8B 5A 24 B2 22 59 22 A7 36 36 30 |......Z$."Y".660|
00000810: 00 49 10 8A 02 8B 5A 24 B2 22 4E 22 A7 99 22 91 |.I....Z$."N"..".|
00000820: 20 20 20 20 12 52 45 2D 45 4E 54 45 52 20 44 41 | .RE-ENTER DA|
00000830: 54 41 92 20 20 20 20 22 3A 81 41 B2 31 A4 32 30 |TA. ":.A.1.20|
00000840: 30 30 3A 82 3A 89 35 33 30 00 54 10 94 02 99 3A |00:.:.530.T....:|
00000850: 99 3A 82 58 00 67 10 9E 02 A0 32 3A 99 22 93 22 |.:.X.g....2:."."|
00000860: 3B 3A 89 31 34 35 30 00 6D 10 A8 02 3A 00 81 10 |;:.1450.m...:...|
00000870: B2 02 99 C7 28 31 34 37 29 3A 8D 31 34 34 30 3A |....(147):.1440:|
00000880: 99 00 B5 10 BC 02 99 22 81 59 4F 55 52 20 4E 41 |.......".YOUR NA|
00000890: 4D 45 3A 9E 22 3B 42 4B 24 3B 3A 4D 4F B2 31 39 |ME:.";BK$;:MO.19|
000008A0: 30 3A 4E 43 B2 32 30 3A 8D 36 30 35 30 30 3A 59 |0:NC.20:.60500:Y|
000008B0: 4E 24 B2 41 24 00 E8 10 C6 02 99 22 81 53 54 52 |N$.A$......".STR|
000008C0: 45 45 54 20 4F 52 20 50 4F 53 54 20 4F 46 46 49 |EET OR POST OFFI|
000008D0: 43 45 3A 9E 22 3B 42 4B 24 3B 3A 8D 36 30 35 30 |CE:.";BK$;:.6050|
000008E0: 30 3A 4D 41 24 B2 41 24 00 0A 11 D0 02 99 22 81 |0:MA$.A$......".|
000008F0: 43 49 54 59 3A 9E 22 3B 42 4B 24 3B 3A 8D 36 30 |CITY:.";BK$;:.60|
00000900: 35 30 30 3A 43 49 24 B2 41 24 00 38 11 DA 02 99 |500:CI$.A$.8....|
00000910: 22 81 53 54 41 54 45 20 26 20 5A 49 50 20 43 4F |".STATE & ZIP CO|
00000920: 44 45 3A 9E 22 3B 42 4B 24 3B 3A 8D 36 30 35 30 |DE:.";BK$;:.6050|
00000930: 30 3A 53 5A 24 B2 41 24 00 62 11 E4 02 99 22 81 |0:SZ$.A$.b....".|
00000940: 54 4F 44 41 59 27 53 20 44 41 54 45 3A 9E 22 3B |TODAY'S DATE:.";|
00000950: 42 4B 24 3B 3A 8D 36 30 35 30 30 3A 54 44 24 B2 |BK$;:.60500:TD$.|
00000960: 41 24 00 69 11 EE 02 A0 32 00 77 11 F8 02 99 C7 |A$.i....2.w.....|
00000970: 28 31 34 37 29 3A 99 00 9B 11 02 03 8D 31 32 35 |(147):.......125|
00000980: 30 3A 8D 31 34 30 30 3A 8D 31 37 31 30 3A 8D 31 |0:.1400:.1710:.1|
00000990: 33 35 30 3A 8B 45 52 A7 31 35 35 00 A6 11 0C 03 |350:.ER.155.....|
000009A0: 81 58 B2 31 A4 4E 00 B3 11 16 03 84 31 2C 44 24 |.X.1.N......1,D$|
000009B0: 28 58 29 00 C8 11 20 03 8B 44 24 28 58 29 B2 22 |(X)... ..D$(X)."|
000009C0: 45 4E 44 22 A7 39 30 30 00 E7 11 2A 03 84 31 2C |END".900...*..1,|
000009D0: 42 24 28 58 29 2C 45 24 28 58 29 2C 46 24 28 58 |B$(X),E$(X),F$(X|
000009E0: 29 2C 4C 24 28 58 29 00 26 12 34 03 99 22 9B 11 |),L$(X).&.4.."..|
000009F0: 11 44 4F 20 59 4F 55 20 57 41 4E 54 20 41 20 52 |.DO YOU WANT A R|
00000A00: 45 50 4F 52 54 20 46 4F 52 3A 20 22 3B 44 24 28 |EPORT FOR: ";D$(|
00000A10: 58 29 3A 99 22 50 52 45 53 53 3A 20 05 59 20 9B |X):."PRESS: .Y .|
00000A20: 4F 52 20 05 4E 22 00 3B 12 3E 03 A1 51 31 24 3A |OR .N".;.>..Q1$:|
00000A30: 8B 51 31 24 B2 22 22 A7 38 33 30 00 4C 12 48 03 |.Q1$."".830.L.H.|
00000A40: 8B 51 31 24 B2 22 4E 22 A7 38 37 30 00 5D 12 4D |.Q1$."N".870.].M|
00000A50: 03 8B 51 31 24 B2 22 59 22 A7 38 35 30 00 66 12 |..Q1$."Y".850.f.|
00000A60: 4E 03 89 38 33 30 00 9C 12 52 03 99 22 9B 49 53 |N..830...R..".IS|
00000A70: 20 43 41 52 44 20 4C 4F 53 54 20 4F 52 20 44 45 | CARD LOST OR DE|
00000A80: 53 54 52 4F 59 45 44 3A 22 3A 99 22 50 52 45 53 |STROYED:":."PRES|
00000A90: 53 3A 20 05 4C 20 9B 4F 52 20 05 44 00 AF 12 57 |S: .L .OR .D...W|
00000AA0: 03 A1 57 24 3A 8B 57 24 B2 22 22 A7 38 35 35 00 |..W$:.W$."".855.|
00000AB0: CA 12 58 03 8B 57 24 B2 22 4C 22 A7 57 24 B2 22 |..X..W$."L".W$."|
00000AC0: 4C 4F 53 54 22 3A 89 38 36 30 00 EA 12 59 03 8B |LOST":.860...Y..|
00000AD0: 57 24 B2 22 44 22 A7 57 24 B2 22 44 45 53 54 52 |W$."D".W$."DESTR|
00000AE0: 4F 59 45 44 22 3A 89 38 36 30 00 F3 12 5A 03 89 |OYED":.860...Z..|
00000AF0: 38 35 35 00 FC 12 5C 03 8D 39 32 30 00 09 13 66 |855...\..920...f|
00000B00: 03 8B 53 54 B2 30 A7 82 58 00 18 13 70 03 8B 53 |..ST.0..X...p..S|
00000B10: 54 B2 36 34 A7 39 30 30 00 3E 13 7A 03 8B 53 54 |T.64.900.>.z..ST|
00000B20: B3 B1 30 AF 53 54 B3 B1 36 34 A7 99 22 45 52 52 |..0.ST..64.."ERR|
00000B30: 4F 52 2E 2E 2E 22 3B 53 54 3A A0 31 3A 80 00 67 |OR...";ST:.1:..g|
00000B40: 13 84 03 A0 31 3A 99 22 45 4E 44 20 4F 46 20 46 |....1:."END OF F|
00000B50: 49 4C 45 22 3A 81 54 B2 31 A4 31 30 30 30 3A 82 |ILE":.T.1.1000:.|
00000B60: 3A 9C 3A 89 31 35 30 00 6D 13 8E 03 3A 00 73 13 |:.:.150.m...:.s.|
00000B70: 98 03 3A 00 88 13 A2 03 53 4E 24 B2 22 D3 49 4E |..:.....SN$.".IN|
00000B80: 43 45 52 45 4C 59 2C 22 00 93 13 AC 03 9F 34 2C |CERELY,"......4,|
00000B90: 34 2C 37 00 9A 13 B6 03 98 34 00 B3 13 C0 03 98 |4,7......4......|
00000BA0: 34 2C 22 22 A3 38 30 AB C3 28 4D 41 24 29 29 3B |4,"".80..(MA$));|
00000BB0: 4D 41 24 00 DB 13 CA 03 98 34 2C 22 22 A3 37 39 |MA$......4,"".79|
00000BC0: AB C3 28 43 49 24 29 AB C3 28 53 5A 24 29 29 3B |..(CI$)..(SZ$));|
00000BD0: 43 49 24 3B 22 20 22 3B 53 5A 24 00 F4 13 D4 03 |CI$;" ";SZ$.....|
00000BE0: 98 34 2C 22 22 A3 38 30 AB C3 28 54 44 24 29 29 |.4,"".80..(TD$))|
00000BF0: 3B 54 44 24 00 01 14 DE 03 98 34 2C 44 24 28 58 |;TD$......4,D$(X|
00000C00: 29 00 0E 14 E8 03 98 34 2C 46 24 28 58 29 00 1B |)......4,F$(X)..|
00000C10: 14 F2 03 98 34 2C 4C 24 28 58 29 00 22 14 FC 03 |....4,L$(X)."...|
00000C20: 98 34 00 40 14 06 04 98 34 2C 22 D2 C5 3A 20 C1 |.4.@....4,"..: .|
00000C30: 43 43 4F 55 4E 54 20 23 20 22 3B 42 24 28 58 29 |CCOUNT # ";B$(X)|
00000C40: 00 47 14 10 04 98 34 00 59 14 1A 04 98 34 2C 22 |.G....4.Y....4,"|
00000C50: C4 45 41 52 20 D3 49 52 3A 00 60 14 24 04 98 34 |.EAR .IR:.`.$..4|
00000C60: 00 8F 14 2E 04 98 34 2C 22 22 A3 35 29 22 C9 4E |......4,"".5)".N|
00000C70: 20 52 45 47 41 52 44 20 54 4F 20 54 48 45 20 41 | REGARD TO THE A|
00000C80: 42 4F 56 45 20 41 43 43 4F 55 4E 54 2C 22 3B 00 |BOVE ACCOUNT,";.|
00000C90: B8 14 33 04 98 34 2C 22 20 C9 20 41 4D 20 52 45 |..3..4," . AM RE|
00000CA0: 50 4F 52 54 49 4E 47 20 54 48 41 54 20 4D 59 20 |PORTING THAT MY |
00000CB0: 43 41 52 44 20 57 41 53 00 BF 14 38 04 98 34 00 |CARD WAS...8..4.|
00000CC0: E7 14 42 04 98 34 2C 57 24 3B 22 20 4F 4E 20 4F |..B..4,W$;" ON O|
00000CD0: 52 20 41 42 4F 55 54 20 54 48 45 20 41 42 4F 56 |R ABOUT THE ABOV|
00000CE0: 45 20 44 41 54 45 2E 00 F1 14 4C 04 98 34 3A 98 |E DATE....L..4:.|
00000CF0: 34 00 21 15 56 04 98 34 2C 22 22 A3 35 29 22 D0 |4.!.V..4,"".5)".|
00000D00: 4C 45 41 53 45 20 54 41 4B 45 20 41 4E 59 20 4E |LEASE TAKE ANY N|
00000D10: 45 43 45 53 53 41 52 59 20 41 43 54 49 4F 4E 22 |ECESSARY ACTION"|
00000D20: 3B 00 45 15 5B 04 98 34 2C 22 20 54 4F 20 49 4E |;.E.[..4," TO IN|
00000D30: 53 55 52 45 20 54 48 41 54 20 54 48 45 52 45 20 |SURE THAT THERE |
00000D40: 49 53 20 4E 4F 00 4C 15 60 04 98 34 00 75 15 6A |IS NO.L.`..4.u.j|
00000D50: 04 98 34 2C 22 55 4E 41 55 54 48 4F 52 49 5A 45 |..4,"UNAUTHORIZE|
00000D60: 44 20 55 53 45 20 4F 46 20 54 48 49 53 20 43 41 |D USE OF THIS CA|
00000D70: 52 44 2C 22 3B 00 A0 15 6F 04 98 34 2C 22 20 41 |RD,";...o..4," A|
00000D80: 4E 44 20 50 4C 45 41 53 45 20 49 53 53 55 45 20 |ND PLEASE ISSUE |
00000D90: 41 20 52 45 50 4C 41 43 45 4D 45 4E 54 20 41 53 |A REPLACEMENT AS|
00000DA0: 00 A7 15 74 04 98 34 00 C1 15 7E 04 98 34 2C 22 |...t..4...~..4,"|
00000DB0: 53 4F 4F 4E 20 41 53 20 50 4F 53 53 49 42 4C 45 |SOON AS POSSIBLE|
00000DC0: 2E 00 CB 15 88 04 98 34 3A 98 34 00 EF 15 92 04 |.......4:.4.....|
00000DD0: 98 34 2C 22 22 A3 35 29 22 D0 4C 45 41 53 45 20 |.4,"".5)".LEASE |
00000DE0: 43 4F 4E 54 41 43 54 20 4D 45 20 49 46 22 3B 00 |CONTACT ME IF";.|
00000DF0: 1A 16 97 04 98 34 2C 22 20 41 44 44 49 54 49 4F |.....4," ADDITIO|
00000E00: 4E 41 4C 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 20 |NAL INFORMATION |
00000E10: 49 53 20 4E 45 45 44 45 44 2E 00 2A 16 9C 04 81 |IS NEEDED..*....|
00000E20: 58 B2 31 A4 34 3A 98 34 3A 82 00 43 16 A6 04 98 |X.1.4:.4:..C....|
00000E30: 34 2C 22 22 A3 37 30 AB C3 28 53 4E 24 29 29 3B |4,"".70..(SN$));|
00000E40: 53 4E 24 00 53 16 B0 04 81 58 B2 31 A4 34 3A 98 |SN$.S....X.1.4:.|
00000E50: 34 3A 82 00 6C 16 BA 04 98 34 2C 22 22 A3 37 35 |4:..l....4,"".75|
00000E60: AB C3 28 59 4E 24 29 29 3B 59 4E 24 00 76 16 C4 |..(YN$));YN$.v..|
00000E70: 04 98 34 3A A0 34 00 7C 16 CE 04 8E 00 85 16 D8 |..4:.4.|........|
00000E80: 04 41 42 B2 2E 00 B6 16 DD 04 99 22 13 11 11 11 |.AB........"....|
00000E90: 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000EA0: 20 20 20 99 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 | .............|
00000EB0: B7 B7 B7 B7 91 91 00 F6 16 E2 04 99 22 9F 13 11 |............"...|
00000EC0: 11 11 43 41 52 44 48 4F 4C 44 45 52 27 53 20 4E |..CARDHOLDER'S N|
00000ED0: 41 4D 45 3A 9E 22 3B 42 4B 24 3B 3A 4D 4F B2 31 |AME:.";BK$;:MO.1|
00000EE0: 39 30 3A 4E 43 B2 31 36 3A 8D 36 30 35 30 30 3A |90:NC.16:.60500:|
00000EF0: 46 49 24 B2 41 24 00 06 17 E7 04 8B 41 24 B2 22 |FI$.A$......A$."|
00000F00: 22 A7 41 42 B2 31 00 0C 17 E8 04 8E 00 2F 17 EC |".AB.1......./..|
00000F10: 04 99 3A 99 22 9A 28 05 41 9A 29 05 44 44 20 54 |..:.".(.A.).DD T|
00000F20: 4F 20 45 58 49 53 54 49 4E 47 20 46 49 4C 45 00 |O EXISTING FILE.|
00000F30: 5C 17 F1 04 99 22 9A 28 05 4E 9A 29 05 45 57 20 |\....".(.N.).EW |
00000F40: 46 49 4C 45 22 3A 99 22 9A 28 05 52 9A 29 05 45 |FILE":.".(.R.).E|
00000F50: 54 55 52 4E 20 54 4F 20 4D 45 4E 55 00 70 17 F6 |TURN TO MENU.p..|
00000F60: 04 A1 5A 24 3A 8B 5A 24 B2 22 22 A7 31 32 37 30 |..Z$:.Z$."".1270|
00000F70: 00 7E 17 00 05 8B 5A 24 B2 22 4E 22 A7 8E 00 8F |.~....Z$."N"....|
00000F80: 17 0A 05 8B 5A 24 B2 22 41 22 A7 31 36 32 30 00 |....Z$."A".1620.|
00000F90: A2 17 14 05 8B 5A 24 B2 22 52 22 A7 9C 3A 89 31 |.....Z$."R"..:.1|
00000FA0: 35 30 00 C4 17 1E 05 8B 5A 24 B3 B1 22 4E 22 AF |50......Z$.."N".|
00000FB0: 5A 24 B3 B1 22 41 22 AF 5A 24 B3 B1 22 52 22 A7 |Z$.."A".Z$.."R".|
00000FC0: 31 32 37 30 00 CA 17 3C 05 8E 00 D9 17 46 05 45 |1270...<.....F.E|
00000FD0: 52 B2 2E 3A 8D 31 37 33 30 00 ED 17 50 05 A1 5A |R..:.1730...P..Z|
00000FE0: 24 3A 8B 5A 24 B2 22 22 A7 31 33 36 30 00 FE 17 |$:.Z$."".1360...|
00000FF0: 51 05 8B 5A 24 B2 22 54 22 A7 31 33 37 30 00 2D |Q..Z$."T".1370.-|
00001000: 18 52 05 9F 33 2C 38 2C 33 2C 22 22 AA 46 49 24 |.R..3,8,3,"".FI$|
00001010: AA 22 22 3A A0 33 3A 9F 31 35 2C 38 2C 31 35 3A |."":.3:.15,8,15:|
00001020: 84 31 35 2C 41 24 2C 42 24 3A A0 31 35 00 44 18 |.15,A$,B$:.15.D.|
00001030: 53 05 45 52 B2 2E 3A 8B 41 24 B2 22 30 30 22 A7 |S.ER..:.A$."00".|
00001040: 31 33 38 30 00 60 18 54 05 99 22 11 11 96 44 49 |1380.`.T.."...DI|
00001050: 53 4B 20 45 52 52 4F 52 3A 22 3B 41 24 2C 42 24 |SK ERROR:";A$,B$|
00001060: 00 70 18 55 05 81 41 B2 31 A4 32 30 30 30 3A 82 |.p.U..A.1.2000:.|
00001070: 00 7B 18 56 05 45 52 B2 31 3A 8E 00 94 18 5A 05 |.{.V.ER.1:....Z.|
00001080: 8B 5A 24 B2 22 54 22 A7 9F 31 2C 31 2C 30 2C 46 |.Z$."T"..1,1,0,F|
00001090: 49 24 3A 8E 00 B4 18 64 05 8B 5A 24 B2 22 44 22 |I$:....d..Z$."D"|
000010A0: A7 9F 31 2C 38 2C 38 2C 46 49 24 AA 22 2C 53 2C |..1,8,8,FI$.",S,|
000010B0: 52 22 3A 8E 00 CE 18 6E 05 8B 5A 24 B3 B1 22 54 |R":....n..Z$.."T|
000010C0: 22 AF 5A 24 B3 B1 22 44 22 A7 31 33 36 30 00 01 |".Z$.."D".1360..|
000010D0: 19 78 05 99 3A 99 22 12 9F 20 20 49 4E 53 45 52 |.x..:.".. INSER|
000010E0: 54 20 53 4F 55 52 43 45 20 46 49 4C 45 20 41 4E |T SOURCE FILE AN|
000010F0: 44 20 50 52 45 53 53 20 52 45 54 55 52 4E 20 20 |D PRESS RETURN |
00001100: 92 00 09 19 82 05 A1 5A 24 00 1D 19 8C 05 8B 5A |.......Z$......Z|
00001110: 24 B3 B1 C7 28 31 33 29 A7 31 34 31 30 00 23 19 |$...(13).1410.#.|
00001120: 96 05 8E 00 2E 19 A0 05 9F 32 2C 30 3A 8E 00 34 |.........2,0:..4|
00001130: 19 AA 05 3A 00 44 19 B4 05 8D 31 34 30 30 3A 8D |...:.D....1400:.|
00001140: 31 35 36 30 00 4F 19 BE 05 81 58 B2 31 A4 4E 00 |1560.O....X.1.N.|
00001150: 80 19 C8 05 98 31 2C 44 24 28 58 29 3A 98 31 2C |.....1,D$(X):.1,|
00001160: 42 24 28 58 29 3A 98 31 2C 45 24 28 58 29 3A 98 |B$(X):.1,E$(X):.|
00001170: 31 2C 46 24 28 58 29 3A 98 31 2C 4C 24 28 58 29 |1,F$(X):.1,L$(X)|
00001180: 00 96 19 D2 05 8B 44 24 28 58 29 B2 22 45 4E 44 |......D$(X)."END|
00001190: 22 A7 31 35 31 30 00 9D 19 DC 05 82 58 00 A4 19 |".1510......X...|
000011A0: E6 05 A0 31 00 CE 19 EB 05 9F 31 35 2C 38 2C 31 |...1......15,8,1|
000011B0: 35 3A 84 31 35 2C 41 24 2C 42 24 3A A0 31 35 3A |5:.15,A$,B$:.15:|
000011C0: 99 22 9A 3D 3D 3E 9F 22 3B 41 24 2C 42 24 00 F8 |.".==>.";A$,B$..|
000011D0: 19 F0 05 99 3A 99 22 1E 44 4F 20 59 4F 55 20 57 |....:.".DO YOU W|
000011E0: 41 4E 54 20 41 20 42 41 43 4B 55 50 20 43 4F 50 |ANT A BACKUP COP|
000011F0: 59 20 28 59 2F 4E 29 3F 00 0C 1A FA 05 A1 5A 24 |Y (Y/N)?......Z$|
00001200: 3A 8B 5A 24 B2 22 22 A7 31 35 33 30 00 22 1A 04 |:.Z$."".1530."..|
00001210: 06 8B C8 28 5A 24 2C 31 29 B2 22 59 22 A7 31 34 |...(Z$,1)."Y".14|
00001220: 36 30 00 2D 1A 0E 06 9C 3A 89 31 35 30 00 37 1A |60.-....:.150.7.|
00001230: 18 06 8D 31 37 33 30 00 55 1A 1D 06 41 44 24 B2 |...1730.U...AD$.|
00001240: 22 30 22 3A 8B 41 44 A7 41 44 B2 2E 3A 41 44 24 |"0":.AD.AD..:AD$|
00001250: B2 22 40 30 22 00 69 1A 22 06 A1 5A 24 3A 8B 5A |."@0".i."..Z$:.Z|
00001260: 24 B2 22 22 A7 31 35 37 30 00 82 1A 2C 06 8B 5A |$."".1570...,..Z|
00001270: 24 B2 22 54 22 A7 9F 31 2C 31 2C 31 2C 46 49 24 |$."T"..1,1,1,FI$|
00001280: 3A 8E 00 AB 1A 36 06 8B 5A 24 B2 22 44 22 A7 9F |:....6..Z$."D"..|
00001290: 31 2C 38 2C 38 2C AA 41 44 24 AA 22 3A 22 AA 46 |1,8,8,.AD$.":".F|
000012A0: 49 24 AA 22 2C 53 2C 57 22 3A 8E 00 C5 1A 40 06 |I$.",S,W":....@.|
000012B0: 8B 5A 24 B3 B1 22 54 22 AF 5A 24 B3 B1 22 44 22 |.Z$.."T".Z$.."D"|
000012C0: A7 31 35 37 30 00 CB 1A 4A 06 3A 00 D1 1A 54 06 |.1570...J.:...T.|
000012D0: 3A 00 E1 1A 5E 06 8D 31 34 30 30 3A 8D 31 33 35 |:...^..1400:.135|
000012E0: 30 00 ED 1A 63 06 8B 45 52 A7 31 35 35 00 F9 1A |0...c..ER.155...|
000012F0: 68 06 99 C7 28 31 34 37 29 00 04 1B 72 06 81 58 |h...(147)...r..X|
00001300: B2 31 A4 4E 00 29 1B 7C 06 84 31 2C 44 24 28 58 |.1.N.).|..1,D$(X|
00001310: 29 2C 42 24 28 58 29 2C 45 24 28 58 29 2C 46 24 |),B$(X),E$(X),F$|
00001320: 28 58 29 2C 4C 24 28 58 29 00 45 1B 86 06 8B 44 |(X),L$(X).E....D|
00001330: 24 28 58 29 B2 22 45 4E 44 22 AF 53 54 B2 36 34 |$(X)."END".ST.64|
00001340: A7 31 37 30 30 00 52 1B 90 06 8B 53 54 B2 30 A7 |.1700.R....ST.0.|
00001350: 82 58 00 77 1B 9A 06 8B 53 54 B3 B1 30 AF 53 54 |.X.w....ST..0.ST|
00001360: B3 B1 36 34 A7 99 22 45 52 52 4F 52 2E 2E 2E 22 |..64.."ERROR..."|
00001370: 53 54 3A A0 31 3A 80 00 85 1B A4 06 A0 31 3A 41 |ST:.1:.......1:A|
00001380: 44 B2 31 3A 8E 00 BE 1B AE 06 99 22 12 20 20 20 |D.1:.......". |
00001390: 54 55 52 4E 20 4F 4E 20 50 52 49 4E 54 45 52 20 |TURN ON PRINTER |
000013A0: 41 4E 44 20 50 52 45 53 53 20 52 45 54 55 52 4E |AND PRESS RETURN|
000013B0: 20 20 20 20 92 22 3A 8D 31 34 31 30 3A 8E 00 E0 | .":.1410:...|
000013C0: 1B C2 06 99 3A 99 22 05 12 54 92 9B 41 50 45 20 |....:."..T..APE |
000013D0: 4F 52 20 05 12 44 92 9B 49 53 4B 22 3A 99 3A 8E |OR ..D..ISK":.:.|
000013E0: 00 19 1C 60 EA 9F 31 35 2C 38 2C 31 35 2C 22 52 |...`..15,8,15,"R|
000013F0: 30 3A 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 3D |0:HELLO CONNECT=|
00001400: 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 54 22 3A 84 |HELLO CONNECT":.|
00001410: 31 35 2C 45 52 3A A0 31 35 00 2D 1C 6A EA 99 22 |15,ER:.15.-.j.."|
00001420: 93 22 3B 3A 8B 45 52 B3 B1 36 33 A7 80 00 44 1C |.";:.ER..63...D.|
00001430: 74 EA 93 22 48 45 4C 4C 4F 20 43 4F 4E 4E 45 43 |t.."HELLO CONNEC|
00001440: 54 22 2C 38 00 7D 1C C4 EA 50 4E 24 B2 22 C3 D2 |T",8.}...PN$."..|
00001450: C5 C4 C9 D4 A0 C3 C1 D2 C4 20 C3 CF CE D4 D2 CF |......... ......|
00001460: CC 22 3A 41 4E 24 B2 22 C2 D9 3A 20 20 D2 CF C2 |.":AN$."..: ...|
00001470: C5 D2 D4 20 C5 2E 20 CB D5 D0 C6 C5 D2 00 BD 1C |... .. .........|
00001480: CE EA 42 4F B2 31 31 3A 53 43 B2 31 35 3A 43 4C |..BO.11:SC.15:CL|
00001490: B2 30 36 3A 43 31 B2 31 32 3A 43 32 B2 30 30 3A |.06:C1.12:C2.00:|
000014A0: 43 33 B2 31 32 3A 43 34 B2 30 30 3A 43 35 B2 30 |C3.12:C4.00:C5.0|
000014B0: 30 3A 43 36 B2 30 32 3A 43 37 B2 30 39 00 E4 1C |0:C6.02:C7.09...|
000014C0: E2 EA 97 35 33 32 38 30 2C 42 4F 3A 97 35 33 32 |...53280,BO:.532|
000014D0: 38 31 2C 53 43 3A 99 22 93 08 0E 22 3B 3A 89 36 |81,SC:."...";:.6|
000014E0: 30 32 35 30 00 1A 1D EC EA 97 36 34 36 2C 43 31 |0250......646,C1|
000014F0: 3A 99 22 20 1D 12 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |:." ............|
00001500: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00001510: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 00 50 1D F6 EA 97 |...........P....|
00001520: 36 34 36 2C 43 32 3A 99 22 20 1D 12 A5 20 20 20 |646,C2:." ... |
00001530: 20 20 20 20 20 CC CF C1 C4 D3 D4 C1 D2 20 D0 D2 | ........ ..|
00001540: C5 D3 C5 CE D4 D3 3A 20 20 20 20 20 20 20 20 A7 |......: .|
00001550: 00 86 1D 0A EB 97 36 34 36 2C 43 31 3A 99 22 20 |......646,C1:." |
00001560: 1D 12 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001570: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
00001580: A3 A3 A3 A3 A3 A3 00 AA 1D 14 EB 97 36 34 36 2C |............646,|
00001590: 43 36 3A 99 22 11 11 11 22 A3 32 30 AB C3 28 50 |C6:."...".20..(P|
000015A0: 4E 24 29 AD 32 29 3B 50 4E 24 00 CE 1D 1E EB 97 |N$).2);PN$......|
000015B0: 36 34 36 2C 43 37 3A 99 22 11 11 11 22 A3 32 30 |646,C7:."...".20|
000015C0: AB C3 28 41 4E 24 29 AD 32 29 3B 41 4E 24 00 F5 |..(AN$).2);AN$..|
000015D0: 1D 28 EB 97 36 34 36 2C 43 35 3A 99 22 11 11 11 |.(..646,C5:."...|
000015E0: 22 A3 31 33 29 22 C3 CF D0 D9 D2 C9 C7 C8 D4 20 |".13)"......... |
000015F0: 31 39 38 36 22 00 16 1E 32 EB 99 A3 39 29 22 C3 |1986"...2...9)".|
00001600: CF CD CD CF C4 CF D2 C5 20 D0 D5 C2 CC C9 C3 C1 |........ .......|
00001610: D4 C9 CF CE D3 22 00 50 1E 3C EB 97 36 34 36 2C |.....".P.<..646,|
00001620: 43 33 3A 99 22 11 11 11 11 20 1D 12 A4 A4 A4 A4 |C3:.".... ......|
00001630: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00001640: A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 A4 |................|
00001650: 00 86 1E 46 EB 97 36 34 36 2C 43 34 3A 99 22 20 |...F..646,C4:." |
00001660: 1D 12 A5 20 20 20 20 20 20 20 20 20 20 20 20 20 |... |
00001670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001680: 20 20 20 20 20 A7 00 C0 1E 50 EB 97 36 34 36 2C | ....P..646,|
00001690: 43 33 3A 99 22 20 1D 12 A3 A3 A3 A3 A3 A3 A3 A3 |C3:." ..........|
000016A0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 |................|
000016B0: A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 A3 13 92 22 3B |..............";|
000016C0: 00 D2 1E 55 EB 97 31 39 38 2C 2E 3A 89 36 30 33 |...U..198,.:.603|
000016D0: 36 30 00 DE 1E 5A EB 97 36 34 36 2C 43 4C 00 0C |60...Z..646,CL..|
000016E0: 1F 5F EB 99 22 20 AC A2 A2 A2 A2 A2 A2 A2 A2 A2 |._.." ..........|
000016F0: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
00001700: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 BB 00 20 1F 64 |............. .d|
00001710: EB 81 41 B2 31 A4 33 3A 8D 36 30 34 37 30 3A 82 |..A.1.3:.60470:.|
00001720: 00 55 1F 6E EB 8D 36 30 34 37 30 3A 99 22 91 1D |.U.n..60470:."..|
00001730: 1D B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00001740: B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 B7 |................|
00001750: B7 B7 B7 B7 B7 00 6A 1F 78 EB 81 41 B2 31 A4 31 |......j.x..A.1.1|
00001760: 36 3A 8D 36 30 34 37 30 3A 82 00 98 1F 82 EB 99 |6:.60470:.......|
00001770: 22 91 1D 1D AF AF AF AF AF AF AF AF AF AF AF AF |"...............|
00001780: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00001790: AF AF AF AF AF AF AF AF 00 AC 1F 8C EB 81 41 B2 |..............A.|
000017A0: 31 A4 33 3A 8D 36 30 34 37 30 3A 82 00 E0 1F 96 |1.3:.60470:.....|
000017B0: EB 99 22 20 BC 12 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |.." ............|
000017C0: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 |................|
000017D0: A2 A2 A2 A2 A2 A2 A2 A2 A2 A2 92 BE 13 11 22 3B |..............";|
000017E0: 00 FF 1F A0 EB 97 35 33 32 38 30 2C 42 4F 3A 97 |......53280,BO:.|
000017F0: 35 33 32 38 31 2C 53 43 3A 89 36 30 31 34 30 00 |53281,SC:.60140.|
00001800: 21 20 C8 EB 99 22 13 11 11 11 11 11 11 11 11 11 |! ..."..........|
00001810: 11 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D 22 |..............."|
00001820: 3B 00 56 20 D2 EB 97 36 34 36 2C 43 32 3A 99 22 |;.V ...646,C2:."|
00001830: 12 A5 D0 52 45 53 53 20 54 48 45 20 5B D3 D0 C1 |...RESS THE [...|
00001840: C3 C5 20 C2 C1 D2 5D 20 54 4F 20 43 4F 4E 54 49 |.. ...] TO CONTI|
00001850: 4E 55 45 2E A7 22 00 78 20 E6 EB 81 41 B2 31 A4 |NUE..".x ...A.1.|
00001860: 31 30 30 3A A1 41 24 3A 8B 41 24 B2 22 20 22 B0 |100:.A$:.A$." ".|
00001870: 41 24 B2 22 A0 22 A7 8E 00 7E 20 F0 EB 82 00 A0 |A$."."...~ .....|
00001880: 20 FA EB 99 22 13 11 11 11 11 11 11 11 11 11 11 | ..."...........|
00001890: 11 11 11 11 11 11 11 11 11 11 11 11 1D 1D 22 3B |..............";|
000018A0: 00 CC 20 04 EC 99 22 12 A5 20 20 20 20 20 20 20 |.. ...".. |
000018B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000018C0: 20 20 20 20 20 20 20 20 20 20 20 A7 00 EE 20 18 | ... .|
000018D0: EC 81 41 B2 31 A4 31 30 30 3A A1 41 24 3A 8B 41 |..A.1.100:.A$:.A|
000018E0: 24 B2 22 20 22 B0 41 24 B2 22 A0 22 A7 8E 00 F4 |$." ".A$."."....|
000018F0: 20 22 EC 82 00 FF 20 2C EC 89 36 30 33 36 30 00 | ".... ,..60360.|
00001900: 32 21 36 EC 99 22 20 12 A1 92 1D 1D 1D 1D 1D 1D |2!6.." .........|
00001910: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001920: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D A1 22 |..............."|
00001930: 3A 8E 00 3F 21 54 EC 81 5A 38 B2 31 A4 4E 43 00 |:..?!T..Z8.1.NC.|
00001940: 54 21 56 EC A1 41 24 3A 8B 41 24 B2 22 22 A7 36 |T!V..A$:.A$."".6|
00001950: 30 35 30 32 00 6D 21 57 EC 8B 41 24 B2 22 3F 22 |0502.m!W..A$."?"|
00001960: B0 41 24 B2 22 2C 22 A7 36 30 35 30 32 00 A9 21 |.A$.",".60502..!|
00001970: 58 EC 8B 41 24 B2 22 93 22 B0 41 24 B2 22 13 22 |X..A$.".".A$."."|
00001980: B0 41 24 B2 22 94 22 B0 41 24 B2 22 91 22 B0 41 |.A$.".".A$.".".A|
00001990: 24 B2 22 9D 22 B0 41 24 B2 22 11 22 B0 41 24 B2 |$.".".A$.".".A$.|
000019A0: 22 1D 22 A7 36 30 35 30 32 00 CE 21 59 EC 8B 41 |".".60502..!Y..A|
000019B0: 24 B2 C7 28 31 33 29 B0 41 24 B2 C7 28 31 34 31 |$..(13).A$..(141|
000019C0: 29 A7 99 22 9D 20 22 3A 89 36 30 35 34 34 00 E7 |)..". ":.60544..|
000019D0: 21 5A EC 8B 41 24 B2 22 20 22 B0 41 24 B2 22 A0 |!Z..A$." ".A$.".|
000019E0: 22 A7 36 30 35 34 30 00 00 22 5C EC 8B 41 24 B2 |".60540.."\..A$.|
000019F0: C7 28 32 30 29 AF 5A 38 B2 31 A7 36 30 35 30 32 |.(20).Z8.1.60502|
00001A00: 00 2C 22 5E EC 8B 41 24 B2 C7 28 32 30 29 A7 5A |.,"^..A$..(20).Z|
00001A10: 38 B2 5A 38 AB 31 3A 99 22 9D 9D 20 20 9D 9D 22 |8.Z8.1:.".. .."|
00001A20: 3B 42 4B 24 3B 3A 89 36 30 35 30 32 00 4C 22 68 |;BK$;:.60502.L"h|
00001A30: EC 8B 41 24 B1 22 2F 22 AF 41 24 B3 22 3A 22 AF |..A$."/".A$.":".|
00001A40: 28 4D 4F AF 32 29 A7 36 30 35 34 30 00 6C 22 6A |(MO.2).60540.l"j|
00001A50: EC 8B 41 24 B1 22 20 22 AF 41 24 B3 22 2A 22 AF |..A$." ".A$."*".|
00001A60: 28 4D 4F AF 34 29 A7 36 30 35 34 30 00 8C 22 6C |(MO.4).60540.."l|
00001A70: EC 8B 41 24 B1 22 C0 22 AF 41 24 B3 22 DB 22 AF |..A$.".".A$.".".|
00001A80: 28 4D 4F AF 38 29 A7 36 30 35 34 30 00 AD 22 6E |(MO.8).60540.."n|
00001A90: EC 8B 41 24 B1 22 40 22 AF 41 24 B3 22 5B 22 AF |..A$."@".A$."[".|
00001AA0: 28 4D 4F AF 31 36 29 A7 36 30 35 34 30 00 D4 22 |(MO.16).60540.."|
00001AB0: 70 EC 8B 41 24 B1 C7 28 31 36 30 29 AF 41 24 B3 |p..A$..(160).A$.|
00001AC0: C7 28 31 39 32 29 AF 28 4D 4F AF 33 32 29 A7 36 |.(192).(MO.32).6|
00001AD0: 30 35 34 30 00 F7 22 72 EC 8B 41 24 B1 B2 C7 28 |0540.."r..A$...(|
00001AE0: 30 29 AF 41 24 B3 22 1D 22 AF 28 4D 4F AF 36 34 |0).A$.".".(MO.64|
00001AF0: 29 A7 36 30 35 34 30 00 19 23 74 EC 8B 41 24 B1 |).60540..#t..A$.|
00001B00: 22 29 22 AF 41 24 B3 22 30 22 AF 28 4D 4F AF 31 |")".A$."0".(MO.1|
00001B10: 32 38 29 A7 36 30 35 34 30 00 3B 23 76 EC 8B 41 |28).60540.;#v..A|
00001B20: 24 B1 22 39 22 AF 41 24 B3 22 41 22 AF 28 4D 4F |$."9".A$."A".(MO|
00001B30: AF 31 32 38 29 A7 36 30 35 34 30 00 5D 23 78 EC |.128).60540.]#x.|
00001B40: 8B 41 24 B1 22 5A 22 AF 41 24 B3 22 81 22 AF 28 |.A$."Z".A$.".".(|
00001B50: 4D 4F AF 31 32 38 29 A7 36 30 35 34 30 00 68 23 |MO.128).60540.h#|
00001B60: 7A EC 89 36 30 35 30 32 00 82 23 7C EC 99 22 9D |z..60502..#|..".|
00001B70: 22 3B 41 24 3B 3A 97 32 31 32 2C 2E 3A 99 42 4B |";A$;:.212,.:.BK|
00001B80: 24 3B 00 92 23 7E EC 47 24 28 5A 38 29 B2 41 24 |$;..#~.G$(Z8).A$|
00001B90: 3A 82 00 9D 23 80 EC 99 22 9D 92 20 22 00 CB 23 |:...#...".. "..#|
00001BA0: 82 EC 41 24 B2 22 22 3A 81 41 B2 31 A4 5A 38 AB |..A$."":.A.1.Z8.|
00001BB0: 31 3A 41 24 B2 41 24 AA 47 24 28 41 29 3A 82 3A |1:A$.A$.G$(A):.:|
00001BC0: 8B 5A 38 B2 31 A7 41 24 B2 22 22 00 D1 23 84 EC |.Z8.1.A$.""..#..|
00001BD0: 8E 00 00 00 |.... |
.......60100:."...":.650,128.9.D..53280,
0:.53281,0:.646,5.Q.N..G(147):.X.1.10:.:
......N.100:.D$(N),B$(N),E$(N),F$(N),L$(
N),G$(40):BK$.".".....C$(1)."D":C$(2)."C
":C$(3)."R":C$(4)."Q"......"..
CREDIT CARD CONTROL......". ...
................... ..X.1.6:.:..*.....14
)".*** MENU ***":..S.....5)".D .- .DISPL
AY CREDIT CARD DATA......5)".C .- .CREA
TE/ADD CREDIT CARD DATA...H...5)".R .- .
REPORT LOST OR DAMAGED CARDS.B.R...5)".Q
.- .QUIT.......".................".11)"
ENTER SELECTION: ..";BK$;".";.....MO.16:
NC.1:.60500.1....B.1.4:.C$(B).A$.A.B:.25
0.7.....@....220.Y....A.280,500,690,6000
0._...:.E...:......".. DISPLAY CR
EDIT CARD DATA......". ..........
...............H....1240:.AB.155.R....14
00......1350:.ER.155...".."CREDIT CARDS
ON FILE TO DATE:":..7.,..".NAME.".16)".A
CCT. #.".30)".EXP DATE..].6.."----".16)"
-------".30)"--------.F.@.K1.0.Q.J..X.1.
N.~.T..1,D$(X)...^..D$(X)."END".440...H.
.K1.17.400.K.R..:..8)"PRESS .RETURN. TO
CONTINUE":....|..A$:.A$..G(13).380.....K
1.0......1,B$(X),E$(X),F$(X),L$(X).+....
D$(X);.15);B$(X);.34);E$(X).7...K1.K1.1.
>....X.Q... 1:.:."END OF FILE.":.:..12)"
.PRESS M FOR MENU...B..A$:.A$."".450...L
..A$.."M".450. .V..:.150.....:.....:.V..
..".. CREATE/ADD CREDIT CARD DATA..
....". ............................
....X.1.%....1240:.1260:.1440:.G(147).0.
...X.X.N.V....". .TYPE .END. TO
EXIT..N...."..ENTRY # ..";X:....!.."
..................&..".NAME OF
CARD:.";BK$;.N.+.MO.190:NC.12:.60500:D$
(X).A$...0..D$(X)."END".670...5.."..
..................".".:..".ACCOUNT
#:.";BK$;.A.?.MO.2:NC.15:.60500:B$(X).A
$.N.A..".. ..
.........D..".EXPIRATION DATE (EX: 01/84
):.";BK$;...I.MO.130:NC.5:.60500:E$(X).A
$...K.."... ............................
.................N..".COMPANY P.O. OR ST
REET ADDRESS".A.S..":.";BK$;:NC.38:MO.19
0:.60500:F$(X).A$.V.U.."... ............
.................................X..".CI
TY STATE & ZIP (SORRY, NO COMMAS.)":.":.
";BK$;.O.].MO.190:NC.38:.60500:L$(X).A$.
..L..:."IS DATA CORRECT (Y/N)...V..Z$:.Z
$."".630......Z$."Y".660.I....Z$."N"..".
.RE-ENTER DATA. ":.A.1.2000:.:.53
0.T....:.:.X.G... 2:.".";:.1450.M...:...
...G(147):.1440:.......".YOUR NAME:.";BK
$;:MO.190:NC.20:.60500:YN$.A$...F..".STR
EET OR POST OFFICE:.";BK$;:.60500:MA$.A$
...P..".CITY:.";BK$;:.60500:CI$.A$.8.Z..
".STATE & ZIP CODE:.";BK$;:.60500:SZ$.A$
.B....".TODAY'S DATE:.";BK$;:.60500:TD$.
A$.I... 2.W....G(147):.......1250:.1400:
.1710:.1350:.ER.155......X.1.N......1,D$
(X).H. ..D$(X)."END".900...*..1,B$(X),E$
(X),F$(X),L$(X).&.4.."...DO YOU WANT A R
EPORT FOR: ";D$(X):."PRESS: .Y .OR .N".;
.>..Q1$:.Q1$."".830.L.H..Q1$."N".870.].M
..Q1$."Y".850.F.N..830...R..".IS CARD LO
ST OR DESTROYED:":."PRESS: .L .OR .D...W
..W$:.W$."".855.J.X..W$."L".W$."LOST":.8
60...Y..W$."D".W$."DESTROYED":.860...Z..
855...\..920...F..ST.0..X...P..ST.64.900
.>.Z..ST..0.ST..64.."ERROR...";ST: 1:..G
... 1:."END OF FILE":.T.1.1000:.:.:.150.
M...:.S...:.....SN$."SINCERELY,"......4,
4,7......4......4,"".80.C(MA$));MA$...J.
.4,"".79.C(CI$).C(SZ$));CI$;" ";SZ$...T.
.4,"".80.C(TD$));TD$......4,D$(X)......4
,F$(X)......4,L$(X)."....4.@....4,"RE: A
CCOUNT # ";B$(X).G....4.Y....4,"DEAR SIR
:.`.$..4......4,"".5)"IN REGARD TO THE A
BOVE ACCOUNT,";...3..4," I AM REPORTING
THAT MY CARD WAS...8..4...B..4,W$;" ON O
R ABOUT THE ABOVE DATE....L..4:.4.!.V..4
,"".5)"PLEASE TAKE ANY NECESSARY ACTION"
;.E.[..4," TO INSURE THAT THERE IS NO.L.
`..4.U.J..4,"UNAUTHORIZED USE OF THIS CA
RD,";. .O..4," AND PLEASE ISSUE A REPLAC
EMENT AS...T..4.A.~..4,"SOON AS POSSIBLE
..K....4:.4......4,"".5)"PLEASE CONTACT
ME IF";......4," ADDITIONAL INFORMATION
IS NEEDED..*....X.1.4:.4:..C....4,"".70.
C(SN$));SN$.S....X.1.4:.4:..L....4,"".75
.C(YN$));YN$.V.D..4: 4.|.N.....X.AB.....
..."..... .............
............".....CARDHOLDER'S NAME:.";B
K$;:MO.190:NC.16:.60500:FI$.A$......A$."
".AB.1......./....:.".(.A.).DD TO EXISTI
NG FILE.\....".(.N.).EW FILE":.".(.R.).E
TURN TO MENU.P....Z$:.Z$."".1270.~....Z$
."N"........Z$."A".1620......Z$."R"..:.1
50.D....Z$.."N".Z$.."A".Z$.."R".1270.J.<
...Y.F.ER..:.1730...P..Z$:.Z$."".1360...
Q..Z$."T".1370.-.R..3,8,3,"".FI$."": 3:.
15,8,15:.15,A$,B$: 15.D.S.ER..:.A$."00".
1380.`.T.."...DISK ERROR:";A$,B$.P.U..A.
1.2000:..{.V.ER.1:....Z..Z$."T"..1,1,0,F
I$:....D..Z$."D"..1,8,8,FI$.",S,R":..N.N
..Z$.."T".Z$.."D".1360...X..:.".. INSER
T SOURCE FILE AND PRESS RETURN .......Z
$......Z$..G(13).1410.#....... ..2,0:..4
...:.D....1400:.1560.O....X.1.N...H..1,D
$(X):.1,B$(X):.1,E$(X):.1,F$(X):.1,L$(X)
...R..D$(X)."END".1510......X..... 1.N..
..15,8,15:.15,A$,B$: 15:.".==>.";A$,B$..
....:.".DO YOU WANT A BACKUP COPY (Y/N)?
......Z$:.Z$."".1530."....H(Z$,1)."Y".14
60.-....:.150.7....1730.U...AD$."0":.AD.
AD..:AD$."@0".I."..Z$:.Z$."".1570...,..Z
$."T"..1,1,1,FI$:....6..Z$."D"..1,8,8,.A
D$.":".FI$.",S,W":..E.@..Z$.."T".Z$.."D"
.1570.K.J.:.Q.T.:...^..1400:.1350...C..E
R.155...H..G(147)...R..X.1.N.).|..1,D$(X
),B$(X),E$(X),F$(X),L$(X).E....D$(X)."EN
D".ST.64.1700.R....ST.0..X.W....ST..0.ST
..64.."ERROR..."ST: 1:...... 1:AD.1:....
...". TURN ON PRINTER AND PRESS RETURN
.":.1410:....B..:."..T..APE OR ..D..
ISK":.:....`..15,8,15,"R0:HELLO CONNECT=
HELLO CONNECT":.15,ER: 15.-.J..".";:.ER.
.63...D.T.."HELLO CONNECT",8.}.D.PN$."CR
EDIT CARD CONTROL":AN$."BY: ROBERT E. K
UPFER...N.BO.11:SC.15:CL.06:C1.12:C2.00:
C3.12:C4.00:C5.00:C6.02:C7.09......53280
,BO:.53281,SC:."...";:.60250......646,C1
:." ....................................
...P....646,C2:." ... LOADSTAR PR
ESENTS: .......646,C1:." ........
....................................646,
C6:."...".20.C(PN$).2);PN$.N....646,C7:.
"...".20.C(AN$).2);AN$...(..646,C5:."...
".13)"COPYRIGHT 1986"...2...9)"COMMODORE
PUBLICATIONS".P.<..646,C3:.".... ......
...................................F..64
6,C4:." ...
....P..646,C3:." ..................
......................";.R.U..198,.:.603
60...Z..646,CL..._.." ..................
..................... .D..A.1.3:.60470:.
.U.N..60470:."..........................
..............J.X..A.1.16:.60470:.......
".......................................
......A.1.3:.60470:......." ............
..............................";... ..53
280,BO:.53281,SC:.60140.! H.."..........
...............";.V R..646,C2:."..PRESS
THE [SPACE BAR] TO CONTINUE..".X ...A.1.
100:.A$:.A$." ".A$." "...~ .... ..."...
......................";.L ..."..
... ...A.1.10
0:.A$:.A$." ".A$." ".... ".... ,..60360.
2!6.." .................................
.......":..?!T..Z8.1.NC.T!V..A$:.A$."".6
0502.M!W..A$."?".A$.",".60502..!X..A$.".
".A$.".".A$.".".A$.".".A$.".".A$.".".A$.
".".60502.N!Y..A$.G(13).A$.G(141)..". ":
.60544..!Z..A$." ".A$." ".60540.."\..A$.
G(20).Z8.1.60502.,"^..A$.G(20).Z8.Z8.1:.
".. ..";BK$;:.60502.L"H..A$."/".A$.":".
(MO.2).60540.L"J..A$." ".A$."*".(MO.4).6
0540.."L..A$.".".A$.".".(MO.8).60540.."N
..A$."@".A$."[".(MO.16).60540.T"P..A$.G(
160).A$.G(192).(MO.32).60540.."R..A$..G(
0).A$.".".(MO.64).60540..#T..A$.")".A$."
0".(MO.128).60540.;#V..A$."9".A$."A".(MO
.128).60540.]#X..A$."Z".A$.".".(MO.128).
60540.H#Z..60502..#|..".";A$;:.212,.:.BK
$;..#~.G$(Z8).A$:...#...".. ".K#..A$."":
.A.1.Z8.1:A$.A$.G$(A):.:.Z8.1.A$."".Q#..
....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL