SCROLLING.SEQ
FILE INFORMATION
FILENAME(S): SCROLLING.SEQ
FILE TYPE(S): SEQ
FILE SIZE: 1.6K
FIRST SEEN: 2025-11-30 18:06:03
APPEARS ON: 1 disk(s)
FILE HASH
dbb05de1f738c6b4f9e3c1925457a812f09f686cdb69b0e449f52726fbb96114
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TIGERDISK NUMMER | SCROLLING.SEQ | SEQ | Xii | 34 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 20 20 20 20 20 20 20 20 20 2A 3D 20 24 31 30 |. *= $10| 00000010: 30 30 0D 0D 20 20 20 20 20 20 20 20 20 53 45 49 |00.. SEI| 00000020: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 |. LDA #$| 00000030: 37 46 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |7F. STA | 00000040: 24 44 43 30 44 0D 20 20 20 20 20 20 20 20 20 4C |$DC0D. L| 00000050: 44 41 20 23 24 31 42 0D 20 20 20 20 20 20 20 20 |DA #$1B. | 00000060: 20 53 54 41 20 24 44 30 31 31 0D 20 20 20 20 20 | STA $D011. | 00000070: 20 20 20 20 4C 44 41 20 23 24 30 31 0D 20 20 20 | LDA #$01. | 00000080: 20 20 20 20 20 20 53 54 41 20 24 44 30 31 41 0D | STA $D01A.| 00000090: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 43 | LDA #$C| 000000A0: 37 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |7. STA $| 000000B0: 44 30 31 36 0D 20 20 20 20 20 20 20 20 20 53 54 |D016. ST| 000000C0: 41 20 5A 50 31 0D 20 20 20 20 20 20 20 20 20 4C |A ZP1. L| 000000D0: 44 41 20 23 3C 53 43 52 4F 4C 4C 0D 20 20 20 20 |DA #<SCROLL. | 000000E0: 20 20 20 20 20 53 54 41 20 24 30 33 31 34 0D 20 | STA $0314. | 000000F0: 20 20 20 20 20 20 20 20 4C 44 41 20 23 3E 53 43 | LDA #>SC| 00000100: 52 4F 4C 4C 0D 20 20 20 20 20 20 20 20 20 53 54 |ROLL. ST| 00000110: 41 20 24 30 33 31 35 0D 20 20 20 20 20 20 20 20 |A $0315. | 00000120: 20 43 4C 49 0D 20 20 20 20 20 20 20 20 20 52 54 | CLI. RT| 00000130: 53 0D 53 43 52 4F 4C 4C 20 20 20 4C 44 41 20 23 |S.SCROLL LDA #| 00000140: 24 30 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 |$01. STA| 00000150: 20 24 44 30 31 39 0D 20 20 20 20 20 20 20 20 20 | $D019. | 00000160: 4C 44 41 20 5A 50 32 0D 20 20 20 20 20 20 20 20 |LDA ZP2. | 00000170: 20 42 4E 45 20 53 43 31 0D 20 20 20 20 20 20 20 | BNE SC1. | 00000180: 20 20 4C 44 41 20 23 24 30 31 0D 20 20 20 20 20 | LDA #$01. | 00000190: 20 20 20 20 53 54 41 20 5A 50 32 0D 20 20 20 20 | STA ZP2. | 000001A0: 20 20 20 20 20 4C 44 41 20 5A 50 31 0D 20 20 20 | LDA ZP1. | 000001B0: 20 20 20 20 20 20 53 54 41 20 24 44 30 31 36 0D | STA $D016.| 000001C0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 | LDA #$0| 000001D0: 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |0. STA $| 000001E0: 44 30 31 32 0D 20 20 20 20 20 20 20 20 20 4A 4D |D012. JM| 000001F0: 50 20 24 45 41 33 31 0D 53 43 31 20 20 20 20 20 |P $EA31.SC1 | 00000200: 20 4C 44 41 20 23 24 30 30 0D 20 20 20 20 20 20 | LDA #$00. | 00000210: 20 20 20 53 54 41 20 5A 50 32 0D 20 20 20 20 20 | STA ZP2. | 00000220: 20 20 20 20 4C 44 41 20 23 24 43 38 0D 20 20 20 | LDA #$C8. | 00000230: 20 20 20 20 20 20 53 54 41 20 24 44 30 31 36 0D | STA $D016.| 00000240: 20 20 20 20 20 20 20 20 20 44 45 43 20 5A 50 31 | DEC ZP1| 00000250: 0D 20 20 20 20 20 20 20 20 20 44 45 43 20 5A 50 |. DEC ZP| 00000260: 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 5A |1. LDA Z| 00000270: 50 31 0D 20 20 20 20 20 20 20 20 20 43 4D 50 20 |P1. CMP | 00000280: 23 24 42 46 0D 20 20 20 20 20 20 20 20 20 42 45 |#$BF. BE| 00000290: 51 20 53 43 32 0D 20 20 20 20 20 20 20 20 20 4C |Q SC2. L| 000002A0: 44 41 20 23 24 46 32 0D 20 20 20 20 20 20 20 20 |DA #$F2. | 000002B0: 20 53 54 41 20 24 44 30 31 32 0D 20 20 20 20 20 | STA $D012. | 000002C0: 20 20 20 20 4A 4D 50 20 24 45 41 33 31 0D 53 43 | JMP $EA31.SC| 000002D0: 32 20 20 20 20 20 20 4C 44 59 20 23 30 0D 53 43 |2 LDY #0.SC| 000002E0: 33 20 20 20 20 20 20 4C 44 41 20 31 39 38 35 2C |3 LDA 1985,| 000002F0: 59 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 31 |Y. STA 1| 00000300: 39 38 34 2C 59 0D 20 20 20 20 20 20 20 20 20 49 |984,Y. I| 00000310: 4E 59 0D 20 20 20 20 20 20 20 20 20 43 50 59 20 |NY. CPY | 00000320: 23 34 30 0D 20 20 20 20 20 20 20 20 20 42 4E 45 |#40. BNE| 00000330: 20 53 43 33 0D 0D 4E 45 58 54 43 48 41 52 20 4C | SC3..NEXTCHAR L| 00000340: 44 41 20 54 45 58 54 0D 20 20 20 20 20 20 20 20 |DA TEXT. | 00000350: 20 43 4D 50 20 23 31 36 30 0D 20 20 20 20 20 20 | CMP #160. | 00000360: 20 20 20 42 45 51 20 41 4E 46 41 4E 47 0D 20 20 | BEQ ANFANG. | 00000370: 20 20 20 20 20 20 20 53 54 41 20 24 30 37 45 37 | STA $07E7| 00000380: 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 53 43 |. JMP SC| 00000390: 34 0D 0D 41 4E 46 41 4E 47 20 20 20 4C 44 41 20 |4..ANFANG LDA | 000003A0: 23 3C 54 45 58 54 0D 20 20 20 20 20 20 20 20 20 |#<TEXT. | 000003B0: 53 54 41 20 4E 45 58 54 43 48 41 52 2B 31 0D 20 |STA NEXTCHAR+1. | 000003C0: 20 20 20 20 20 20 20 20 4C 44 41 20 23 3E 54 45 | LDA #>TE| 000003D0: 58 54 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |XT. STA | 000003E0: 4E 45 58 54 43 48 41 52 2B 32 0D 20 20 20 20 20 |NEXTCHAR+2. | 000003F0: 20 20 20 20 4A 4D 50 20 53 43 35 0D 53 43 34 20 | JMP SC5.SC4 | 00000400: 20 20 20 20 20 49 4E 43 20 4E 45 58 54 43 48 41 | INC NEXTCHA| 00000410: 52 2B 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 |R+1. LDA| 00000420: 20 4E 45 58 54 43 48 41 52 2B 31 0D 20 20 20 20 | NEXTCHAR+1. | 00000430: 20 20 20 20 20 42 4E 45 20 53 43 35 0D 20 20 20 | BNE SC5. | 00000440: 20 20 20 20 20 20 49 4E 43 20 4E 45 58 54 43 48 | INC NEXTCH| 00000450: 41 52 2B 32 0D 53 43 35 20 20 20 20 20 20 4C 44 |AR+2.SC5 LD| 00000460: 41 20 23 24 46 32 0D 20 20 20 20 20 20 20 20 20 |A #$F2. | 00000470: 53 54 41 20 24 44 30 31 32 0D 20 20 20 20 20 20 |STA $D012. | 00000480: 20 20 20 4C 44 41 20 23 24 43 37 0D 20 20 20 20 | LDA #$C7. | 00000490: 20 20 20 20 20 53 54 41 20 5A 50 31 0D 20 20 20 | STA ZP1. | 000004A0: 20 20 20 20 20 20 4A 4D 50 20 24 45 41 33 31 0D | JMP $EA31.| 000004B0: 0D 50 46 31 20 20 20 20 20 20 2E 42 59 54 45 20 |.PF1 .BYTE | 000004C0: 30 0D 50 46 32 20 20 20 20 20 20 2E 42 59 54 45 |0.PF2 .BYTE| 000004D0: 20 30 0D 5A 50 31 20 20 20 20 20 20 2E 42 59 54 | 0.ZP1 .BYT| 000004E0: 45 20 30 0D 5A 50 32 20 20 20 20 20 20 2E 42 59 |E 0.ZP2 .BY| 000004F0: 54 45 20 30 0D 0D 0D 54 45 58 54 0D 20 20 20 20 |TE 0...TEXT. | 00000500: 20 20 20 20 20 2E 54 45 58 54 20 22 14 08 09 13 | .TEXT "....| 00000510: 20 09 13 20 01 20 14 05 13 14 20 06 0F 12 20 22 | .. . .... ... "| 00000520: 0D 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 20 |. .TEXT | 00000530: 22 14 08 05 20 13 03 12 0F 0C 0C 2D 12 0F 15 14 |"... ......-....| 00000540: 09 0E 05 20 22 0D 20 20 20 20 20 20 20 20 20 2E |... ". .| 00000550: 54 45 58 54 20 22 17 12 09 14 14 05 0E 20 09 0E |TEXT "....... ..| 00000560: 20 31 39 39 34 20 02 19 20 22 0D 20 20 20 20 20 | 1994 .. ". | 00000570: 20 20 20 20 2E 54 45 58 54 20 22 20 0D 01 04 12 | .TEXT " ....| 00000580: 0F 0D 2F 14 09 07 05 12 2D 03 12 05 17 2F 22 0D |../.....-..../".| 00000590: 20 20 20 20 20 20 20 20 20 2E 54 45 58 54 20 22 | .TEXT "| 000005A0: 03 12 05 01 0D 20 20 2E 2E 2E 20 02 19 05 20 2E |..... ... ... .| 000005B0: 2E 2E 20 22 0D 20 20 20 20 20 20 20 20 20 2E 54 |.. ". .T| 000005C0: 45 58 54 20 22 20 20 20 20 20 20 20 20 20 20 20 |EXT " | 000005D0: 20 20 20 20 20 20 20 20 22 0D 0D 20 20 20 20 20 | ".. | 000005E0: 20 20 20 20 2E 42 59 54 45 20 31 36 30 2C 31 36 | .BYTE 160,16| 000005F0: 30 2C 31 36 30 0D 0D 3B 2D 2D 2D 2D 2D 2D 2D 2D |0,160..;--------| 00000600: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------| 00000610: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D |---------------.| 00000620: 3B 52 4F 55 54 49 4E 45 20 57 52 49 54 54 45 4E |;ROUTINE WRITTEN| 00000630: 20 49 4E 20 27 39 34 20 42 59 20 4D 41 44 52 4F | IN '94 BY MADRO| 00000640: 4D 2F 43 52 4D 2F 54 43 0D 0D |M/CRM/TC.. |
. *= $1000.. SEI.
LDA #$7F. STA $DC0D. L
DA #$1B. STA $D011. LDA
#$01. STA $D01A. LDA #$C
7. STA $D016. STA ZP1.
LDA #<SCROLL. STA $0314.
LDA #>SCROLL. STA $0315.
CLI. RTS.SCROLL LDA #
$01. STA $D019. LDA ZP2.
BNE SC1. LDA #$01.
STA ZP2. LDA ZP1. ST
A $D016. LDA #$00. STA $
D012. JMP $EA31.SC1 LDA #$0
0. STA ZP2. LDA #$C8.
STA $D016. DEC ZP1.
DEC ZP1. LDA ZP1. CMP
#$BF. BEQ SC2. LDA #$F2.
STA $D012. JMP $EA31.SC
2 LDY #0.SC3 LDA 1985,Y.
STA 1984,Y. INY. CPY
#40. BNE SC3..NEXTCHAR LDA TEXT.
CMP #160. BEQ ANFANG.
STA $07E7. JMP SC4..ANFAN
G LDA #<TEXT. STA NEXTCHAR+1.
LDA #>TEXT. STA NEXTCHAR
+2. JMP SC5.SC4 INC NEXTCHA
R+1. LDA NEXTCHAR+1. BNE
SC5. INC NEXTCHAR+2.SC5 LD
A #$F2. STA $D012. LDA #
$C7. STA ZP1. JMP $EA31.
.PF1 .BYTE 0.PF2 .BYTE 0.ZP1
.BYTE 0.ZP2 .BYTE 0...TEXT.
.TEXT ".... .. . .... ... ".
.TEXT "... ......-....... ". .
TEXT "....... .. 1994 .. ". .TEX
T " ....../.....-..../". .TEXT "
..... ... ... ... ". .TEXT "
".. .BYTE 160,16
0,160..;--------------------------------
-------.;ROUTINE WRITTEN IN '94 BY MADRO
M/CRM/TC..
> CLICK IMAGE PREVIEW FOR FULL MODAL