PRINTAT
FILE INFORMATION
FILENAME(S): PRINTAT
FILE TYPE(S): PRG
FILE SIZE: 633b
FIRST SEEN: 2025-11-30 21:12:21
APPEARS ON: 2 disk(s)
FILE HASH
5c50d6c08e66c07d09767e64688c5382c6c6ed80cc34e12c23f50af2c46ddfb8
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RANS ISK1 | PRINTAT | PRG | DuncanTwain | 9 | 0 | DOWNLOAD FILE |
| RANS ISK2 | PRINTAT | PRG | DuncanTwain | 9 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 00 00 8F 20 50 52 49 4E 54 41 54 20 |..).... PRINTAT | 00000010: 28 53 2E 20 45 52 49 43 4B 53 4F 4E 20 33 2F 38 |(S. ERICKSON 3/8| 00000020: 35 29 20 20 20 20 20 20 3A 00 2F 08 01 00 3A 00 |5) :./...:.| 00000030: 50 08 02 00 8F 20 20 31 20 53 54 41 54 45 4D 45 |P.... 1 STATEME| 00000040: 4E 54 53 2C 20 30 20 46 55 4E 43 54 49 4F 4E 53 |NTS, 0 FUNCTIONS| 00000050: 00 56 08 03 00 3A 00 73 08 04 00 8F 20 4B 45 59 |.V...:.s.... KEY| 00000060: 57 4F 52 44 20 43 48 41 52 41 43 54 45 52 53 3A |WORD CHARACTERS:| 00000070: 20 20 36 00 79 08 05 00 3A 00 A1 08 06 00 8F 20 | 6.y...:...... | 00000080: 4B 45 59 57 4F 52 44 20 20 20 20 20 52 4F 55 54 |KEYWORD ROUT| 00000090: 49 4E 45 20 20 4C 49 4E 45 20 20 20 53 45 52 20 |INE LINE SER | 000000A0: 23 00 C8 08 07 00 8F 20 53 2F 50 52 49 4E 54 40 |#...... S/PRINT@| 000000B0: 20 20 20 20 50 52 49 4E 41 54 20 20 20 36 37 30 | PRINAT 670| 000000C0: 34 20 20 20 20 30 38 34 00 CE 08 08 00 3A 00 F5 |4 084.....:..| 000000D0: 08 09 00 8F 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |.... ===========| 000000E0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 000000F0: 3D 3D 3D 3D 3D 00 FB 08 0A 00 3A 00 16 09 7A 00 |=====.....:...z.| 00000100: 2E C6 20 22 50 52 49 4E 54 22 20 3A 20 2E 42 59 |.. "PRINT" : .BY| 00000110: 54 45 20 24 43 30 00 28 09 62 04 2E 57 B0 44 20 |TE $C0.(.b..W.D | 00000120: 50 52 49 4E 41 54 AB 31 00 3E 09 30 1A 50 52 49 |PRINAT.1.>.0.PRI| 00000130: 4E 41 54 20 4A 53 52 20 24 42 37 39 45 20 00 54 |NAT JSR $B79E .T| 00000140: 09 34 1A 53 54 58 20 24 31 34 20 20 20 20 20 20 |.4.STX $14 | 00000150: 20 20 20 20 00 6A 09 36 1A 43 50 58 20 23 24 32 | .j.6.CPX #$2| 00000160: 38 20 20 20 20 20 20 20 20 20 00 78 09 38 1A 42 |8 .x.8.B| 00000170: 43 53 20 50 52 49 4E 31 00 8E 09 3A 1A 4A 53 52 |CS PRIN1...:.JSR| 00000180: 20 24 41 45 46 44 20 20 20 20 20 20 20 20 00 A4 | $AEFD ..| 00000190: 09 40 1A 4A 53 52 20 24 42 37 39 45 20 20 20 20 |.@.JSR $B79E | 000001A0: 20 20 20 20 00 BA 09 42 1A 43 50 58 20 23 24 31 | ...B.CPX #$1| 000001B0: 39 20 20 20 20 20 20 20 20 20 00 C8 09 44 1A 42 |9 ...D.B| 000001C0: 43 53 20 50 52 49 4E 31 00 DE 09 46 1A 4C 44 59 |CS PRIN1...F.LDY| 000001D0: 20 24 31 34 20 20 20 20 20 20 20 20 20 20 00 F4 | $14 ..| 000001E0: 09 48 1A 4A 53 52 20 24 46 46 46 30 20 20 20 20 |.H.JSR $FFF0 | 000001F0: 20 20 20 20 00 0A 0A 4A 1A 4A 53 52 20 24 37 39 | ...J.JSR $79| 00000200: 20 20 20 20 20 20 20 20 20 20 00 20 0A 4C 1A 42 | . .L.B| 00000210: 45 51 20 50 52 49 4E 32 20 20 20 20 20 20 20 20 |EQ PRIN2 | 00000220: 00 36 0A 4E 1A 4A 53 52 20 24 41 45 46 44 20 20 |.6.N.JSR $AEFD | 00000230: 20 20 20 20 20 20 00 4C 0A 50 1A 4A 4D 50 20 24 | .L.P.JMP $| 00000240: 41 41 41 30 20 20 20 20 20 20 20 20 00 62 0A 52 |AAA0 .b.R| 00000250: 1A 50 52 49 4E 31 20 4A 4D 50 20 24 42 32 34 38 |.PRIN1 JMP $B248| 00000260: 20 20 00 70 0A 56 1A 50 52 49 4E 32 20 52 54 53 | .p.V.PRIN2 RTS| 00000270: 00 76 0A 58 1A 3B 00 00 00 |.v.X.;... |
..).... PRINTAT (S. ERICKSON 3/85)
:./...:.P.... 1 STATEMENTS, 0 FUNCTIONS
.V...:.S.... KEYWORD CHARACTERS: 6.Y...
:...... KEYWORD ROUTINE LINE SER
#.H.... S/PRINT@ PRINAT 6704 084
.N...:...... ===========================
=====.....:...Z..F "PRINT" : .BYTE $C0.(
.B..W.D PRINAT.1.>.0.PRINAT JSR $B79E .T
.4.STX $14 .J.6.CPX #$28
.X.8.BCS PRIN1...:.JSR $AEFD ..
.@.JSR $B79E ...B.CPX #$19
.H.D.BCS PRIN1...F.LDY $14 ..
.H.JSR $FFF0 ...J.JSR $79
. .L.BEQ PRIN2 .6.N.JSR $AEFD
.L.P.JMP $AAA0 .B.R.PRIN1 J
MP $B248 .P.V.PRIN2 RTS.V.X.;...
> CLICK IMAGE PREVIEW FOR FULL MODAL