NEW PUNTER
FILE INFORMATION
FILENAME(S): NEW PUNTER
FILE TYPE(S): PRG
FILE SIZE: 3.7K
FIRST SEEN: 2025-11-30 20:19:23
APPEARS ON: 1 disk(s)
FILE HASH
c4331c8dd7a1159db85b4c89c37c2771d8f3a6985a6a28cd6ec70e23d0b46d2a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| UTILITIES | NEW PUNTER | PRG | Curtcool, Malcom | 25 | 15 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 28 00 97 35 33 32 38 30 2C 30 3A 97 |....(..53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A 97 36 34 36 2C 31 00 6A |53281,0:.646,1.j|
00000020: 08 32 00 8F 22 4E 54 45 52 4D 2E 36 34 20 20 57 |.2.."NTERM.64 W|
00000030: 52 49 54 54 45 4E 20 42 59 20 53 54 45 56 45 20 |RITTEN BY STEVE |
00000040: 50 55 4E 54 45 52 20 20 20 43 4F 4E 56 45 52 54 |PUNTER CONVERT|
00000050: 45 44 20 54 4F 20 36 34 20 42 59 20 4B 45 49 54 |ED TO 64 BY KEIT|
00000060: 48 20 50 45 54 45 52 53 4F 4E 00 8C 08 64 00 8B |H PETERSON...d..|
00000070: C2 28 32 32 37 38 34 29 B3 B1 37 36 A7 93 22 4E |.(22784)..76.."N|
00000080: 54 45 52 4D 2E 36 34 22 2C 38 2C 31 00 AB 08 67 |TERM.64",8,1...g|
00000090: 00 52 25 B2 35 3A 4D 4F 25 B2 36 3A 53 45 24 B2 |.R%.5:MO%.6:SE$.|
000000A0: 22 22 3A 4D 4C B2 32 32 37 38 34 00 D1 08 6A 00 |"":ML.22784...j.|
000000B0: 97 35 36 2C 38 36 3A 97 36 34 34 2C 38 36 3A 9C |.56,86:.644,86:.|
000000C0: 3A 9F 35 2C 32 2C 30 2C C7 28 36 29 AA C7 28 30 |:.5,2,0,.(6)..(0|
000000D0: 29 00 08 09 6E 00 52 45 24 B2 22 20 22 3A 53 45 |)...n.RE$." ":SE|
000000E0: 24 B2 22 20 22 3A 4D 4F 25 B2 31 33 34 3A 52 25 |$." ":MO%.134:R%|
000000F0: B2 30 3A 43 24 B2 22 30 31 32 33 34 35 36 37 38 |.0:C$."012345678|
00000100: 39 41 42 43 44 45 46 22 00 22 09 73 00 52 50 B2 |9ABCDEF".".s.RP.|
00000110: 32 3A 52 53 B2 30 3A 57 50 B2 52 50 3A 57 53 B2 |2:RS.0:WP.RP:WS.|
00000120: 52 53 00 54 09 78 00 97 32 34 35 37 35 2C 52 50 |RS.T.x..24575,RP|
00000130: 3A 97 32 34 35 37 34 2C 52 53 AA 39 36 3A 97 32 |:.24574,RS.96:.2|
00000140: 34 35 37 33 2C 57 50 3A 97 32 34 35 37 32 2C 57 |4573,WP:.24572,W|
00000150: 53 AA 39 36 00 71 09 7D 00 50 41 28 30 29 B2 31 |S.96.q.}.PA(0).1|
00000160: 30 3A 50 41 28 31 29 B2 36 3A 50 41 28 32 29 B2 |0:PA(1).6:PA(2).|
00000170: 32 00 8E 09 82 00 4D 4C B2 32 32 37 38 34 3A 99 |2.....ML.22784:.|
00000180: C7 28 31 34 29 3A 97 32 34 35 36 39 2C 30 00 AF |.(14):.24569,0..|
00000190: 09 87 00 9F 31 2C 38 2C 31 35 3A 97 35 35 36 2C |....1,8,15:.556,|
000001A0: 30 3A 97 35 35 32 2C 30 3A 97 35 35 33 2C 31 00 |0:.552,0:.553,1.|
000001B0: C1 09 8C 00 44 4E 24 B2 22 11 11 22 3A 89 31 35 |....DN$."..":.15|
000001C0: 30 00 EC 09 91 00 A1 23 35 2C 41 24 2C 41 24 3A |0......#5,A$,A$:|
000001D0: 9E 4D 4C AA 30 3A A0 31 31 3A 97 32 34 35 36 39 |.ML.0:.11:.24569|
000001E0: 2C 30 3A 54 4D B2 30 3A 89 31 30 36 00 00 0A 96 |,0:TM.0:.106....|
000001F0: 00 99 22 93 11 C6 55 4E 43 54 49 4F 4E 3A 11 22 |.."...UNCTION:."|
00000200: 00 19 0A 9B 00 99 22 31 20 2D 20 D4 45 52 4D 49 |......"1 - .ERMI|
00000210: 4E 41 4C 20 CD 4F 44 45 22 00 34 0A A0 00 99 22 |NAL .ODE".4...."|
00000220: 32 20 2D 20 D2 45 43 45 49 56 45 20 50 52 4F 47 |2 - .ECEIVE PROG|
00000230: 52 41 4D 22 00 50 0A A5 00 99 22 33 20 2D 20 D4 |RAM".P...."3 - .|
00000240: 52 41 4E 53 4D 49 54 20 50 52 4F 47 52 41 4D 22 |RANSMIT PROGRAM"|
00000250: 00 72 0A AA 00 8F 20 20 20 50 52 49 4E 54 22 34 |.r.... PRINT"4|
00000260: 20 2D 20 CF 50 45 4E 20 C4 49 53 4B 20 C6 49 4C | - .PEN .ISK .IL|
00000270: 45 22 00 95 0A AF 00 8F 20 20 20 50 52 49 4E 54 |E"...... PRINT|
00000280: 22 35 20 2D 20 D0 52 49 4E 54 20 C4 49 53 4B 20 |"5 - .RINT .ISK |
00000290: C6 49 4C 45 22 00 A5 0A B9 00 99 22 34 20 2D 20 |.ILE"......"4 - |
000002A0: D1 55 49 54 22 00 D2 0A BA 00 99 22 11 11 11 1D |.UIT"......"....|
000002B0: 1D 1D 1D 2A 2A 2A 20 48 49 54 20 43 4C 45 41 52 |...*** HIT CLEAR|
000002C0: 20 48 4F 4D 45 20 54 4F 20 52 45 53 45 54 20 2A | HOME TO RESET *|
000002D0: 2A 2A 00 E5 0A BE 00 A1 41 24 3A 8B 41 24 B2 22 |**......A$:.A$."|
000002E0: 22 A7 31 39 30 00 14 0B C3 00 91 C5 28 41 24 29 |".190.......(A$)|
000002F0: 89 31 34 35 2C 35 30 30 2C 36 37 30 2C 37 36 35 |.145,500,670,765|
00000300: 3A 8F 20 20 20 20 20 20 20 32 30 35 2C 32 33 30 |:. 205,230|
00000310: 2C 37 36 35 00 1D 0B C8 00 89 31 39 30 00 51 0B |,765......190.Q.|
00000320: CD 00 A0 31 31 3A 99 22 11 CE 41 4D 45 20 4F 46 |...11:."..AME OF|
00000330: 20 C4 49 53 4B 20 C6 49 4C 45 22 3A 99 22 C4 45 | .ISK .ILE":.".E|
00000340: 46 41 55 4C 54 20 49 53 20 C4 52 49 56 45 20 30 |FAULT IS .RIVE 0|
00000350: 3F 00 6B 0B D2 00 99 22 3E 22 3B 3A 8D 38 30 30 |?.k....">";:.800|
00000360: 3A 8B 42 24 B2 22 22 A7 31 35 30 00 8A 0B D7 00 |:.B$."".150.....|
00000370: 8B CA 28 42 24 2C 32 2C 31 29 B3 B1 22 3A 22 A7 |..(B$,2,1)..":".|
00000380: 42 24 B2 22 31 3A 22 AA 42 24 00 B8 0B DC 00 9F |B$."1:".B$......|
00000390: 31 31 2C 38 2C 31 31 2C 22 40 22 AA 42 24 AA 22 |11,8,11,"@".B$."|
000003A0: 2C 53 2C 57 22 3A 8D 38 33 35 3A 8B 45 53 A7 99 |,S,W":.835:.ES..|
000003B0: 45 53 24 3A 89 32 30 35 00 CA 0B E1 00 97 32 34 |ES$:.205......24|
000003C0: 35 36 39 2C 31 3A 89 31 35 30 00 F6 0B E6 00 99 |569,1:.150......|
000003D0: 22 11 CE 41 4D 45 20 4F 46 20 C6 49 4C 45 3F 22 |"..AME OF .ILE?"|
000003E0: 3A 99 22 3E 22 3B 3A 8D 38 30 30 3A 8B 42 24 B2 |:.">";:.800:.B$.|
000003F0: 22 22 A7 31 35 30 00 1D 0C EB 00 A0 31 31 3A 9F |"".150......11:.|
00000400: 31 31 2C 38 2C 31 31 2C 42 24 3A 8D 38 33 35 3A |11,8,11,B$:.835:|
00000410: 8B 45 53 A7 99 45 53 24 3A 89 32 33 30 00 4C 0C |.ES..ES$:.230.L.|
00000420: F0 00 99 22 11 C1 53 43 49 49 20 4F 52 20 C3 42 |..."..SCII OR .B|
00000430: 4D 20 D4 59 50 45 20 CF 55 54 50 55 54 3F 22 3A |M .YPE .UTPUT?":|
00000440: 99 22 3E 22 3B 3A 97 35 35 35 2C 30 00 5F 0C F5 |.">";:.555,0._..|
00000450: 00 A1 41 24 3A 8B 41 24 B2 22 22 A7 32 34 35 00 |..A$:.A$."".245.|
00000460: 71 0C FA 00 8B 41 24 B2 C7 28 31 33 29 A7 31 35 |q....A$..(13).15|
00000470: 30 00 89 0C FF 00 8B 41 24 B2 22 41 22 A7 97 35 |0......A$."A"..5|
00000480: 35 35 2C 30 3A 89 32 36 35 00 9A 0C 04 01 8B 41 |55,0:.265......A|
00000490: 24 B3 B1 22 43 22 A7 32 34 35 00 BE 0C 09 01 99 |$.."C".245......|
000004A0: C7 28 C6 28 41 24 29 B0 31 32 38 29 22 11 22 3A |.(.(A$).128)".":|
000004B0: 9E 4D 4C AA 33 3A A0 31 31 3A 89 31 35 30 00 DF |.ML.3:.11:.150..|
000004C0: 0C 86 01 8D 34 32 35 3A 41 B2 C2 28 35 35 33 29 |....425:A..(553)|
000004D0: 3A 41 B2 41 AA 31 3A 8B 41 B2 32 A7 41 B2 30 00 |:A.A.1:.A.2.A.0.|
000004E0: EF 0C 8B 01 97 35 35 33 2C 41 3A 89 33 31 35 00 |.....553,A:.315.|
000004F0: 0B 0D 90 01 8D 34 32 35 3A 50 41 B2 50 41 AA 31 |.....425:PA.PA.1|
00000500: 3A 8B 50 41 B2 33 A7 50 41 B2 30 00 2A 0D 95 01 |:.PA.3.PA.0.*...|
00000510: 97 36 36 30 2C 28 50 41 28 50 41 29 B0 44 55 29 |.660,(PA(PA).DU)|
00000520: AC 31 36 AA 31 3A 89 33 31 35 00 46 0D 9A 01 8D |.16.1:.315.F....|
00000530: 34 32 35 3A 44 55 B2 44 55 AA 31 3A 8B 44 55 B2 |425:DU.DU.1:.DU.|
00000540: 32 A7 44 55 B2 30 00 65 0D 9F 01 97 36 36 30 2C |2.DU.0.e....660,|
00000550: 28 50 41 28 50 41 29 B0 44 55 29 AC 31 36 AA 31 |(PA(PA).DU).16.1|
00000560: 3A 89 33 31 35 00 77 0D A4 01 41 24 B2 22 12 20 |:.315.w...A$.". |
00000570: 92 22 3A 89 34 33 30 00 82 0D A9 01 41 24 B2 22 |.":.430.....A$."|
00000580: 20 22 00 A3 0D AE 01 99 22 13 11 11 11 11 20 20 | "......"..... |
00000590: 20 22 3B C8 28 44 4E 24 2C C2 28 35 35 33 29 29 | ";.(DN$,.(553))|
000005A0: 3B 41 24 00 C5 0D B3 01 99 22 13 11 11 11 11 11 |;A$......"......|
000005B0: 11 11 11 11 20 20 20 22 3B C8 28 44 4E 24 2C 50 |.... ";.(DN$,P|
000005C0: 41 29 3B 41 24 00 EF 0D B8 01 99 22 13 11 11 11 |A);A$......"....|
000005D0: 11 11 11 11 11 11 11 11 11 11 11 11 20 20 20 22 |............ "|
000005E0: 3B C8 28 44 4E 24 2C 44 55 29 3B 41 24 3A 8E 00 |;.(DN$,DU);A$:..|
000005F0: 01 0E BD 01 41 24 B2 22 12 20 92 22 3A 89 34 35 |....A$.". .":.45|
00000600: 35 00 0C 0E C2 01 41 24 B2 22 20 22 00 29 0E C7 |5.....A$." ".)..|
00000610: 01 99 22 13 11 11 11 11 20 20 20 22 3B C8 28 44 |.."..... ";.(D|
00000620: 4E 24 2C 42 52 29 3B 41 24 00 4C 0E CC 01 99 22 |N$,BR);A$.L...."|
00000630: 13 11 11 11 11 11 11 11 11 11 11 20 20 20 22 3B |........... ";|
00000640: C8 28 44 4E 24 2C 53 42 29 3B 41 24 00 76 0E D1 |.(DN$,SB);A$.v..|
00000650: 01 99 22 13 11 11 11 11 11 11 11 11 11 11 11 11 |..".............|
00000660: 11 11 11 20 20 20 22 3B C8 28 44 4E 24 2C 57 4C |... ";.(DN$,WL|
00000670: 29 3B 41 24 3A 8E 00 92 0E D6 01 8D 34 35 30 3A |);A$:.......450:|
00000680: 42 52 B2 42 52 AA 31 3A 8B 42 52 B2 33 A7 42 52 |BR.BR.1:.BR.3.BR|
00000690: B2 30 00 BC 0E DB 01 97 36 35 39 2C 28 28 53 42 |.0......659,((SB|
000006A0: AC 38 29 B0 28 32 AC 57 4C 29 B0 31 29 AC 31 36 |.8).(2.WL).1).16|
000006B0: AA 28 42 52 AA 36 29 3A 89 33 37 30 00 D8 0E E0 |.(BR.6):.370....|
000006C0: 01 8D 34 35 30 3A 53 42 B2 53 42 AA 31 3A 8B 53 |..450:SB.SB.1:.S|
000006D0: 42 B2 32 A7 53 42 B2 30 00 02 0F E5 01 97 36 35 |B.2.SB.0......65|
000006E0: 39 2C 28 28 53 42 AC 38 29 B0 28 32 AC 57 4C 29 |9,((SB.8).(2.WL)|
000006F0: B0 31 29 AC 31 36 AA 28 42 52 AA 36 29 3A 89 33 |.1).16.(BR.6):.3|
00000700: 37 30 00 1E 0F EA 01 8D 34 35 30 3A 57 4C B2 57 |70......450:WL.W|
00000710: 4C AA 31 3A 8B 57 4C B2 32 A7 57 4C B2 30 00 48 |L.1:.WL.2.WL.0.H|
00000720: 0F EF 01 97 36 35 39 2C 28 28 53 42 AC 38 29 B0 |....659,((SB.8).|
00000730: 28 32 AC 57 4C 29 B0 31 29 AC 31 36 AA 28 42 52 |(2.WL).1).16.(BR|
00000740: AA 36 29 3A 89 33 37 30 00 60 0F F4 01 8F 20 52 |.6):.370.`.... R|
00000750: 45 43 45 49 56 45 20 41 20 50 52 4F 47 52 41 4D |ECEIVE A PROGRAM|
00000760: 00 76 0F F9 01 99 22 11 CE 41 4D 45 20 4F 46 20 |.v...."..AME OF |
00000770: C6 49 4C 45 3F 22 00 A2 0F FE 01 99 22 C4 45 46 |.ILE?"......".EF|
00000780: 41 55 4C 54 20 44 52 49 56 45 20 49 53 20 23 30 |AULT DRIVE IS #0|
00000790: 22 3A 99 22 3E 22 3B 3A 8D 38 30 30 3A 53 24 B2 |":.">";:.800:S$.|
000007A0: 42 24 00 BA 0F 03 02 8B 53 24 B2 22 22 A7 98 35 |B$......S$.""..5|
000007B0: 2C 22 41 22 3B 3A 89 31 34 35 00 D9 0F 08 02 8B |,"A";:.145......|
000007C0: CA 28 53 24 2C 32 2C 31 29 B3 B1 22 3A 22 A7 53 |.(S$,2,1)..":".S|
000007D0: 24 B2 22 30 3A 22 AA 53 24 00 F4 0F 0D 02 8D 36 |$."0:".S$......6|
000007E0: 32 35 3A 53 24 B2 22 40 22 AA 53 24 AA 54 24 AA |25:S$."@".S$.T$.|
000007F0: 22 2C 57 22 00 1B 10 12 02 A0 32 3A 9F 32 2C 38 |",W"......2:.2,8|
00000800: 2C 32 2C 53 24 3A 8D 38 33 35 3A 8B 45 53 A7 99 |,2,S$:.835:.ES..|
00000810: 45 53 24 3A A0 32 3A 89 35 30 35 00 30 10 17 02 |ES$:.2:.505.0...|
00000820: 98 35 2C 22 54 54 54 54 54 54 54 54 54 54 22 3B |.5,"TTTTTTTTTT";|
00000830: 00 4F 10 21 02 81 58 B2 30 A4 31 30 3A 82 3A A1 |.O.!..X.0.10:.:.|
00000840: 23 35 2C 41 24 3A 8B 53 54 B2 30 A7 35 34 35 00 |#5,A$:.ST.0.545.|
00000850: 62 10 22 02 9E 4D 4C AA 31 38 3A 8B 53 54 A7 35 |b."..ML.18:.ST.5|
00000860: 37 30 00 81 10 26 02 81 58 B2 30 A4 31 30 3A 82 |70...&..X.0.10:.|
00000870: 3A A1 23 35 2C 41 24 3A 8B 53 54 B2 30 A7 35 35 |:.#5,A$:.ST.0.55|
00000880: 30 00 A2 10 2B 02 53 31 B2 C2 28 4D 4C AB 32 29 |0...+.S1..(ML.2)|
00000890: 3A 53 32 B2 C2 28 4D 4C AB 31 29 3A 9E 4D 4C AA |:S2..(ML.1):.ML.|
000008A0: 31 32 00 C3 10 30 02 8B 53 31 B3 B1 C2 28 4D 4C |12...0..S1...(ML|
000008B0: AB 32 29 B0 53 32 B3 B1 C2 28 4D 4C AB 31 29 A7 |.2).S2...(ML.1).|
000008C0: 35 37 35 00 EF 10 35 02 9E 4D 4C AA 31 35 3A 98 |575...5..ML.15:.|
000008D0: 35 2C 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |5,".............|
000008E0: 1D 1D 22 3B 3A 99 22 2D 22 3B 3A 89 35 34 35 00 |..";:."-";:.545.|
000008F0: 0E 11 3A 02 A0 32 3A 98 35 2C 22 53 53 53 53 53 |..:..2:.5,"SSSSS|
00000900: 53 53 53 53 53 22 3B 3A 99 3A 89 31 34 35 00 33 |SSSSS";:.:.145.3|
00000910: 11 3F 02 98 35 2C 22 11 11 11 11 11 11 11 11 11 |.?..5,".........|
00000920: 11 11 11 11 11 11 22 3B 3A 99 22 3A 22 3B 3A 89 |......";:.":";:.|
00000930: 35 34 35 00 49 11 44 02 99 22 11 D4 59 50 45 20 |545.I.D.."..YPE |
00000940: 4F 46 20 C6 49 4C 45 3A 22 00 77 11 49 02 99 22 |OF .ILE:".w.I.."|
00000950: 11 28 D0 29 52 4F 47 52 41 4D 2C 20 28 D7 29 4F |.(.)ROGRAM, (.)O|
00000960: 52 44 D0 52 4F 2C 20 4F 52 20 28 D3 29 45 51 3F |RD.RO, OR (.)EQ?|
00000970: 22 3A 99 22 3E 22 3B 00 8A 11 4E 02 A1 42 24 3A |":.">";...N..B$:|
00000980: 8B 42 24 B2 22 22 A7 35 39 30 00 9A 11 53 02 54 |.B$."".590...S.T|
00000990: 59 24 B2 42 24 3A 46 4C B2 30 00 C2 11 58 02 8B |Y$.B$:FL.0...X..|
000009A0: 42 24 B2 22 50 22 A7 54 24 B2 22 2C 50 22 3A 97 |B$."P".T$.",P":.|
000009B0: 35 35 37 2C 30 3A 99 22 D0 52 4F 47 52 41 4D 22 |557,0:.".ROGRAM"|
000009C0: 3A 8E 00 E6 11 5D 02 8B 42 24 B2 22 53 22 A7 54 |:....]..B$."S".T|
000009D0: 24 B2 22 2C 53 22 3A 97 35 35 37 2C 30 3A 99 22 |$.",S":.557,0:."|
000009E0: D3 C5 D1 22 3A 8E 00 0E 12 62 02 8B 42 24 B2 22 |...":....b..B$."|
000009F0: 57 22 A7 54 24 B2 22 2C 50 22 3A 97 35 35 37 2C |W".T$.",P":.557,|
00000A00: 31 3A 99 22 D7 4F 52 44 D0 52 4F 22 3A 8E 00 23 |1:.".ORD.RO":..#|
00000A10: 12 67 02 8B 42 24 B2 C7 28 31 33 29 A7 46 4C B2 |.g..B$..(13).FL.|
00000A20: 31 3A 8E 00 2C 12 6C 02 89 35 39 30 00 41 12 71 |1:..,.l..590.A.q|
00000A30: 02 98 35 2C 22 55 55 55 55 55 55 55 55 55 55 22 |..5,"UUUUUUUUUU"|
00000A40: 3B 00 57 12 76 02 A1 23 35 2C 41 24 3A 8B 53 54 |;.W.v..#5,A$:.ST|
00000A50: B3 B1 30 A7 36 33 30 00 84 12 7B 02 8B 41 24 B2 |..0.630...{..A$.|
00000A60: 22 50 22 A7 54 24 B2 22 2C 50 22 3A 97 35 35 37 |"P".T$.",P":.557|
00000A70: 2C 30 3A 41 24 B2 22 D0 52 4F 47 52 41 4D 22 3A |,0:A$.".ROGRAM":|
00000A80: 89 36 35 35 00 AD 12 80 02 8B 41 24 B2 22 53 22 |.655......A$."S"|
00000A90: A7 54 24 B2 22 2C 53 22 3A 97 35 35 37 2C 30 3A |.T$.",S":.557,0:|
00000AA0: 41 24 B2 22 D3 C5 D1 22 3A 89 36 35 35 00 DA 12 |A$."...":.655...|
00000AB0: 85 02 8B 41 24 B2 22 57 22 A7 54 24 B2 22 2C 50 |...A$."W".T$.",P|
00000AC0: 22 3A 97 35 35 37 2C 31 3A 41 24 B2 22 D7 4F 52 |":.557,1:A$.".OR|
00000AD0: 44 D0 52 4F 22 3A 89 36 35 35 00 E3 12 8A 02 89 |D.RO":.655......|
00000AE0: 36 33 30 00 FC 12 8F 02 99 22 11 C6 49 4C 45 20 |630......"..ILE |
00000AF0: D4 59 50 45 3A 20 22 41 24 22 11 22 00 11 13 94 |.YPE: "A$"."....|
00000B00: 02 A1 23 35 2C 41 24 3A 8B 53 54 B2 30 A7 36 36 |..#5,A$:.ST.0.66|
00000B10: 30 00 17 13 99 02 8E 00 40 13 9E 02 8F 20 53 45 |0.......@.... SE|
00000B20: 4E 44 20 41 4E 20 53 45 51 20 46 49 4C 45 20 54 |ND AN SEQ FILE T|
00000B30: 4F 20 42 55 4C 4C 45 54 49 4E 20 42 4F 41 52 44 |O BULLETIN BOARD|
00000B40: 00 6F 13 A3 02 99 22 11 CE 41 4D 45 20 4F 46 20 |.o...."..AME OF |
00000B50: C6 49 4C 45 20 54 4F 20 D3 45 4E 44 3F 22 3A 99 |.ILE TO .END?":.|
00000B60: 22 3E 22 3B 3A 8D 38 30 30 3A 53 24 B2 42 24 00 |">";:.800:S$.B$.|
00000B70: 87 13 A8 02 8B 53 24 B2 22 22 A7 98 35 2C 22 41 |.....S$.""..5,"A|
00000B80: 22 3B 3A 89 31 34 35 00 9F 13 AD 02 8D 35 38 30 |";:.145......580|
00000B90: 3A 8B 46 4C A7 53 24 B2 22 22 3A 89 36 38 30 00 |:.FL.S$."":.680.|
00000BA0: C9 13 B2 02 A0 32 3A 9F 32 2C 38 2C 32 2C 53 24 |.....2:.2,8,2,S$|
00000BB0: AA 54 24 3A 8D 38 33 35 3A 8B 45 53 A7 99 45 53 |.T$:.835:.ES..ES|
00000BC0: 24 3A A0 32 3A 89 36 37 35 00 E2 13 B7 02 81 58 |$:.2:.675......X|
00000BD0: B2 31 A4 31 30 3A 98 35 2C 54 59 24 3B 3A 82 58 |.1.10:.5,TY$;:.X|
00000BE0: 3A 99 00 00 14 BC 02 A1 23 35 2C 41 24 3A 8B 53 |:.......#5,A$:.S|
00000BF0: 54 B3 B1 30 B0 41 24 B3 B1 22 55 22 A7 37 30 30 |T..0.A$.."U".700|
00000C00: 00 1F 14 BE 02 A1 23 35 2C 41 24 3A 8B C2 28 36 |......#5,A$:..(6|
00000C10: 36 37 29 B3 B1 C2 28 36 36 38 29 A7 37 30 32 00 |67)...(668).702.|
00000C20: 2F 14 C1 02 9E 4D 4C AA 39 3A 43 4B B2 53 54 00 |/....ML.9:CK.ST.|
00000C30: 4B 14 C6 02 81 58 B2 31 A4 34 30 30 3A 82 3A 8F |K....X.1.400:.:.|
00000C40: 20 44 45 4C 41 59 20 4C 4F 4F 50 00 6A 14 CB 02 | DELAY LOOP.j...|
00000C50: A1 23 35 2C 41 24 3A 8B C2 28 36 36 37 29 B3 B1 |.#5,A$:..(667)..|
00000C60: C2 28 36 36 38 29 A7 37 31 35 00 8D 14 D0 02 81 |.(668).715......|
00000C70: 54 B2 30 A4 32 35 35 3A 98 35 2C C7 28 C2 28 4D |T.0.255:.5,.(.(M|
00000C80: 4C AB 32 35 36 AA 54 29 29 3B 3A 82 54 00 A7 14 |L.256.T));:.T...|
00000C90: D5 02 98 35 2C 22 5A 5A 5A 5A 5A 5A 5A 5A 5A 5A |...5,"ZZZZZZZZZZ|
00000CA0: 5A 5A 5A 5A 5A 22 3B 00 BF 14 D7 02 8B C2 28 36 |ZZZZZ";.......(6|
00000CB0: 36 39 29 B3 B1 C2 28 36 37 30 29 A7 37 32 37 00 |69)...(670).727.|
00000CC0: D5 14 DA 02 A1 23 35 2C 41 24 3A 8B 53 54 B3 B1 |.....#5,A$:.ST..|
00000CD0: 30 A7 37 33 30 00 EC 14 DF 02 8B 41 24 B2 22 11 |0.730......A$.".|
00000CE0: 22 A7 99 22 3A 22 3B 3A 89 37 31 30 00 FD 14 E4 |"..":";:.710....|
00000CF0: 02 8B 41 24 B3 B1 22 1D 22 A7 37 33 30 00 12 15 |..A$..".".730...|
00000D00: E9 02 8B 43 4B B2 30 A7 99 22 2D 22 3B 3A 89 37 |...CK.0.."-";:.7|
00000D10: 30 32 00 31 15 EE 02 A1 23 35 2C 41 24 3A 8B C2 |02.1....#5,A$:..|
00000D20: 28 36 36 37 29 B3 B1 C2 28 36 36 38 29 A7 37 35 |(667)...(668).75|
00000D30: 30 00 3D 15 F3 02 A0 32 3A 89 31 34 35 00 57 15 |0.=....2:.145.W.|
00000D40: F8 02 9E 4D 4C AA 32 31 3A 41 24 B2 C7 28 C2 28 |...ML.21:A$..(.(|
00000D50: 36 33 34 29 29 3A 8E 00 6B 15 FD 02 8F 20 51 55 |634)):..k.... QU|
00000D60: 49 54 20 54 45 52 4D 49 4E 41 4C 00 7C 15 16 03 |IT TERMINAL.|...|
00000D70: A0 35 3A A0 31 3A A0 32 3A A0 31 31 00 86 15 18 |.5:.1:.2:.11....|
00000D80: 03 99 C7 28 39 29 00 8C 15 1B 03 80 00 9F 15 20 |...(9)......... |
00000D90: 03 99 22 12 20 92 9D 22 3B 3A 42 24 B2 22 22 00 |..". ..";:B$."".|
00000DA0: B2 15 25 03 A1 41 24 3A 8B 41 24 B2 22 22 A7 38 |..%..A$:.A$."".8|
00000DB0: 30 35 00 C4 15 2A 03 8B 41 24 B2 C7 28 32 30 29 |05...*..A$..(20)|
00000DC0: A7 38 32 35 00 D9 15 2F 03 8B 41 24 B2 C7 28 31 |.825.../..A$..(1|
00000DD0: 33 29 A7 99 22 20 22 3A 8E 00 FA 15 34 03 42 24 |3).." ":....4.B$|
00000DE0: B2 42 24 AA 41 24 3A 99 22 20 9D 22 41 24 22 12 |.B$.A$:." ."A$".|
00000DF0: 20 92 9D 22 3B 3A 89 38 30 35 00 0B 16 39 03 8B | ..";:.805...9..|
00000E00: C3 28 42 24 29 B2 30 A7 38 30 35 00 2A 16 3E 03 |.(B$).0.805.*.>.|
00000E10: 42 24 B2 C8 28 42 24 2C C3 28 42 24 29 AB 31 29 |B$..(B$,.(B$).1)|
00000E20: 3A 99 41 24 3B 3A 89 38 30 35 00 42 16 43 03 8F |:.A$;:.805.B.C..|
00000E30: 20 47 45 54 20 45 52 52 4F 52 20 43 48 41 4E 4E | GET ERROR CHANN|
00000E40: 45 4C 00 59 16 48 03 84 31 2C 45 31 24 2C 45 32 |EL.Y.H..1,E1$,E2|
00000E50: 24 2C 45 33 24 2C 45 34 24 00 7D 16 4D 03 45 53 |$,E3$,E4$.}.M.ES|
00000E60: 24 B2 45 31 24 AA 22 2C 22 AA 45 32 24 AA 22 2C |$.E1$.",".E2$.",|
00000E70: 22 AA 45 33 24 AA 22 2C 22 AA 45 34 24 00 8D 16 |".E3$.",".E4$...|
00000E80: 52 03 45 53 B2 C5 28 45 31 24 29 3A 8E 00 9C 16 |R.ES..(E1$):....|
00000E90: E8 03 97 32 32 37 38 34 2C 30 3A 8A 00 00 00 00 |...22784,0:.....|
....(..53280,0:.53281,0:.646,1.J.2.."NTE
RM.64 WRITTEN BY STEVE PUNTER CONVERT
ED TO 64 BY KEITH PETERSON...D..B(22784)
..76.."NTERM.64",8,1...G.R%.5:MO%.6:SE$.
"":ML.22784.Q.J..56,86:.644,86:.:.5,2,0,
G(6).G(0)...N.RE$." ":SE$." ":MO%.134:R%
.0:C$."0123456789ABCDEF".".S.RP.2:RS.0:W
P.RP:WS.RS.T.X..24575,RP:.24574,RS.96:.2
4573,WP:.24572,WS.96.Q.}.PA(0).10:PA(1).
6:PA(2).2.....ML.22784:.G(14):.24569,0..
....1,8,15:.556,0:.552,0:.553,1.A...DN$.
"..":.150......#5,A$,A$:.ML.0: 11:.24569
,0:TM.0:.106......"..FUNCTION:."......"1
- TERMINAL MODE".4. .."2 - RECEIVE PROG
RAM".P...."3 - TRANSMIT PROGRAM".R....
PRINT"4 - OPEN DISK FILE"...... PRINT
"5 - PRINT DISK FILE"......"4 - QUIT".R.
...".......*** HIT CLEAR HOME TO RESET *
**......A$:.A$."".190...C..E(A$).145,500
,670,765:. 205,230,765...H..190.Q.
M. 11:.".NAME OF DISK FILE":."DEFAULT IS
DRIVE 0?.K.R..">";:.800:.B$."".150...W.
.J(B$,2,1)..":".B$."1:".B$......11,8,11,
"@".B$.",S,W":.835:.ES..ES$:.205.J....24
569,1:.150......".NAME OF FILE?":.">";:.
800:.B$."".150..... 11:.11,8,11,B$:.835:
.ES..ES$:.230.L....".ASCII OR CBM TYPE O
UTPUT?":.">";:.555,0._....A$:.A$."".245.
Q....A$.G(13).150......A$."A"..555,0:.26
5......A$.."C".245......G(F(A$).128)".":
.ML.3: 11:.150......425:A.B(553):A.A.1:.
A.2.A.0......553,A:.315......425:PA.PA.1
:.PA.3.PA.0.*....660,(PA(PA).DU).16.1:.3
15.F....425:DU.DU.1:.DU.2.DU.0.E....660,
(PA(PA).DU).16.1:.315.W...A$.". .":.430.
....A$." "......"..... ";H(DN$,B(553))
;A$.E....".......... ";H(DN$,PA);A$...
..."................ ";H(DN$,DU);A$:..
....A$.". .":.455...B.A$." ".).G..".....
";H(DN$,BR);A$.L.L.."........... ";
H(DN$,SB);A$.V.Q.."................ ";
H(DN$,WL);A$:....V..450:BR.BR.1:.BR.3.BR
.0......659,((SB.8).(2.WL).1).16.(BR.6):
.370.X....450:SB.SB.1:.SB.2.SB.0......65
9,((SB.8).(2.WL).1).16.(BR.6):.370......
450:WL.WL.1:.WL.2.WL.0.H....659,((SB.8).
(2.WL).1).16.(BR.6):.370.`.... RECEIVE A
PROGRAM.V....".NAME OF FILE?"......"DEF
AULT DRIVE IS #0":.">";:.800:S$.B$......
S$.""..5,"A";:.145.Y....J(S$,2,1)..":".S
$."0:".S$......625:S$."@".S$.T$.",W"....
. 2:.2,8,2,S$:.835:.ES..ES$: 2:.505.0...
.5,"TTTTTTTTTT";.O.!..X.0.10:.:.#5,A$:.S
T.0.545.B."..ML.18:.ST.570...&..X.0.10:.
:.#5,A$:.ST.0.550...+.S1.B(ML.2):S2.B(ML
.1):.ML.12.C.0..S1..B(ML.2).S2..B(ML.1).
575...5..ML.15:.5,"...............";:."-
";:.545...:. 2:.5,"SSSSSSSSSS";:.:.145.3
.?..5,"...............";:.":";:.545.I.D.
.".TYPE OF FILE:".W.I..".(P)ROGRAM, (W)O
RDPRO, OR (S)EQ?":.">";...N..B$:.B$."".5
90...S.TY$.B$:FL.0.B.X..B$."P".T$.",P":.
557,0:."PROGRAM":....]..B$."S".T$.",S":.
557,0:."SEQ":....B..B$."W".T$.",P":.557,
1:."WORDPRO":..#.G..B$.G(13).FL.1:..,.L.
.590.A.Q..5,"UUUUUUUUUU";.W.V..#5,A$:.ST
..0.630...{..A$."P".T$.",P":.557,0:A$."P
ROGRAM":.655......A$."S".T$.",S":.557,0:
A$."SEQ":.655.Z....A$."W".T$.",P":.557,1
:A$."WORDPRO":.655......630......".FILE
TYPE: "A$"."......#5,A$:.ST.0.660.......
@.... SEND AN SEQ FILE TO BULLETIN BOARD
.O....".NAME OF FILE TO SEND?":.">";:.80
0:S$.B$......S$.""..5,"A";:.145......580
:.FL.S$."":.680.I... 2:.2,8,2,S$.T$:.835
:.ES..ES$: 2:.675......X.1.10:.5,TY$;:.X
:.......#5,A$:.ST..0.A$.."U".700......#5
,A$:.B(667)..B(668).702./.A..ML.9:CK.ST.
K.F..X.1.400:.:. DELAY LOOP.J.K..#5,A$:.
B(667)..B(668).715...P..T.0.255:.5,G(B(M
L.256.T));:.T...U..5,"ZZZZZZZZZZZZZZZ";.
..W..B(669)..B(670).727.U.Z..#5,A$:.ST..
0.730......A$."."..":";:.710......A$..".
".730......CK.0.."-";:.702.1....#5,A$:.B
(667)..B(668).750.=... 2:.145.W....ML.21
:A$.G(B(634)):..K.... QUIT TERMINAL.|...
5: 1: 2: 11......G(9)......... ..". .."
;:B$.""...%..A$:.A$."".805.D.*..A$.G(20)
.825.Y./..A$.G(13).." ":....4.B$.B$.A$:.
" ."A$". ..";:.805...9..C(B$).0.805.*.>.
B$.H(B$,C(B$).1):.A$;:.805.B.C.. GET ERR
OR CHANNEL.Y.H..1,E1$,E2$,E3$,E4$.}.M.ES
$.E1$.",".E2$.",".E3$.",".E4$...R.ES.E(E
1$):.......22784,0:.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL