DEMO.1
FILE INFORMATION
FILENAME(S): DEMO.1
FILE TYPE(S): SEQ
FILE SIZE: 1.7K
FIRST SEEN: 2025-11-30 16:59:38
APPEARS ON: 1 disk(s)
FILE HASH
134d5aa5b09d89f752c3e698e9ccf1004e3b60a174cb59a96f1cbde068f67e79
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TURBO MAC | DEMO.1 | SEQ | High Voltage Complete C64 Collection | 9 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 20 20 20 20 20 20 20 20 2E 50 52 4F 46 46 0D | .PROFF.| 00000010: 20 20 20 20 20 20 20 20 20 2A 3D 20 24 32 30 30 | *= $200| 00000020: 30 0D 0D 54 49 4D 45 20 20 20 20 20 2E 53 45 47 |0..TIME .SEG| 00000030: 4D 45 4E 54 0D 20 20 20 20 20 20 20 20 20 2E 49 |MENT. .I| 00000040: 46 20 5C 31 2F 32 2A 32 2D 5C 31 0D 20 20 20 20 |F \1/2*2-\1. | 00000050: 20 20 20 20 20 4C 44 41 20 31 0D 20 20 20 20 20 | LDA 1. | 00000060: 20 20 20 20 23 4D 4F 50 20 5C 31 2D 33 0D 20 20 | #MOP \1-3. | 00000070: 20 20 20 20 20 20 20 2E 45 4E 44 49 46 0D 20 20 | .ENDIF. | 00000080: 20 20 20 20 20 20 20 2E 49 46 45 51 20 5C 31 2F | .IFEQ \1/| 00000090: 32 2A 32 2D 5C 31 0D 20 20 20 20 20 20 20 20 20 |2*2-\1. | 000000A0: 23 4D 4F 50 20 5C 31 0D 20 20 20 20 20 20 20 20 |#MOP \1. | 000000B0: 20 2E 45 4E 44 49 46 0D 20 20 20 20 20 20 20 20 | .ENDIF. | 000000C0: 20 2E 45 4E 44 4D 0D 0D 4D 4F 50 20 20 20 20 20 | .ENDM..MOP | 000000D0: 20 2E 53 45 47 4D 45 4E 54 0D 20 20 20 20 20 20 | .SEGMENT. | 000000E0: 20 20 20 2E 49 46 20 5C 31 2D 32 0D 20 20 20 20 | .IF \1-2. | 000000F0: 20 20 20 20 20 23 4D 4F 50 20 5C 31 2D 32 0D 20 | #MOP \1-2. | 00000100: 20 20 20 20 20 20 20 20 2E 45 4E 44 49 46 0D 20 | .ENDIF. | 00000110: 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 | NOP. | 00000120: 20 20 20 20 20 2E 45 4E 44 4D 0D 0D 20 20 20 20 | .ENDM.. | 00000130: 20 20 20 20 20 53 45 49 0D 20 20 20 20 20 20 20 | SEI. | 00000140: 20 20 4C 44 41 20 23 30 0D 20 20 20 20 20 20 20 | LDA #0. | 00000150: 20 20 53 54 41 20 24 44 30 31 31 0D 0D 4E 45 58 | STA $D011..NEX| 00000160: 54 53 48 4F 57 0D 42 4C 4F 43 4B 53 20 20 20 2E |TSHOW.BLOCKS .| 00000170: 56 41 52 20 32 34 0D 53 48 4F 57 20 20 20 20 20 |VAR 24.SHOW | 00000180: 2E 4C 42 4C 0D 20 20 20 20 20 20 20 20 20 4A 53 |.LBL. JS| 00000190: 52 20 50 41 47 45 4C 45 46 54 0D 42 4C 4F 43 4B |R PAGELEFT.BLOCK| 000001A0: 53 20 20 20 2E 56 41 52 20 42 4C 4F 43 4B 53 2D |S .VAR BLOCKS-| 000001B0: 31 0D 20 20 20 20 20 20 20 20 20 2E 49 46 20 42 |1. .IF B| 000001C0: 4C 4F 43 4B 53 0D 20 20 20 20 20 20 20 20 20 2E |LOCKS. .| 000001D0: 47 4F 54 4F 20 53 48 4F 57 0D 20 20 20 20 20 20 |GOTO SHOW. | 000001E0: 20 20 20 2E 45 4E 44 49 46 0D 20 20 20 20 20 20 | .ENDIF. | 000001F0: 20 20 20 2E 42 4C 4F 43 4B 0D 42 4C 4F 43 4B 53 | .BLOCK.BLOCKS| 00000200: 20 20 20 2E 56 41 52 20 32 34 0D 53 48 4F 57 20 | .VAR 24.SHOW | 00000210: 20 20 20 20 2E 4C 42 4C 0D 20 20 20 20 20 20 20 | .LBL. | 00000220: 20 20 4A 53 52 20 50 41 47 45 44 4F 57 4E 0D 42 | JSR PAGEDOWN.B| 00000230: 4C 4F 43 4B 53 20 20 20 2E 56 41 52 20 42 4C 4F |LOCKS .VAR BLO| 00000240: 43 4B 53 2D 31 0D 20 20 20 20 20 20 20 20 20 2E |CKS-1. .| 00000250: 49 46 20 42 4C 4F 43 4B 53 0D 20 20 20 20 20 20 |IF BLOCKS. | 00000260: 20 20 20 2E 47 4F 54 4F 20 53 48 4F 57 0D 20 20 | .GOTO SHOW. | 00000270: 20 20 20 20 20 20 20 2E 45 4E 44 49 46 0D 20 20 | .ENDIF. | 00000280: 20 20 20 20 20 20 20 2E 42 45 4E 44 0D 20 20 20 | .BEND. | 00000290: 20 20 20 20 20 20 2E 42 4C 4F 43 4B 0D 42 4C 4F | .BLOCK.BLO| 000002A0: 43 4B 53 20 20 20 2E 56 41 52 20 32 34 0D 53 48 |CKS .VAR 24.SH| 000002B0: 4F 57 20 20 20 20 20 2E 4C 42 4C 0D 20 20 20 20 |OW .LBL. | 000002C0: 20 20 20 20 20 4A 53 52 20 50 41 47 45 52 49 47 | JSR PAGERIG| 000002D0: 48 54 0D 42 4C 4F 43 4B 53 20 20 20 2E 56 41 52 |HT.BLOCKS .VAR| 000002E0: 20 42 4C 4F 43 4B 53 2D 31 0D 20 20 20 20 20 20 | BLOCKS-1. | 000002F0: 20 20 20 2E 49 46 20 42 4C 4F 43 4B 53 0D 20 20 | .IF BLOCKS. | 00000300: 20 20 20 20 20 20 20 2E 47 4F 54 4F 20 53 48 4F | .GOTO SHO| 00000310: 57 0D 20 20 20 20 20 20 20 20 20 2E 45 4E 44 49 |W. .ENDI| 00000320: 46 0D 20 20 20 20 20 20 20 20 20 2E 42 45 4E 44 |F. .BEND| 00000330: 0D 20 20 20 20 20 20 20 20 20 2E 42 4C 4F 43 4B |. .BLOCK| 00000340: 0D 42 4C 4F 43 4B 53 20 20 20 2E 56 41 52 20 32 |.BLOCKS .VAR 2| 00000350: 34 0D 53 48 4F 57 20 20 20 20 20 2E 4C 42 4C 0D |4.SHOW .LBL.| 00000360: 20 20 20 20 20 20 20 20 20 4A 53 52 20 50 41 47 | JSR PAG| 00000370: 45 53 43 48 52 4F 54 54 0D 42 4C 4F 43 4B 53 20 |ESCHROTT.BLOCKS | 00000380: 20 20 2E 56 41 52 20 42 4C 4F 43 4B 53 2D 31 0D | .VAR BLOCKS-1.| 00000390: 20 20 20 20 20 20 20 20 20 2E 49 46 20 42 4C 4F | .IF BLO| 000003A0: 43 4B 53 0D 20 20 20 20 20 20 20 20 20 2E 47 4F |CKS. .GO| 000003B0: 54 4F 20 53 48 4F 57 0D 20 20 20 20 20 20 20 20 |TO SHOW. | 000003C0: 20 2E 45 4E 44 49 46 0D 20 20 20 20 20 20 20 20 | .ENDIF. | 000003D0: 20 2E 42 45 4E 44 0D 0D 20 20 20 20 20 20 20 20 | .BEND.. | 000003E0: 20 23 54 49 4D 45 20 36 30 0D 20 20 20 20 20 20 | #TIME 60. | 000003F0: 20 20 20 4A 4D 50 20 4E 45 58 54 53 48 4F 57 0D | JMP NEXTSHOW.| 00000400: 0D 50 41 47 45 4C 45 46 54 20 23 54 49 4D 45 20 |.PAGELEFT #TIME | 00000410: 38 2B 32 34 0D 20 20 20 20 20 20 20 20 20 4A 4D |8+24. JM| 00000420: 50 20 4E 45 58 54 50 41 47 45 0D 50 41 47 45 52 |P NEXTPAGE.PAGER| 00000430: 49 47 48 54 20 23 54 49 4D 45 20 31 30 2B 32 34 |IGHT #TIME 10+24| 00000440: 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 4E 45 |. JMP NE| 00000450: 58 54 50 41 47 45 0D 50 41 47 45 44 4F 57 4E 20 |XTPAGE.PAGEDOWN | 00000460: 23 54 49 4D 45 20 39 2B 32 34 2B 36 33 0D 20 20 |#TIME 9+24+63. | 00000470: 20 20 20 20 20 20 20 23 54 49 4D 45 20 36 33 0D | #TIME 63.| 00000480: 20 20 20 20 20 20 20 20 20 4A 4D 50 20 4E 45 58 | JMP NEX| 00000490: 54 50 41 47 45 0D 50 41 47 45 53 43 48 52 4F 54 |TPAGE.PAGESCHROT| 000004A0: 54 20 4A 4D 50 20 4E 45 58 54 50 41 47 45 0D 0D |T JMP NEXTPAGE..| 000004B0: 4E 45 58 54 50 41 47 45 0D 42 4C 4F 43 4B 53 20 |NEXTPAGE.BLOCKS | 000004C0: 20 20 2E 56 41 52 20 32 34 0D 50 41 47 20 20 20 | .VAR 24.PAG | 000004D0: 20 20 20 2E 4C 42 4C 0D 20 20 20 20 20 20 20 20 | .LBL. | 000004E0: 20 4A 53 52 20 4E 45 57 5A 45 49 4C 0D 42 4C 4F | JSR NEWZEIL.BLO| 000004F0: 43 4B 53 20 20 20 2E 56 41 52 20 42 4C 4F 43 4B |CKS .VAR BLOCK| 00000500: 53 2D 31 0D 20 20 20 20 20 20 20 20 20 2E 49 46 |S-1. .IF| 00000510: 20 42 4C 4F 43 4B 53 0D 20 20 20 20 20 20 20 20 | BLOCKS. | 00000520: 20 2E 47 4F 54 4F 20 50 41 47 0D 20 20 20 20 20 | .GOTO PAG. | 00000530: 20 20 20 20 2E 45 4E 44 49 46 0D 20 20 20 20 20 | .ENDIF. | 00000540: 20 20 20 20 52 54 53 0D 0D 4E 45 57 5A 45 49 4C | RTS..NEWZEIL| 00000550: 0D 5A 45 49 4C 53 20 20 20 20 2E 56 41 52 20 31 |.ZEILS .VAR 1| 00000560: 33 2D 31 0D 42 4C 4F 43 4B 20 20 20 20 2E 4C 42 |3-1.BLOCK .LB| 00000570: 4C 0D 20 20 20 20 20 20 20 20 20 2E 42 4C 4F 43 |L. .BLOC| 00000580: 4B 0D 49 4E 54 20 20 20 20 20 20 2E 56 41 52 20 |K.INT .VAR | 00000590: 31 30 0D 49 5A 45 49 4C 20 20 20 20 2E 4C 42 4C |10.IZEIL .LBL| 000005A0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 49 |. LDA #I| 000005B0: 4E 54 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |NT. STA | 000005C0: 35 33 32 38 30 0D 49 4E 54 20 20 20 20 20 20 2E |53280.INT .| 000005D0: 56 41 52 20 49 4E 54 2D 31 0D 20 20 20 20 20 20 |VAR INT-1. | 000005E0: 20 20 20 2E 49 46 20 49 4E 54 0D 20 20 20 20 20 | .IF INT. | 000005F0: 20 20 20 20 2E 47 4F 54 4F 20 49 5A 45 49 4C 0D | .GOTO IZEIL.| 00000600: 20 20 20 20 20 20 20 20 20 2E 45 4E 44 49 46 0D | .ENDIF.| 00000610: 20 20 20 20 20 20 20 20 20 2E 42 45 4E 44 0D 20 | .BEND. | 00000620: 20 20 20 20 20 20 20 20 4C 44 41 20 31 0D 5A 45 | LDA 1.ZE| 00000630: 49 4C 53 20 20 20 20 2E 56 41 52 20 5A 45 49 4C |ILS .VAR ZEIL| 00000640: 53 2D 31 0D 20 20 20 20 20 20 20 20 20 2E 49 46 |S-1. .IF| 00000650: 20 5A 45 49 4C 53 0D 20 20 20 20 20 20 20 20 20 | ZEILS. | 00000660: 2E 47 4F 54 4F 20 42 4C 4F 43 4B 0D 20 20 20 20 |.GOTO BLOCK. | 00000670: 20 20 20 20 20 2E 45 4E 44 49 46 0D 20 20 20 20 | .ENDIF. | 00000680: 20 20 20 20 20 4C 44 41 20 23 30 0D 20 20 20 20 | LDA #0. | 00000690: 20 20 20 20 20 53 54 41 20 35 33 32 38 30 0D 20 | STA 53280. | 000006A0: 20 20 20 20 20 20 20 20 23 54 49 4D 45 20 34 33 | #TIME 43| 000006B0: 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D 3B 45 |. RTS.;E| 000006C0: 4E 44 0D 0D |ND.. |
.PROFF. *= $2000..TIME
.SEGMENT. .IF \1/2*2-\1.
LDA 1. #MOP \1-3. .
ENDIF. .IFEQ \1/2*2-\1.
#MOP \1. .ENDIF. .ENDM..
MOP .SEGMENT. .IF \1-2.
#MOP \1-2. .ENDIF.
NOP. .ENDM.. SEI.
LDA #0. STA $D011..NEXTSHOW.BL
OCKS .VAR 24.SHOW .LBL. JS
R PAGELEFT.BLOCKS .VAR BLOCKS-1.
.IF BLOCKS. .GOTO SHOW.
.ENDIF. .BLOCK.BLOCKS .VAR
24.SHOW .LBL. JSR PAGEDOWN.B
LOCKS .VAR BLOCKS-1. .IF BLOCK
S. .GOTO SHOW. .ENDIF.
.BEND. .BLOCK.BLOCKS .V
AR 24.SHOW .LBL. JSR PAGERIG
HT.BLOCKS .VAR BLOCKS-1. .IF B
LOCKS. .GOTO SHOW. .ENDI
F. .BEND. .BLOCK.BLOCKS
.VAR 24.SHOW .LBL. JSR PAG
ESCHROTT.BLOCKS .VAR BLOCKS-1.
.IF BLOCKS. .GOTO SHOW.
.ENDIF. .BEND.. #TIME 6
0. JMP NEXTSHOW..PAGELEFT #TIME
8+24. JMP NEXTPAGE.PAGERIGHT #TI
ME 10+24. JMP NEXTPAGE.PAGEDOWN
#TIME 9+24+63. #TIME 63.
JMP NEXTPAGE.PAGESCHROTT JMP NEXTPAGE..
NEXTPAGE.BLOCKS .VAR 24.PAG .LBL.
JSR NEWZEIL.BLOCKS .VAR BLOCK
S-1. .IF BLOCKS. .GOTO P
AG. .ENDIF. RTS..NEWZEIL
.ZEILS .VAR 13-1.BLOCK .LBL.
.BLOCK.INT .VAR 10.IZEIL .LBL
. LDA #INT. STA 53280.IN
T .VAR INT-1. .IF INT.
.GOTO IZEIL. .ENDIF.
.BEND. LDA 1.ZEILS .VAR ZEIL
S-1. .IF ZEILS. .GOTO BL
OCK. .ENDIF. LDA #0.
STA 53280. #TIME 43.
RTS.;END..
> CLICK IMAGE PREVIEW FOR FULL MODAL