LOG PRINT
FILE INFORMATION
FILENAME(S): LOG PRINT
FILE TYPE(S): PRG
FILE SIZE: 2.9K
FIRST SEEN: 2025-11-30 19:36:45
APPEARS ON: 1 disk(s)
FILE HASH
dc4e6cc338d8bb3d957ac117e3db6b2a03043df84a447f273e9c681c97353369
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| JBR C64 RADIO MM | LOG PRINT | PRG | Curtcool, Bo | 6 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 2A 08 0A 00 8F 20 4C 4F 47 20 50 52 49 4E |..*.... LOG PRIN| 00000010: 54 49 4E 47 20 50 52 4F 47 52 41 4D 20 28 43 36 |TING PROGRAM (C6| 00000020: 34 20 56 45 52 53 49 4F 4E 29 00 41 08 14 00 8F |4 VERSION).A....| 00000030: 20 42 59 20 4B 43 36 41 20 41 4E 44 20 4E 36 4E | BY KC6A AND N6N| 00000040: 42 00 6E 08 1E 00 8F 20 43 4F 50 59 52 49 47 48 |B.n.... COPYRIGH| 00000050: 54 20 31 39 38 33 20 42 59 20 48 41 59 44 45 4E |T 1983 BY HAYDEN| 00000060: 20 42 4F 4F 4B 20 43 4F 2E 2C 49 4E 43 2E 00 8E | BOOK CO.,INC...| 00000070: 08 20 00 9F 31 33 2C 34 3A 8F 20 56 49 43 20 50 |. ..13,4:. VIC P| 00000080: 52 49 4E 54 45 52 20 43 48 41 4E 4E 45 4C 00 9C |RINTER CHANNEL..| 00000090: 08 22 00 9F 20 31 35 2C 38 2C 31 35 00 B0 08 28 |.".. 15,8,15...(| 000000A0: 00 42 4C 24 B2 C7 28 37 29 3A 8F 20 42 45 4C 4C |.BL$..(7):. BELL| 000000B0: 00 E5 08 32 00 43 4C 53 24 B2 C7 28 31 34 37 29 |...2.CLS$..(147)| 000000C0: 3A 8F 20 50 55 54 20 59 4F 55 52 20 43 4C 45 41 |:. PUT YOUR CLEA| 000000D0: 52 2D 53 43 52 45 45 4E 20 43 4F 4D 4D 41 4E 44 |R-SCREEN COMMAND| 000000E0: 20 48 45 52 45 00 0B 09 46 00 46 41 24 B2 22 30 | HERE...F.FA$."0| 000000F0: 3A 44 55 50 45 4C 4F 47 41 22 3A 46 43 24 B2 22 |:DUPELOGA":FC$."| 00000100: 30 3A 43 4F 4E 54 53 54 4C 47 22 00 32 09 50 00 |0:CONTSTLG".2.P.| 00000110: 4C 31 B2 36 36 3A 8F 20 50 41 47 45 20 4C 45 4E |L1.66:. PAGE LEN| 00000120: 47 54 48 20 49 4E 20 50 52 49 4E 54 20 4C 49 4E |GTH IN PRINT LIN| 00000130: 45 53 00 52 09 5A 00 4C 32 B2 36 3A 8F 20 54 4F |ES.R.Z.L2.6:. TO| 00000140: 50 20 26 20 42 4F 54 54 4F 4D 20 4D 41 52 47 49 |P & BOTTOM MARGI| 00000150: 4E 53 00 5D 09 5F 00 99 20 43 4C 53 24 00 71 09 |NS.]._.. CLS$.q.| 00000160: 6E 00 4E 31 B2 30 3A 4E 32 B2 4C 31 AA 4C 32 AA |n.N1.0:N2.L1.L2.| 00000170: 31 00 94 09 78 00 42 24 B2 22 22 3A 86 20 55 31 |1...x.B$."":. U1| 00000180: 24 28 31 35 29 2C 55 32 24 28 31 35 29 2C 55 33 |$(15),U2$(15),U3| 00000190: 28 31 35 29 00 B5 09 82 00 99 20 43 4C 53 24 3A |(15)...... CLS$:| 000001A0: 99 3A 99 3A 99 20 A3 31 35 29 22 4C 4F 47 20 53 |.:.:. .15)"LOG S| 000001B0: 48 45 45 54 22 00 D4 09 8C 00 99 20 A3 31 32 29 |HEET"...... .12)| 000001C0: 22 50 52 49 4E 54 49 4E 47 20 50 52 4F 47 52 41 |"PRINTING PROGRA| 000001D0: 4D 22 3A 99 00 04 0A 96 00 85 20 22 57 48 41 54 |M":....... "WHAT| 000001E0: 20 49 53 20 59 4F 55 52 20 43 41 4C 4C 22 3B 4D | IS YOUR CALL";M| 000001F0: 59 24 3A 4D 59 24 B2 22 4C 4F 47 20 4F 46 20 22 |Y$:MY$."LOG OF "| 00000200: AA 4D 59 24 00 0E 0A A0 00 99 3A 99 3A 99 00 3B |.MY$......:.:..;| 00000210: 0A AA 00 99 20 22 50 4F 53 49 54 49 4F 4E 20 54 |.... "POSITION T| 00000220: 48 45 20 50 52 49 4E 54 45 52 20 54 4F 20 54 48 |HE PRINTER TO TH| 00000230: 45 20 54 4F 50 20 4F 46 20 41 22 00 63 0A AC 00 |E TOP OF A".c...| 00000240: 99 20 22 4E 45 57 20 50 41 47 45 2E 20 20 48 49 |. "NEW PAGE. HI| 00000250: 54 20 3C 43 52 3E 20 57 48 45 4E 20 52 45 41 44 |T <CR> WHEN READ| 00000260: 59 2E 22 00 72 0A B4 00 47 24 B2 22 22 3A 85 20 |Y.".r...G$."":. | 00000270: 47 24 00 A6 0A BE 00 99 3A 99 3A 99 20 22 44 4F |G$......:.:. "DO| 00000280: 20 59 4F 55 20 57 41 4E 54 20 4F 4E 45 20 54 49 | YOU WANT ONE TI| 00000290: 4D 45 2D 53 45 51 55 45 4E 54 49 41 4C 20 4C 4F |ME-SEQUENTIAL LO| 000002A0: 47 20 28 54 29 22 00 D3 0A C0 00 99 20 22 4F 52 |G (T)"...... "OR| 000002B0: 20 41 20 53 45 50 41 52 41 54 45 20 4C 4F 47 20 | A SEPARATE LOG | 000002C0: 46 4F 52 20 45 41 43 48 20 42 41 4E 44 20 28 42 |FOR EACH BAND (B| 000002D0: 29 3F 22 00 EC 0A C8 00 85 20 22 45 4E 54 45 52 |)?"...... "ENTER| 000002E0: 20 42 20 4F 52 20 54 22 3B 54 59 24 00 10 0B D2 | B OR T";TY$....| 000002F0: 00 8B 20 54 59 24 B3 B1 22 54 22 20 A7 20 8B 20 |.. TY$.."T" . . | 00000300: 54 59 24 B3 B1 22 42 22 20 A7 20 89 20 31 39 30 |TY$.."B" . . 190| 00000310: 00 2D 0B DC 00 9F 34 2C 38 2C 34 2C 46 41 24 AA |.-....4,8,4,FA$.| 00000320: 22 2C 53 2C 52 22 3A 8D 20 36 30 30 30 00 3D 0B |",S,R":. 6000.=.| 00000330: E6 00 84 34 2C 48 43 24 3A 84 34 2C 54 00 53 0B |...4,HC$:.4,T.S.| 00000340: E8 00 84 34 2C 59 24 3A 84 34 2C 5A 24 3A 84 34 |...4,Y$:.4,Z$:.4| 00000350: 2C 4E 4C 00 63 0B F0 00 84 34 2C 4C 25 3A 84 34 |,NL.c....4,L%:.4| 00000360: 2C 4D 31 00 71 0B FA 00 86 20 4C 4E 24 28 4E 4C |,M1.q.... LN$(NL| 00000370: 29 00 8E 0B 04 01 81 20 4A B2 31 20 A4 20 4E 4C |)...... J.1 . NL| 00000380: 3A 84 34 2C 4C 4E 24 28 4A 29 3A 82 20 4A 00 98 |:.4,LN$(J):. J..| 00000390: 0B 06 01 84 34 2C 5A 41 00 A9 0B 07 01 8B 20 5A |....4,ZA...... Z| 000003A0: 41 B2 30 20 A7 20 33 31 30 00 B4 0B 08 01 84 34 |A.0 . 310......4| 000003B0: 2C 45 54 20 00 E4 0B 0A 01 81 20 4A B2 31 20 A4 |,ET ...... J.1 .| 000003C0: 20 5A 41 3A 84 34 2C 55 31 24 28 4A 29 3A 84 34 | ZA:.4,U1$(J):.4| 000003D0: 2C 55 32 24 28 4A 29 3A 84 34 2C 55 33 28 4A 29 |,U2$(J):.4,U3(J)| 000003E0: 3A 82 20 4A 00 F8 0B 36 01 4C 58 B2 31 3A 5A 43 |:. J...6.LX.1:ZC| 000003F0: B2 5A 41 3A 5A 41 B2 31 00 0E 0C 3B 01 9F 33 2C |.ZA:ZA.1...;..3,| 00000400: 38 2C 33 2C 46 43 24 3A 8D 20 36 30 30 30 00 1E |8,3,FC$:. 6000..| 00000410: 0C 40 01 4C 54 24 B2 4C 4E 24 28 4C 58 29 00 50 |.@.LT$.LN$(LX).P| 00000420: 0C 41 01 8B 20 C3 28 4C 54 24 29 B3 35 20 A7 20 |.A.. .(LT$).5 . | 00000430: 81 20 4A B2 C3 28 4C 54 24 29 AA 31 20 A4 20 35 |. J..(LT$).1 . 5| 00000440: 3A 4C 54 24 B2 4C 54 24 AA 22 2D 22 3A 82 20 4A |:LT$.LT$."-":. J| 00000450: 00 62 0C 4A 01 81 20 52 45 43 B2 31 20 A4 20 54 |.b.J.. REC.1 . T| 00000460: AB 31 00 8B 0C 4C 01 8B 20 52 45 43 B2 55 33 28 |.1...L.. REC.U3(| 00000470: 5A 41 29 20 A7 20 8D 20 36 38 30 3A 5A 41 B2 5A |ZA) . . 680:ZA.Z| 00000480: 41 AA 31 3A 4E 32 B2 4E 32 AA 31 00 96 0C 54 01 |A.1:N2.N2.1...T.| 00000490: 8D 20 37 30 30 30 00 AD 0C 55 01 52 50 B2 31 3A |. 7000...U.RP.1:| 000004A0: 8D 20 37 31 30 30 3A 84 33 2C 44 31 24 00 C5 0C |. 7100:.3,D1$...| 000004B0: 56 01 52 50 B2 31 30 3A 8D 20 37 31 30 30 3A 84 |V.RP.10:. 7100:.| 000004C0: 33 2C 54 4D 24 00 DD 0C 57 01 52 50 B2 31 35 3A |3,TM$...W.RP.15:| 000004D0: 8D 20 37 31 30 30 3A 84 33 2C 4B 4C 24 00 F5 0C |. 7100:.3,KL$...| 000004E0: 58 01 52 50 B2 32 36 3A 8D 20 37 31 30 30 3A 84 |X.RP.26:. 7100:.| 000004F0: 33 2C 42 31 24 00 0D 0D 59 01 52 50 B2 33 32 3A |3,B1$...Y.RP.32:| 00000500: 8D 20 37 31 30 30 3A 84 33 2C 4D 31 24 00 25 0D |. 7100:.3,M1$.%.| 00000510: 5A 01 52 50 B2 33 38 3A 8D 20 37 31 30 30 3A 84 |Z.RP.38:. 7100:.| 00000520: 33 2C 45 31 24 00 30 0D 5B 01 8D 20 36 30 30 30 |3,E1$.0.[.. 6000| 00000530: 00 59 0D 5E 01 8B 20 54 59 24 B2 22 42 22 20 AF |.Y.^.. TY$."B" .| 00000540: 20 42 31 24 B3 B1 C8 28 4C 54 24 2C C3 28 42 31 | B1$...(LT$,.(B1| 00000550: 24 29 29 20 A7 20 33 37 30 00 95 0D 68 01 8B 20 |$)) . 370...h.. | 00000560: C8 28 4B 41 24 2C 31 29 B3 B1 22 2A 22 20 A7 20 |.(KA$,1).."*" . | 00000570: 8D 20 35 32 30 3A 8F 20 50 52 49 4E 54 20 49 54 |. 520:. PRINT IT| 00000580: 20 49 46 20 4E 4F 54 20 44 45 4C 45 54 45 44 20 | IF NOT DELETED | 00000590: 45 4E 54 52 59 00 9F 0D 72 01 82 20 52 45 43 00 |ENTRY...r.. REC.| 000005A0: E4 0D 74 01 8B 20 5A 43 B2 B1 31 20 A7 20 98 31 |..t.. ZC..1 . .1| 000005B0: 33 2C 22 20 20 20 2A 2A 2A 4F 46 46 20 54 48 45 |3," ***OFF THE| 000005C0: 20 41 49 52 20 41 54 20 22 3B 55 32 24 28 5A 41 | AIR AT ";U2$(ZA| 000005D0: 29 3B 22 2A 2A 2A 22 3A 4E 32 B2 4E 32 AA 31 3A |);"***":N2.N2.1:| 000005E0: 5A 41 B2 31 00 16 0E 7C 01 8B 20 54 59 24 B2 22 |ZA.1...|.. TY$."| 000005F0: 42 22 20 AF 20 4C 58 B3 4E 4C 20 A7 20 4C 58 B2 |B" . LX.NL . LX.| 00000600: 4C 58 AA 31 3A 8D 20 35 39 30 3A 8D 20 36 35 30 |LX.1:. 590:. 650| 00000610: 3A 89 20 33 32 30 00 1E 0E 86 01 A0 20 33 00 33 |:. 320...... 3.3| 00000620: 0E 90 01 8D 20 35 39 30 3A 8F 20 4E 45 57 20 50 |.... 590:. NEW P| 00000630: 41 47 45 00 52 0E 92 01 84 34 2C 47 24 3A 8B 20 |AGE.R....4,G$:. | 00000640: C8 28 47 24 2C 31 29 B3 B1 42 4C 24 20 A7 20 34 |.(G$,1)..BL$ . 4| 00000650: 30 32 00 65 0E 93 01 8B 20 47 24 B2 22 21 22 20 |02.e.... G$."!" | 00000660: A7 20 34 37 30 00 6F 0E A4 01 84 34 2C 47 24 00 |. 470.o....4,G$.| 00000670: 8F 0E AE 01 8B 20 C8 28 47 24 2C 31 29 B2 42 4C |..... .(G$,1).BL| 00000680: 24 20 A7 20 8D 20 35 39 30 3A 89 20 34 30 33 00 |$ . . 590:. 403.| 00000690: B1 0E B8 01 8B 20 4E 32 AA 4C 32 B1 4C 31 20 A7 |..... N2.L2.L1 .| 000006A0: 20 8D 20 35 39 30 3A 8F 20 4E 45 57 20 50 41 47 | . 590:. NEW PAG| 000006B0: 45 00 C4 0E C2 01 98 31 33 2C 47 24 3A 4E 32 B2 |E......13,G$:N2.| 000006C0: 4E 32 AA 31 00 CE 0E CC 01 89 20 34 30 33 00 DF |N2.1...... 403..| 000006D0: 0E D6 01 8B 20 5A 43 B3 31 20 A7 20 34 37 34 00 |.... ZC.1 . 474.| 000006E0: 18 0F D7 01 98 31 33 2C 22 22 3A 98 31 33 2C 22 |.....13,"":.13,"| 000006F0: 54 4F 54 41 4C 20 4F 50 45 52 41 54 49 4E 47 20 |TOTAL OPERATING | 00000700: 54 49 4D 45 3A 20 22 3B B5 28 45 54 29 3B 22 20 |TIME: ";.(ET);" | 00000710: 48 52 53 20 2D 20 22 3B 00 47 0F D8 01 98 31 33 |HRS - ";.G....13| 00000720: 2C 22 22 3B B5 28 28 45 54 AB B5 28 45 54 29 29 |,"";.((ET..(ET))| 00000730: AC 36 30 AA 2E 35 29 3B 22 20 4D 49 4E 53 22 3A |.60..5);" MINS":| 00000740: 4E 32 B2 4E 32 AA 31 00 51 0F DA 01 8D 20 36 34 |N2.N2.1.Q.... 64| 00000750: 30 00 6D 0F DC 01 98 31 33 3A 81 20 4A B2 31 20 |0.m....13:. J.1 | 00000760: A4 20 35 35 35 35 3A 99 3B 3A 82 20 4A 00 86 0F |. 5555:.;:. J...| 00000770: E0 01 99 3A 99 3A 99 20 A3 31 37 29 22 2D 44 4F |...:.:. .17)"-DO| 00000780: 4E 45 2D 22 3A 99 00 A4 0F EA 01 99 22 52 55 4E |NE-":......."RUN| 00000790: 20 44 55 50 45 20 50 52 49 4E 54 20 50 52 4F 47 | DUPE PRINT PROG| 000007A0: 52 41 4D 22 00 C6 0F EC 01 99 20 22 54 4F 20 47 |RAM"...... "TO G| 000007B0: 45 4E 45 52 41 54 45 20 41 20 44 55 50 45 20 53 |ENERATE A DUPE S| 000007C0: 48 45 45 54 2E 22 00 D7 0F F6 01 A0 34 3A A0 31 |HEET."......4:.1| 000007D0: 33 3A A0 31 35 3A 80 00 EA 0F FE 01 8F 20 50 52 |3:.15:....... PR| 000007E0: 49 4E 54 20 41 20 4C 49 4E 45 00 12 10 08 02 8B |INT A LINE......| 000007F0: 20 4E 32 B1 4C 31 AB 4C 32 20 A7 20 8D 20 35 39 | N2.L1.L2 . . 59| 00000800: 30 3A 8D 20 36 35 30 3A 8F 20 4E 45 57 20 50 41 |0:. 650:. NEW PA| 00000810: 47 45 00 25 10 12 02 8B 20 42 31 24 B2 42 24 20 |GE.%.... B1$.B$ | 00000820: A7 20 35 35 30 00 45 10 1C 02 98 31 33 2C 22 22 |. 550.E....13,""| 00000830: 3A 4E 32 B2 4E 32 AA 31 3A 42 24 B2 42 31 24 3A |:N2.N2.1:B$.B1$:| 00000840: 89 20 35 32 30 00 73 10 26 02 98 31 33 2C 22 20 |. 520.s.&..13," | 00000850: 20 22 44 31 24 3B A6 31 30 AB C3 28 44 31 24 29 | "D1$;.10..(D1$)| 00000860: 29 54 4D 24 3B A6 36 AB C3 28 54 4D 24 29 29 4B |)TM$;.6..(TM$))K| 00000870: 4C 24 3B 00 AA 10 27 02 98 31 33 2C 22 22 3B A6 |L$;...'..13,"";.| 00000880: 31 32 AB C3 28 4B 4C 24 29 29 42 31 24 3B A6 37 |12..(KL$))B1$;.7| 00000890: AB C3 28 42 31 24 29 29 4D 31 24 3B A6 37 AB C3 |..(B1$))M1$;.7..| 000008A0: 28 4D 31 24 29 29 45 31 24 3B 00 C4 10 30 02 98 |(M1$))E1$;...0..| 000008B0: 31 33 2C 22 22 3B A6 31 37 AB C3 28 45 31 24 29 |13,"";.17..(E1$)| 000008C0: 29 52 45 43 00 D9 10 3A 02 42 24 B2 42 31 24 3A |)REC...:.B$.B1$:| 000008D0: 4E 32 B2 4E 32 AA 31 3A 8E 00 F7 10 44 02 8F 20 |N2.N2.1:....D.. | 000008E0: 50 52 49 4E 54 20 54 49 54 4C 45 53 20 2D 20 4E |PRINT TITLES - N| 000008F0: 45 57 20 50 41 47 45 00 0C 11 4E 02 8D 20 36 34 |EW PAGE...N.. 64| 00000900: 30 3A 8F 20 4E 45 57 20 50 41 47 45 00 18 11 58 |0:. NEW PAGE...X| 00000910: 02 4E 31 B2 4E 31 AA 31 00 45 11 62 02 98 31 33 |.N1.N1.1.E.b..13| 00000920: 2C 22 20 20 20 20 20 20 22 5A 24 3B A6 33 30 AB |," "Z$;.30.| 00000930: 28 C3 28 5A 24 29 AA C3 28 4D 59 24 29 AD 32 29 |(.(Z$)..(MY$).2)| 00000940: 29 4D 59 24 3B 00 66 11 63 02 98 31 33 2C 22 22 |)MY$;.f.c..13,""| 00000950: 3B A6 32 34 AB C3 28 4D 59 24 29 29 22 50 41 47 |;.24..(MY$))"PAG| 00000960: 45 20 22 3B 4E 31 00 8E 11 6C 02 98 31 33 2C 22 |E ";N1...l..13,"| 00000970: 22 3B A6 33 36 AB C3 28 59 24 29 AD 32 29 59 24 |";.36..(Y$).2)Y$| 00000980: 3A 98 31 33 2C 22 22 3A 98 31 33 2C 22 22 00 9C |:.13,"":.13,""..| 00000990: 11 76 02 4E 32 B2 4E 32 AA 31 3A 8E 00 C4 11 80 |.v.N2.N2.1:.....| 000009A0: 02 81 20 4B B2 4E 32 20 A4 20 4C 32 AA 4C 31 3A |.. K.N2 . L2.L1:| 000009B0: 98 31 33 2C 22 22 3A 82 20 4B 3A 4E 32 B2 4C 32 |.13,"":. K:N2.L2| 000009C0: AA 31 3A 8E 00 0E 12 8A 02 98 31 33 2C 22 20 20 |.1:.......13," | 000009D0: 20 44 41 54 45 20 20 20 20 20 55 54 43 20 20 20 | DATE UTC | 000009E0: 20 43 41 4C 4C 20 20 20 20 20 20 20 42 41 4E 44 | CALL BAND| 000009F0: 20 20 20 4D 4F 44 45 20 20 20 45 58 43 48 41 4E | MODE EXCHAN| 00000A00: 47 45 20 20 20 20 20 20 20 52 43 44 23 22 00 2D |GE RCD#".-| 00000A10: 12 9E 02 98 31 33 2C 22 22 3A 4E 32 B2 4E 32 AA |....13,"":N2.N2.| 00000A20: 32 3A 8B 20 4E 31 B3 B1 31 20 A7 20 8E 00 3C 12 |2:. N1..1 . ..<.| 00000A30: 9F 02 8B 20 5A 43 B3 31 20 A7 20 8E 00 72 12 A0 |... ZC.1 . ..r..| 00000A40: 02 98 31 33 2C 22 20 20 20 2A 2A 2A 4F 4E 20 54 |..13," ***ON T| 00000A50: 48 45 20 41 49 52 20 41 54 20 22 3B 55 31 24 28 |HE AIR AT ";U1$(| 00000A60: 31 29 3B 22 2A 2A 2A 22 3A 4E 32 B2 4E 32 AA 31 |1);"***":N2.N2.1| 00000A70: 3A 8E 00 8F 12 A8 02 8B 20 4E 32 B1 4C 31 AB 4C |:....... N2.L1.L| 00000A80: 32 20 A7 20 8D 20 35 39 30 3A 8D 20 36 35 30 00 |2 . . 590:. 650.| 00000A90: D8 12 B2 02 98 31 33 2C 22 20 20 20 2A 2A 4F 46 |.....13," **OF| 00000AA0: 46 20 54 48 45 20 41 49 52 20 41 54 20 22 3B 55 |F THE AIR AT ";U| 00000AB0: 32 24 28 5A 41 29 3B 22 20 41 4E 44 20 42 41 43 |2$(ZA);" AND BAC| 00000AC0: 4B 20 4F 4E 20 41 54 20 22 3B 55 31 24 28 5A 41 |K ON AT ";U1$(ZA| 00000AD0: AA 31 29 3B 22 2A 2A 22 00 DE 12 BC 02 8E 00 EF |.1);"**"........| 00000AE0: 12 5D 12 46 20 5A 43 B3 31 20 A7 20 34 37 34 00 |.].F ZC.1 . 474.| 00000AF0: 25 13 70 17 84 31 35 2C 45 41 2C 45 42 24 2C 45 |%.p..15,EA,EB$,E| 00000B00: 43 2C 45 44 3A 8B 20 45 41 B3 32 30 20 A7 20 8E |C,ED:. EA.20 . .| 00000B10: 3A 8F 20 52 45 41 44 20 45 52 52 4F 52 20 43 48 |:. READ ERROR CH| 00000B20: 41 4E 4E 45 4C 00 35 13 7A 17 8B 20 45 41 B2 35 |ANNEL.5.z.. EA.5| 00000B30: 30 20 A7 20 8E 00 45 13 84 17 8B 20 45 41 B2 36 |0 . ..E.... EA.6| 00000B40: 33 20 A7 20 8E 00 5C 13 8E 17 99 20 45 41 3B 45 |3 . ..\.... EA;E| 00000B50: 42 24 2C 45 43 3B 45 44 3A 90 3A 8E 00 83 13 58 |B$,EC;ED:.:....X| 00000B60: 1B 52 4E B2 52 45 43 3A 52 48 B2 B5 28 52 4E AD |.RN.REC:RH..(RN.| 00000B70: 32 35 36 29 3A 52 4C B2 52 4E AB 32 35 36 AC 52 |256):RL.RN.256.R| 00000B80: 48 3A 8E 00 A2 13 BC 1B 98 31 35 2C 22 50 22 C7 |H:.......15,"P".| 00000B90: 28 33 29 C7 28 52 4C 29 C7 28 52 48 29 C7 28 52 |(3).(RL).(RH).(R| 00000BA0: 50 29 00 AD 13 C6 1B 89 20 36 30 30 30 00 00 00 |P)...... 6000...|
..*.... LOG PRINTING PROGRAM (C64 VERSIO N).A.... BY KC6A AND N6NB.N.... COPYRIGH T 1983 BY HAYDEN BOOK CO.,INC.... ..13,4 :. VIC PRINTER CHANNEL...".. 15,8,15...( .BL$.G(7):. BELL...2.CLS$.G(147):. PUT Y OUR CLEAR-SCREEN COMMAND HERE...F.FA$."0 :DUPELOGA":FC$."0:CONTSTLG".2.P.L1.66:. PAGE LENGTH IN PRINT LINES.R.Z.L2.6:. TO P & BOTTOM MARGINS.]._.. CLS$.Q.N.N1.0:N 2.L1.L2.1...X.B$."":. U1$(15),U2$(15),U3 (15)...... CLS$:.:.:. .15)"LOG SHEET".T. ... .12)"PRINTING PROGRAM":....... "WHAT IS YOUR CALL";MY$:MY$."LOG OF ".MY$... ..:.:..;.... "POSITION THE PRINTER TO TH E TOP OF A".C.... "NEW PAGE. HIT <CR> W HEN READY.".R...G$."":. G$......:.:. "DO YOU WANT ONE TIME-SEQUENTIAL LOG (T)".S .... "OR A SEPARATE LOG FOR EACH BAND (B )?"...H.. "ENTER B OR T";TY$...R.. TY$.. "T" . . TY$.."B" . . 190.-....4,8,4,FA$. ",S,R":. 6000.=....4,HC$:.4,T.S....4,Y$: .4,Z$:.4,NL.C....4,L%:.4,M1.Q.... LN$(NL )...... J.1 . NL:.4,LN$(J):. J......4,ZA ...... ZA.0 . 310......4,ET ...... J.1 . ZA:.4,U1$(J):.4,U2$(J):.4,U3(J):. J...6 .LX.1:ZC.ZA:ZA.1...;..3,8,3,FC$:. 6000.. .@.LT$.LN$(LX).P.A.. C(LT$).5 . . J.C(LT $).1 . 5:LT$.LT$."-":. J.B.J.. REC.1 . T .1...L.. REC.U3(ZA) . . 680:ZA.ZA.1:N2.N 2.1...T.. 7000...U.RP.1:. 7100:.3,D1$.E. V.RP.10:. 7100:.3,TM$...W.RP.15:. 7100:. 3,KL$...X.RP.26:. 7100:.3,B1$...Y.RP.32: . 7100:.3,M1$.%.Z.RP.38:. 7100:.3,E1$.0. [.. 6000.Y.^.. TY$."B" . B1$..H(LT$,C(B1 $)) . 370...H.. H(KA$,1).."*" . . 520:. PRINT IT IF NOT DELETED ENTRY...R.. REC. ..T.. ZC..1 . .13," ***OFF THE AIR AT ";U2$(ZA);"***":N2.N2.1:ZA.1...|.. TY$." B" . LX.NL . LX.LX.1:. 590:. 650:. 320.. ... 3.3.... 590:. NEW PAGE.R....4,G$:. H(G$,1)..BL$ . 402.E.... G$."!" . 470.O. ...4,G$...... H(G$,1).BL$ . . 590:. 403. ..... N2.L2.L1 . . 590:. NEW PAGE.D.B..1 3,G$:N2.N2.1.N.L.. 403...V.. ZC.1 . 474. ..W..13,"":.13,"TOTAL OPERATING TIME: "; .(ET);" HRS - ";.G.X..13,"";.((ET..(ET)) .60..5);" MINS":N2.N2.1.Q.Z.. 640.M....1 3:. J.1 . 5555:.;:. J......:.:. .17)"-DO NE-":......."RUN DUPE PRINT PROGRAM".F.. .. "TO GENERATE A DUPE SHEET.".W... 4: 1 3: 15:....... PRINT A LINE...... N2.L1.L 2 . . 590:. 650:. NEW PAGE.%.... B1$.B$ . 550.E....13,"":N2.N2.1:B$.B1$:. 520.S. &..13," "D1$;.10.C(D1$))TM$;.6.C(TM$))K L$;...'..13,"";.12.C(KL$))B1$;.7.C(B1$)) M1$;.7.C(M1$))E1$;.D.0..13,"";.17.C(E1$) )REC.Y.:.B$.B1$:N2.N2.1:....D.. PRINT TI TLES - NEW PAGE...N.. 640:. NEW PAGE...X .N1.N1.1.E.B..13," "Z$;.30.(C(Z$).C (MY$).2))MY$;.F.C..13,"";.24.C(MY$))"PAG E ";N1...L..13,"";.36.C(Y$).2)Y$:.13,"": .13,""...V.N2.N2.1:..D.... K.N2 . L2.L1: .13,"":. K:N2.L2.1:.......13," DATE UTC CALL BAND MODE EXCHAN GE RCD#".-....13,"":N2.N2.2:. N1.. 1 . ..<.... ZC.1 . ..R. ..13," ***ON T HE AIR AT ";U1$(1);"***":N2.N2.1:....... N2.L1.L2 . . 590:. 650.X....13," **OF F THE AIR AT ";U2$(ZA);" AND BACK ON AT ";U1$(ZA.1);"**".........].F ZC.1 . 474. %.P..15,EA,EB$,EC,ED:. EA.20 . .:. READ ERROR CHANNEL.5.Z.. EA.50 . ..E.... EA.6 3 . ..\.... EA;EB$,EC;ED:.:....X.RN.REC: RH..(RN.256):RL.RN.256.RH:.......15,"P"G (3)G(RL)G(RH)G(RP)...F.. 6000...
> CLICK IMAGE PREVIEW FOR FULL MODAL