UNNEW.64
FILE INFORMATION
FILENAME(S): UNNEW.64
FILE TYPE(S): PRG
FILE SIZE: 2.1K
FIRST SEEN: 2025-10-19 22:48:42
APPEARS ON: 1 disk(s)
FILE HASH
3848180360b3c6aca8e93a9419e05fae8700fb2debd10b8acb6003cb2702581e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| COMPUTE NOV JAN | UNNEW.64 | PRG | Radd Maxx | 14 | 14 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 20 1C 0A 00 97 20 35 33 32 38 30 2C 31 3A |.. .... 53280,1:| 00000010: 97 20 35 33 32 38 31 2C 30 3A 97 36 34 36 2C 31 |. 53281,0:.646,1| 00000020: 00 39 1C 14 00 99 C7 28 31 34 37 29 3A 45 B2 30 |.9.....(147):E.0| 00000030: 3A 8D 32 31 30 3A 43 B2 30 00 67 1C 1E 00 9F 31 |:.210:C.0.g....1| 00000040: 35 2C 38 2C 31 35 2C 22 49 30 3A 22 3A 9F 31 2C |5,8,15,"I0:":.1,| 00000050: 38 2C 38 2C 22 55 4E 4E 45 57 20 36 34 20 2E 4F |8,8,"UNNEW 64 .O| 00000060: 42 4A 2C 50 2C 57 22 00 83 1C 28 00 81 49 B2 31 |BJ,P,W"...(..I.1| 00000070: A4 33 38 3A 43 B2 43 AA 31 3A 8B 43 B2 31 35 A7 |.38:C.C.1:.C.15.| 00000080: 43 B2 31 00 93 1C 32 00 3A 87 41 3A 43 4B B2 43 |C.1...2.:.A:CK.C| 00000090: 4B AA 41 00 BB 1C 3C 00 3A 3A 84 31 35 2C 45 4E |K.A...<.::.15,EN| 000000A0: 2C 45 4D 24 2C 45 54 2C 45 53 3A 8B 20 45 4E B3 |,EM$,ET,ES:. EN.| 000000B0: B1 30 A7 45 B2 31 3A 8D 32 31 30 00 C8 1C 46 00 |.0.E.1:.210...F.| 000000C0: 8B 20 45 B2 30 A7 39 30 00 EA 1C 50 00 99 3A 99 |. E.0.90...P..:.| 000000D0: 22 44 49 53 4B 20 44 52 49 56 45 20 45 52 52 4F |"DISK DRIVE ERRO| 000000E0: 52 20 20 20 22 45 4D 24 3A 80 00 02 1D 5A 00 3A |R "EM$:....Z.:| 000000F0: 97 35 33 32 38 31 2C 43 3A 97 20 35 33 32 38 30 |.53281,C:. 53280| 00000100: 2C 43 00 0F 1D 64 00 98 31 2C C7 28 41 29 3B 00 |,C...d..1,.(A);.| 00000110: 40 1D 6E 00 82 3A 97 35 33 32 38 31 2C 30 3A 97 |@.n..:.53281,0:.| 00000120: 35 33 32 38 30 2C 30 3A A0 31 3A 98 31 35 2C 22 |53280,0:.1:.15,"| 00000130: 49 30 3A 22 3A A0 31 35 3A 99 C7 28 31 34 37 29 |I0:":.15:..(147)| 00000140: 00 66 1D 78 00 8B 43 4B B3 B1 33 36 38 32 A7 20 |.f.x..CK..3682. | 00000150: 97 35 33 32 38 30 2C 32 3A 97 35 33 32 38 31 2C |.53280,2:.53281,| 00000160: 32 3A 89 31 34 30 00 6F 1D 82 00 89 31 35 30 00 |2:.140.o....150.| 00000170: AE 1D 8C 00 99 3A 99 22 43 48 45 43 4B 53 55 4D |.....:."CHECKSUM| 00000180: 20 45 52 52 4F 52 2C 20 43 48 45 43 4B 20 59 4F | ERROR, CHECK YO| 00000190: 55 52 20 44 41 54 41 20 53 54 41 54 45 4D 45 4E |UR DATA STATEMEN| 000001A0: 54 53 22 3A 45 B2 31 3A 8D 32 31 30 3A 80 00 C0 |TS":E.1:.210:...| 000001B0: 1D 96 00 41 24 B2 22 22 3A 99 C7 28 31 34 37 29 |...A$."":..(147)| 000001C0: 00 09 1E A0 00 99 3A 99 22 43 4F 4D 50 4C 45 54 |......:."COMPLET| 000001D0: 45 44 20 57 4F 55 4C 44 20 59 4F 55 20 4C 49 4B |ED WOULD YOU LIK| 000001E0: 45 20 54 4F 20 53 41 56 45 20 54 48 49 53 20 20 |E TO SAVE THIS | 000001F0: 20 54 4F 20 41 4E 4F 54 48 45 52 20 44 49 53 4B | TO ANOTHER DISK| 00000200: 3F 20 20 28 59 2F 4E 29 22 00 1F 1E AA 00 A1 20 |? (Y/N)"...... | 00000210: 41 24 3A 8B 20 41 24 B2 22 22 A7 20 31 37 30 00 |A$:. A$."". 170.| 00000220: 30 1E B4 00 8B 20 41 24 B3 B1 22 59 22 A7 20 80 |0.... A$.."Y". .| 00000230: 00 36 1E BE 00 8A 00 47 1E C8 00 8B 45 B2 30 A7 |.6.....G....E.0.| 00000240: 99 C7 28 31 34 37 29 00 61 1E D2 00 A0 31 3A 9F |..(147).a....1:.| 00000250: 31 35 2C 38 2C 31 35 2C 22 49 30 3A 22 3A A0 31 |15,8,15,"I0:":.1| 00000260: 35 00 A9 1E DC 00 99 3A 99 22 53 43 52 41 54 43 |5......:."SCRATC| 00000270: 48 49 4E 47 20 55 4E 4E 45 57 20 36 34 20 2E 4F |HING UNNEW 64 .O| 00000280: 42 4A 20 20 20 20 20 20 20 20 20 20 22 3A 9F 31 |BJ ":.1| 00000290: 35 2C 38 2C 31 35 2C 22 53 30 3A 55 4E 4E 45 57 |5,8,15,"S0:UNNEW| 000002A0: 20 36 34 20 2E 4F 42 4A 22 00 C3 1E E6 00 98 31 | 64 .OBJ"......1| 000002B0: 35 2C 22 49 30 3A 22 3A A0 31 35 3A 8B 45 B2 31 |5,"I0:":.15:.E.1| 000002C0: A7 20 8E 00 F6 1E F0 00 99 3A 99 22 43 52 45 41 |. .......:."CREA| 000002D0: 54 49 4E 47 20 55 4E 4E 45 57 20 36 34 20 2E 4F |TING UNNEW 64 .O| 000002E0: 42 4A 20 4F 4E 20 54 48 49 53 20 44 49 53 4B 45 |BJ ON THIS DISKE| 000002F0: 54 54 45 22 3A 8E 00 FC 1E FA 00 8F 00 2B 1F 04 |TTE":........+..| 00000300: 01 8F 20 20 4F 50 43 4F 44 45 20 20 20 20 20 20 |.. OPCODE | 00000310: 20 20 20 20 20 53 4F 55 52 43 45 20 43 4F 44 45 | SOURCE CODE| 00000320: 20 20 20 43 4F 4D 4D 45 4E 54 53 00 5A 1F 0E 01 | COMMENTS.Z...| 00000330: 8F 20 20 2D 2D 2D 2D 2D 2D 20 20 20 20 20 20 20 |. ------ | 00000340: 20 20 20 20 2D 2D 2D 2D 2D 2D 20 2D 2D 2D 2D 20 | ------ ---- | 00000350: 20 20 2D 2D 2D 2D 2D 2D 2D 2D 00 60 1F 18 01 8F | --------.`....| 00000360: 00 9D 1F 22 01 83 20 30 36 30 2C 30 30 33 20 20 |...".. 060,003 | 00000370: 20 20 20 3A 8F 20 20 4F 52 47 20 24 30 33 33 43 | :. ORG $033C| 00000380: 20 20 20 20 20 50 52 4F 47 52 41 4D 20 53 54 41 | PROGRAM STA| 00000390: 52 54 49 4E 47 20 41 44 44 52 45 53 53 00 D8 1F |RTING ADDRESS...| 000003A0: 2C 01 83 20 31 36 39 2C 30 30 30 20 20 20 20 20 |,.. 169,000 | 000003B0: 3A 8F 20 20 4C 44 41 20 23 30 30 20 20 20 20 20 |:. LDA #00 | 000003C0: 20 20 45 4E 44 20 4F 46 20 42 41 53 49 43 20 4C | END OF BASIC L| 000003D0: 49 4E 45 20 46 4C 41 47 00 13 20 36 01 83 20 31 |INE FLAG.. 6.. 1| 000003E0: 36 38 20 20 20 20 20 20 20 20 20 3A 8F 20 20 54 |68 :. T| 000003F0: 41 59 20 20 20 20 20 20 20 20 20 20 20 5A 45 52 |AY ZER| 00000400: 4F 20 54 48 45 20 49 4E 44 45 58 20 50 4F 49 4E |O THE INDEX POIN| 00000410: 54 45 52 00 5C 20 40 01 83 20 31 39 38 2C 30 34 |TER.\ @.. 198,04| 00000420: 33 20 20 20 20 20 3A 8F 20 20 44 45 43 20 24 32 |3 :. DEC $2| 00000430: 42 20 20 20 20 20 20 20 53 45 54 20 50 52 4F 47 |B SET PROG| 00000440: 52 41 4D 20 53 54 41 52 54 20 54 4F 20 50 52 4F |RAM START TO PRO| 00000450: 47 52 41 4D 20 53 54 41 52 54 2D 31 00 9B 20 4A |GRAM START-1.. J| 00000460: 01 83 20 31 34 35 2C 30 34 33 20 20 20 20 20 3A |.. 145,043 :| 00000470: 8F 20 20 53 54 41 20 28 24 32 42 29 2C 59 20 20 |. STA ($2B),Y | 00000480: 20 53 45 54 20 45 4E 44 20 4F 46 20 42 41 53 49 | SET END OF BASI| 00000490: 43 20 4C 49 4E 45 20 46 4C 41 47 00 E0 20 54 01 |C LINE FLAG.. T.| 000004A0: 83 20 32 33 30 2C 30 34 33 20 20 20 20 20 3A 8F |. 230,043 :.| 000004B0: 20 20 49 4E 43 20 24 32 42 20 20 20 20 20 20 20 | INC $2B | 000004C0: 52 45 53 54 4F 52 45 20 50 52 4F 47 52 41 4D 20 |RESTORE PROGRAM | 000004D0: 53 54 41 52 54 49 4E 47 20 41 44 44 52 45 53 53 |STARTING ADDRESS| 000004E0: 00 16 21 5E 01 83 20 31 36 39 2C 30 30 31 20 20 |..!^.. 169,001 | 000004F0: 20 20 20 3A 8F 20 20 4C 44 41 20 23 24 30 31 20 | :. LDA #$01 | 00000500: 20 20 20 20 20 50 53 45 55 44 4F 20 4C 49 4E 45 | PSEUDO LINE| 00000510: 20 4C 49 4E 4B 53 00 57 21 68 01 83 20 31 34 35 | LINKS.W!h.. 145| 00000520: 2C 30 34 33 20 20 20 20 20 3A 8F 20 20 53 54 41 |,043 :. STA| 00000530: 20 28 24 32 42 29 2C 59 20 20 20 53 41 56 45 20 | ($2B),Y SAVE | 00000540: 41 53 20 50 53 45 55 44 4F 20 4C 49 4E 45 20 4C |AS PSEUDO LINE L| 00000550: 49 4E 4B 20 4C 53 42 00 9A 21 72 01 83 20 32 30 |INK LSB..!r.. 20| 00000560: 30 20 20 20 20 20 20 20 20 20 3A 8F 20 20 49 4E |0 :. IN| 00000570: 59 20 20 20 20 20 20 20 20 20 20 20 49 4E 43 52 |Y INCR| 00000580: 45 4D 45 4E 54 20 49 4E 44 45 58 20 50 4F 49 4E |EMENT INDEX POIN| 00000590: 54 45 52 20 54 4F 20 4D 53 42 00 DB 21 7C 01 83 |TER TO MSB..!|..| 000005A0: 20 31 34 35 2C 30 34 33 20 20 20 20 20 3A 8F 20 | 145,043 :. | 000005B0: 20 53 54 41 20 28 24 32 42 29 2C 59 20 20 20 53 | STA ($2B),Y S| 000005C0: 41 56 45 20 41 53 20 50 53 45 55 44 4F 20 4C 49 |AVE AS PSEUDO LI| 000005D0: 4E 45 20 4C 49 4E 4B 20 4D 53 42 00 16 22 81 01 |NE LINK MSB.."..| 000005E0: 83 20 30 33 32 2C 30 35 31 2C 31 36 35 20 3A 8F |. 032,051,165 :.| 000005F0: 20 20 4A 53 52 20 24 41 35 33 33 20 20 20 20 20 | JSR $A533 | 00000600: 52 45 4C 49 4E 4B 20 54 48 45 20 42 41 53 49 43 |RELINK THE BASIC| 00000610: 20 4C 49 4E 45 53 00 53 22 86 01 83 20 32 34 20 | LINES.S"... 24 | 00000620: 20 20 20 20 20 20 20 20 20 3A 8F 20 20 43 4C 43 | :. CLC| 00000630: 20 20 20 20 20 20 20 20 20 20 20 43 4C 45 41 52 | CLEAR| 00000640: 20 43 41 52 52 59 20 46 4F 52 20 41 44 44 49 54 | CARRY FOR ADDIT| 00000650: 49 4F 4E 00 95 22 87 01 83 20 31 36 35 2C 30 33 |ION.."... 165,03| 00000660: 34 20 20 20 20 20 3A 8F 20 20 4C 44 41 20 24 32 |4 :. LDA $2| 00000670: 32 20 20 20 20 20 20 20 47 45 54 20 4C 53 42 20 |2 GET LSB | 00000680: 4F 46 20 54 48 45 20 4C 41 53 54 20 4C 49 4E 45 |OF THE LAST LINE| 00000690: 20 4C 49 4E 4B 00 D7 22 88 01 83 20 31 36 34 2C | LINK.."... 164,| 000006A0: 30 33 35 20 20 20 20 20 3A 8F 20 20 4C 44 59 20 |035 :. LDY | 000006B0: 24 32 33 20 20 20 20 20 20 20 47 45 54 20 4D 53 |$23 GET MS| 000006C0: 42 20 4F 46 20 54 48 45 20 4C 41 53 54 20 4C 49 |B OF THE LAST LI| 000006D0: 4E 45 20 4C 49 4E 4B 00 23 23 89 01 83 20 31 30 |NE LINK.##... 10| 000006E0: 35 2C 30 30 32 20 20 20 20 20 3A 8F 20 20 41 44 |5,002 :. AD| 000006F0: 43 20 23 32 20 20 20 20 20 20 20 20 4D 4F 56 45 |C #2 MOVE| 00000700: 20 50 41 53 54 20 54 48 45 20 4D 53 42 20 4F 46 | PAST THE MSB OF| 00000710: 20 54 48 45 20 4C 41 53 54 20 4C 49 4E 45 20 4C | THE LAST LINE L| 00000720: 49 4E 4B 00 6E 23 8A 01 83 20 31 34 34 2C 30 30 |INK.n#... 144,00| 00000730: 31 20 20 20 20 20 3A 8F 20 20 42 43 43 20 4F 52 |1 :. BCC OR| 00000740: 47 2B 32 39 20 20 20 20 49 46 20 4E 4F 2C 20 43 |G+29 IF NO, C| 00000750: 41 52 52 59 20 4F 56 45 52 20 46 52 4F 4D 20 41 |ARRY OVER FROM A| 00000760: 44 44 49 54 49 4F 4E 20 42 52 41 4E 43 48 00 AD |DDITION BRANCH..| 00000770: 23 8B 01 83 20 32 30 30 20 20 20 20 20 20 20 20 |#... 200 | 00000780: 20 3A 8F 20 20 49 4E 59 20 20 20 20 20 20 20 20 | :. INY | 00000790: 20 20 20 43 41 52 52 59 20 4F 56 45 52 2C 20 41 | CARRY OVER, A| 000007A0: 44 44 20 4F 4E 45 20 54 4F 20 4D 53 42 00 ED 23 |DD ONE TO MSB..#| 000007B0: 90 01 83 20 31 33 33 2C 30 34 35 20 20 20 20 20 |... 133,045 | 000007C0: 3A 8F 20 20 53 54 41 20 24 32 44 20 20 20 20 20 |:. STA $2D | 000007D0: 20 20 53 41 56 45 20 54 48 45 20 45 4E 44 20 4F | SAVE THE END O| 000007E0: 46 20 54 48 45 20 50 52 4F 47 52 41 4D 00 31 24 |F THE PROGRAM.1$| 000007F0: 91 01 83 20 31 33 32 2C 30 34 36 20 20 20 20 20 |... 132,046 | 00000800: 3A 8F 20 20 53 54 59 20 24 32 45 20 20 20 20 20 |:. STY $2E | 00000810: 20 20 50 4F 49 4E 54 45 52 53 20 46 4F 52 20 53 | POINTERS FOR S| 00000820: 41 56 45 20 45 54 43 2E 2E 43 4F 4D 4D 41 4E 44 |AVE ETC..COMMAND| 00000830: 53 00 72 24 9A 01 83 20 30 37 36 2C 31 31 36 2C |S.r$... 076,116,| 00000840: 31 36 34 20 3A 8F 20 20 4A 4D 50 20 24 41 34 37 |164 :. JMP $A47| 00000850: 34 20 20 20 20 20 50 52 49 4E 54 20 27 52 45 41 |4 PRINT 'REA| 00000860: 44 59 2E 27 20 54 4F 20 54 48 45 20 53 43 52 45 |DY.' TO THE SCRE| 00000870: 45 4E 00 00 00 |EN... |
.. .... 53280,1:. 53281,0:.646,1.9....G(
147):E.0:.210:C.0.G....15,8,15,"I0:":.1,
8,8,"UNNEW 64 .OBJ,P,W"...(..I.1.38:C.C.
1:.C.15.C.1...2.:.A:CK.CK.A...<.::.15,EN
,EM$,ET,ES:. EN..0.E.1:.210.H.F.. E.0.90
...P..:."DISK DRIVE ERROR "EM$:....Z.:
.53281,C:. 53280,C...D..1,G(A);.@.N..:.5
3281,0:.53280,0: 1:.15,"I0:": 15:.G(147)
.F.X..CK..3682. .53280,2:.53281,2:.140.O
....150......:."CHECKSUM ERROR, CHECK YO
UR DATA STATEMENTS":E.1:.210:......A$.""
:.G(147)... ..:."COMPLETED WOULD YOU LIK
E TO SAVE THIS TO ANOTHER DISK? (Y/N)
"...... A$:. A$."". 170.0.... A$.."Y". .
.6.....G.H..E.0..G(147).A.R. 1:.15,8,15,
"I0:": 15......:."SCRATCHING UNNEW 64 .O
BJ ":.15,8,15,"S0:UNNEW 64 .OBJ
".C....15,"I0:": 15:.E.1. .......:."CREA
TING UNNEW 64 .OBJ ON THIS DISKETTE":...
.....+.... OPCODE SOURCE CODE
COMMENTS.Z.... ------ ----
-- ---- --------.`.......".. 060,003
:. ORG $033C PROGRAM STARTING AD
DRESS.X.,.. 169,000 :. LDA #00
END OF BASIC LINE FLAG.. 6.. 168
:. TAY ZERO THE INDEX POIN
TER.\ @.. 198,043 :. DEC $2B
SET PROGRAM START TO PROGRAM START-1.. J
.. 145,043 :. STA ($2B),Y SET END
OF BASIC LINE FLAG.. T.. 230,043 :.
INC $2B RESTORE PROGRAM STARTING
ADDRESS..!^.. 169,001 :. LDA #$01
PSEUDO LINE LINKS.W!H.. 145,043
:. STA ($2B),Y SAVE AS PSEUDO LINE L
INK LSB..!R.. 200 :. INY
INCREMENT INDEX POINTER TO MSB..!|..
145,043 :. STA ($2B),Y SAVE AS P
SEUDO LINE LINK MSB.."... 032,051,165 :.
JSR $A533 RELINK THE BASIC LINES.S
"... 24 :. CLC CLEAR
CARRY FOR ADDITION.."... 165,034 :.
LDA $22 GET LSB OF THE LAST LINE
LINK.W"... 164,035 :. LDY $23
GET MSB OF THE LAST LINE LINK.##... 10
5,002 :. ADC #2 MOVE PAST TH
E MSB OF THE LAST LINE LINK.N#... 144,00
1 :. BCC ORG+29 IF NO, CARRY OVE
R FROM ADDITION BRANCH..#... 200
:. INY CARRY OVER, ADD ONE T
O MSB..#... 133,045 :. STA $2D
SAVE THE END OF THE PROGRAM.1$... 132,
046 :. STY $2E POINTERS FOR S
AVE ETC..COMMANDS.R$... 076,116,164 :.
JMP $A474 PRINT 'READY.' TO THE SCRE
EN...
> CLICK IMAGE PREVIEW FOR FULL MODAL