42
FILE INFORMATION
FILENAME(S): 42
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 20:31:02
APPEARS ON: 1 disk(s)
FILE HASH
c02e2d80b434342dfc6ef7bdde885856df41c292bbee688191efe5ccd217659f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DR ZIG | 42 | PRG | Curtcool, Nigel | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 0D 20 20 20 20 20 20 20 20 20 2A 3D 20 24 31 |.. *= $1| 00000010: 30 30 30 0D 0D 0D 0D 20 20 20 20 20 20 20 20 20 |000.... | 00000020: 3B 20 49 4E 54 2E 20 53 54 41 52 54 45 52 0D 0D |; INT. STARTER..| 00000030: 0D 20 20 20 20 20 20 20 20 20 4C 44 58 20 23 24 |. LDX #$| 00000040: 30 30 0D 44 44 20 20 20 20 20 20 20 54 58 41 0D |00.DD TXA.| 00000050: 20 20 20 20 20 20 20 20 20 53 54 41 20 24 30 34 | STA $04| 00000060: 30 30 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E |00,X. IN| 00000070: 58 0D 20 20 20 20 20 20 20 20 20 43 50 58 20 23 |X. CPX #| 00000080: 34 39 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 |49. BNE | 00000090: 44 44 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 |DD. LDA | 000000A0: 23 32 34 0D 20 20 20 20 20 20 20 20 20 53 54 41 |#24. STA| 000000B0: 20 35 33 32 37 32 0D 0D 20 20 20 20 20 20 20 20 | 53272.. | 000000C0: 20 53 45 49 0D 20 20 20 20 20 20 20 20 20 4C 44 | SEI. LD| 000000D0: 41 20 23 24 30 31 0D 20 20 20 20 20 20 20 20 20 |A #$01. | 000000E0: 53 54 41 20 24 44 30 31 39 0D 20 20 20 20 20 20 |STA $D019. | 000000F0: 20 20 20 53 54 41 20 24 44 30 31 41 0D 20 20 20 | STA $D01A. | 00000100: 20 20 20 20 20 20 53 54 41 20 24 44 43 30 44 0D | STA $DC0D.| 00000110: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 24 31 | LDA #$1| 00000120: 42 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |B. STA $| 00000130: 44 30 31 31 0D 20 20 20 20 20 20 20 20 20 4C 44 |D011. LD| 00000140: 41 20 23 3C 49 4E 54 0D 20 20 20 20 20 20 20 20 |A #<INT. | 00000150: 20 4C 44 58 20 23 3E 49 4E 54 0D 20 20 20 20 20 | LDX #>INT. | 00000160: 20 20 20 20 53 54 41 20 24 30 33 31 34 0D 20 20 | STA $0314. | 00000170: 20 20 20 20 20 20 20 53 54 58 20 24 30 33 31 35 | STX $0315| 00000180: 0D 20 20 20 20 20 20 20 20 20 43 4C 49 0D 20 20 |. CLI. | 00000190: 20 20 20 20 20 20 20 52 54 53 0D 0D 0D 0D 49 4E | RTS....IN| 000001A0: 54 20 20 20 20 20 20 41 53 4C 20 24 44 30 31 39 |T ASL $D019| 000001B0: 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 31 |. LDA #1| 000001C0: 35 30 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 |50. STA | 000001D0: 24 44 30 31 32 0D 20 20 20 20 20 20 20 20 20 4A |$D012. J| 000001E0: 53 52 20 52 4F 4C 53 43 52 4F 0D 20 20 20 20 20 |SR ROLSCRO. | 000001F0: 20 20 20 20 4A 4D 50 20 24 45 41 33 31 0D 0D 0D | JMP $EA31...| 00000200: 0D 0D 0D 56 41 4C 30 31 20 20 20 20 3D 20 24 33 |...VAL01 = $3| 00000210: 33 0D 0D 48 45 4E 54 43 48 41 52 20 3D 20 24 44 |3..HENTCHAR = $D| 00000220: 30 30 30 0D 0D 53 43 52 4F 4C 4C 20 20 20 3D 20 |000..SCROLL = | 00000230: 24 32 30 30 30 0D 0D 0D 56 41 52 50 20 20 20 20 |$2000...VARP | 00000240: 20 2E 42 59 54 45 20 30 0D 0D 52 4F 4C 53 43 52 | .BYTE 0..ROLSCR| 00000250: 4F 20 20 3D 20 2A 0D 20 20 20 20 20 20 20 20 20 |O = *. | 00000260: 4C 44 41 20 56 41 52 50 0D 20 20 20 20 20 20 20 |LDA VARP. | 00000270: 20 20 42 45 51 20 4E 31 0D 20 20 20 20 20 20 20 | BEQ N1. | 00000280: 20 20 44 45 43 20 56 41 52 50 0D 20 20 20 20 20 | DEC VARP. | 00000290: 20 20 20 20 4A 4D 50 20 4E 32 0D 0D 4E 31 20 20 | JMP N2..N1 | 000002A0: 20 20 20 20 20 4C 44 41 20 23 24 30 38 0D 20 20 | LDA #$08. | 000002B0: 20 20 20 20 20 20 20 53 54 41 20 56 41 52 50 0D | STA VARP.| 000002C0: 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 56 41 | LDA #VA| 000002D0: 4C 30 31 0D 20 20 20 20 20 20 20 20 20 53 54 41 |L01. STA| 000002E0: 20 24 30 31 0D 0D 4E 35 20 20 20 20 20 20 20 4C | $01..N5 L| 000002F0: 44 41 20 4E 34 54 45 58 54 0D 20 20 20 20 20 20 |DA N4TEXT. | 00000300: 20 20 20 43 4D 50 20 23 30 0D 20 20 20 20 20 20 | CMP #0. | 00000310: 20 20 20 42 45 51 20 4E 39 0D 20 20 20 20 20 20 | BEQ N9. | 00000320: 20 20 20 41 4E 44 20 23 24 33 46 0D 20 20 20 20 | AND #$3F. | 00000330: 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 | CLC. | 00000340: 20 20 41 53 4C 20 41 0D 20 20 20 20 20 20 20 20 | ASL A. | 00000350: 20 41 53 4C 20 41 0D 20 20 20 20 20 20 20 20 20 | ASL A. | 00000360: 41 53 4C 20 41 0D 20 20 20 20 20 20 20 20 20 53 |ASL A. S| 00000370: 54 41 20 24 42 30 0D 20 20 20 20 20 20 20 20 20 |TA $B0. | 00000380: 4C 44 41 20 23 3E 48 45 4E 54 43 48 41 52 0D 20 |LDA #>HENTCHAR. | 00000390: 20 20 20 20 20 20 20 20 41 44 43 20 23 30 0D 20 | ADC #0. | 000003A0: 20 20 20 20 20 20 20 20 53 54 41 20 24 42 31 0D | STA $B1.| 000003B0: 0D 20 20 20 20 20 20 20 20 20 4C 44 59 20 23 24 |. LDY #$| 000003C0: 30 30 0D 4E 36 20 20 20 20 20 20 20 4C 44 41 20 |00.N6 LDA | 000003D0: 28 24 42 30 29 2C 59 0D 20 20 20 20 20 20 20 20 |($B0),Y. | 000003E0: 20 53 54 41 20 4E 38 2C 59 0D 20 20 20 20 20 20 | STA N8,Y. | 000003F0: 20 20 20 49 4E 59 0D 20 20 20 20 20 20 20 20 20 | INY. | 00000400: 43 50 59 20 23 38 0D 20 20 20 20 20 20 20 20 20 |CPY #8. | 00000410: 42 4E 45 20 4E 36 0D 0D 0D 20 20 20 20 20 20 20 |BNE N6... | 00000420: 20 20 49 4E 43 20 4E 35 2B 31 0D 20 20 20 20 20 | INC N5+1. | 00000430: 20 20 20 20 4C 44 41 20 4E 35 2B 31 0D 20 20 20 | LDA N5+1. | 00000440: 20 20 20 20 20 20 42 4E 45 20 4E 37 0D 20 20 20 | BNE N7. | 00000450: 20 20 20 20 20 20 49 4E 43 20 4E 35 2B 32 0D 0D | INC N5+2..| 00000460: 4E 37 20 20 20 20 20 20 20 4C 44 41 20 23 24 33 |N7 LDA #$3| 00000470: 37 0D 20 20 20 20 20 20 20 20 20 53 54 41 20 24 |7. STA $| 00000480: 30 31 0D 20 20 20 20 20 20 20 20 20 4A 4D 50 20 |01. JMP | 00000490: 52 4F 4C 53 43 52 4F 0D 0D 0D 4E 39 20 20 20 20 |ROLSCRO...N9 | 000004A0: 20 20 20 4C 44 41 20 23 3C 4E 34 54 45 58 54 0D | LDA #<N4TEXT.| 000004B0: 20 20 20 20 20 20 20 20 20 53 54 41 20 4E 35 2B | STA N5+| 000004C0: 31 0D 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 |1. LDA #| 000004D0: 3E 4E 34 54 45 58 54 0D 20 20 20 20 20 20 20 20 |>N4TEXT. | 000004E0: 20 53 54 41 20 4E 35 2B 32 0D 20 20 20 20 20 20 | STA N5+2. | 000004F0: 20 20 20 4A 4D 50 20 4E 35 0D 0D 0D 4E 38 20 20 | JMP N5...N8 | 00000500: 20 20 20 20 20 2E 42 59 54 45 20 30 2C 30 2C 30 | .BYTE 0,0,0| 00000510: 2C 30 2C 30 2C 30 2C 30 2C 30 0D 0D 0D 4E 34 54 |,0,0,0,0,0...N4T| 00000520: 45 58 54 20 20 20 2E 54 45 58 54 20 22 48 45 4C |EXT .TEXT "HEL| 00000530: 4C 4F 20 54 48 49 53 20 49 53 20 41 20 43 4F 4F |LO THIS IS A COO| 00000540: 4C 22 0D 20 20 20 20 20 20 20 20 20 2E 54 45 58 |L". .TEX| 00000550: 54 20 22 20 52 55 54 49 4E 45 20 46 52 4F 4D 20 |T " RUTINE FROM | 00000560: 55 4E 49 43 20 21 21 21 22 0D 20 20 20 20 20 20 |UNIC !!!". | 00000570: 20 20 20 2E 54 45 58 54 20 22 20 20 22 0D 20 20 | .TEXT " ". | 00000580: 20 20 20 20 20 20 20 2E 42 59 54 45 20 30 0D 0D | .BYTE 0..| 00000590: 0D 0D 4E 32 20 20 20 20 20 20 20 4C 44 58 20 23 |..N2 LDX #| 000005A0: 24 30 30 0D 4E 33 20 20 20 20 20 20 20 52 4F 4C |$00.N3 ROL| 000005B0: 20 4E 38 2C 58 0D 20 20 20 20 20 20 20 20 20 52 | N8,X. R| 000005C0: 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 33 39 29 |OL SCROLL+(8*39)| 000005D0: 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C 20 |,X. ROL | 000005E0: 53 43 52 4F 4C 4C 2B 28 38 2A 33 38 29 2C 58 0D |SCROLL+(8*38),X.| 000005F0: 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 | ROL SCR| 00000600: 4F 4C 4C 2B 28 38 2A 33 37 29 2C 58 0D 20 20 20 |OLL+(8*37),X. | 00000610: 20 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C | ROL SCROLL| 00000620: 2B 28 38 2A 33 36 29 2C 58 0D 20 20 20 20 20 20 |+(8*36),X. | 00000630: 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 | ROL SCROLL+(8| 00000640: 2A 33 35 29 2C 58 0D 20 20 20 20 20 20 20 20 20 |*35),X. | 00000650: 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 33 34 |ROL SCROLL+(8*34| 00000660: 29 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C |),X. ROL| 00000670: 20 53 43 52 4F 4C 4C 2B 28 38 2A 33 33 29 2C 58 | SCROLL+(8*33),X| 00000680: 0D 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 |. ROL SC| 00000690: 52 4F 4C 4C 2B 28 38 2A 33 32 29 2C 58 0D 20 20 |ROLL+(8*32),X. | 000006A0: 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C | ROL SCROL| 000006B0: 4C 2B 28 38 2A 33 31 29 2C 58 0D 20 20 20 20 20 |L+(8*31),X. | 000006C0: 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 | ROL SCROLL+(| 000006D0: 38 2A 33 30 29 2C 58 0D 20 20 20 20 20 20 20 20 |8*30),X. | 000006E0: 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 32 | ROL SCROLL+(8*2| 000006F0: 39 29 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F |9),X. RO| 00000700: 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 32 38 29 2C |L SCROLL+(8*28),| 00000710: 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 |X. ROL S| 00000720: 43 52 4F 4C 4C 2B 28 38 2A 32 37 29 2C 58 0D 20 |CROLL+(8*27),X. | 00000730: 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 4F | ROL SCRO| 00000740: 4C 4C 2B 28 38 2A 32 36 29 2C 58 0D 20 20 20 20 |LL+(8*26),X. | 00000750: 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B | ROL SCROLL+| 00000760: 28 38 2A 32 35 29 2C 58 0D 20 20 20 20 20 20 20 |(8*25),X. | 00000770: 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A | ROL SCROLL+(8*| 00000780: 32 34 29 2C 58 0D 20 20 20 20 20 20 20 20 20 52 |24),X. R| 00000790: 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 32 33 29 |OL SCROLL+(8*23)| 000007A0: 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C 20 |,X. ROL | 000007B0: 53 43 52 4F 4C 4C 2B 28 38 2A 32 32 29 2C 58 0D |SCROLL+(8*22),X.| 000007C0: 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 | ROL SCR| 000007D0: 4F 4C 4C 2B 28 38 2A 32 31 29 2C 58 0D 20 20 20 |OLL+(8*21),X. | 000007E0: 20 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C | ROL SCROLL| 000007F0: 2B 28 38 2A 32 30 29 2C 58 0D 20 20 20 20 20 20 |+(8*20),X. | 00000800: 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 | ROL SCROLL+(8| 00000810: 2A 31 39 29 2C 58 0D 20 20 20 20 20 20 20 20 20 |*19),X. | 00000820: 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 31 38 |ROL SCROLL+(8*18| 00000830: 29 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C |),X. ROL| 00000840: 20 53 43 52 4F 4C 4C 2B 28 38 2A 31 37 29 2C 58 | SCROLL+(8*17),X| 00000850: 0D 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 |. ROL SC| 00000860: 52 4F 4C 4C 2B 28 38 2A 31 36 29 2C 58 0D 20 20 |ROLL+(8*16),X. | 00000870: 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C | ROL SCROL| 00000880: 4C 2B 28 38 2A 31 35 29 2C 58 0D 20 20 20 20 20 |L+(8*15),X. | 00000890: 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 | ROL SCROLL+(| 000008A0: 38 2A 31 34 29 2C 58 0D 20 20 20 20 20 20 20 20 |8*14),X. | 000008B0: 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 31 | ROL SCROLL+(8*1| 000008C0: 33 29 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F |3),X. RO| 000008D0: 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 31 32 29 2C |L SCROLL+(8*12),| 000008E0: 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 |X. ROL S| 000008F0: 43 52 4F 4C 4C 2B 28 38 2A 31 31 29 2C 58 0D 20 |CROLL+(8*11),X. | 00000900: 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 4F | ROL SCRO| 00000910: 4C 4C 2B 28 38 2A 31 30 29 2C 58 0D 20 20 20 20 |LL+(8*10),X. | 00000920: 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B | ROL SCROLL+| 00000930: 28 38 2A 39 29 2C 58 0D 20 20 20 20 20 20 20 20 |(8*9),X. | 00000940: 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 38 | ROL SCROLL+(8*8| 00000950: 29 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C |),X. ROL| 00000960: 20 53 43 52 4F 4C 4C 2B 28 38 2A 37 29 2C 58 0D | SCROLL+(8*7),X.| 00000970: 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 | ROL SCR| 00000980: 4F 4C 4C 2B 28 38 2A 36 29 2C 58 0D 20 20 20 20 |OLL+(8*6),X. | 00000990: 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B | ROL SCROLL+| 000009A0: 28 38 2A 35 29 2C 58 0D 20 20 20 20 20 20 20 20 |(8*5),X. | 000009B0: 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 34 | ROL SCROLL+(8*4| 000009C0: 29 2C 58 0D 20 20 20 20 20 20 20 20 20 52 4F 4C |),X. ROL| 000009D0: 20 53 43 52 4F 4C 4C 2B 28 38 2A 33 29 2C 58 0D | SCROLL+(8*3),X.| 000009E0: 20 20 20 20 20 20 20 20 20 52 4F 4C 20 53 43 52 | ROL SCR| 000009F0: 4F 4C 4C 2B 28 38 2A 32 29 2C 58 0D 20 20 20 20 |OLL+(8*2),X. | 00000A00: 20 20 20 20 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B | ROL SCROLL+| 00000A10: 28 38 2A 31 29 2C 58 0D 20 20 20 20 20 20 20 20 |(8*1),X. | 00000A20: 20 52 4F 4C 20 53 43 52 4F 4C 4C 2B 28 38 2A 30 | ROL SCROLL+(8*0| 00000A30: 29 2C 58 0D 20 20 20 20 20 20 20 20 20 49 4E 58 |),X. INX| 00000A40: 0D 20 20 20 20 20 20 20 20 20 43 50 58 20 23 38 |. CPX #8| 00000A50: 0D 20 20 20 20 20 20 20 20 20 42 4E 45 20 4E 33 |. BNE N3| 00000A60: 0D 20 20 20 20 20 20 20 20 20 52 54 53 0D 0D |. RTS.. |
.. *= $1000.... ; INT. S
TARTER... LDX #$00.DD TXA.
STA $0400,X. INX.
CPX #49. BNE DD. LDA
#24. STA 53272.. SEI.
LDA #$01. STA $D019.
STA $D01A. STA $DC0D.
LDA #$1B. STA $D011. LD
A #<INT. LDX #>INT. STA
$0314. STX $0315. CLI.
RTS....INT ASL $D019.
LDA #150. STA $D012. J
SR ROLSCRO. JMP $EA31......VAL01
= $33..HENTCHAR = $D000..SCROLL =
$2000...VARP .BYTE 0..ROLSCRO = *.
LDA VARP. BEQ N1.
DEC VARP. JMP N2..N1 LDA
#$08. STA VARP. LDA #VA
L01. STA $01..N5 LDA N4TEX
T. CMP #0. BEQ N9.
AND #$3F. CLC. ASL A.
ASL A. ASL A. S
TA $B0. LDA #>HENTCHAR.
ADC #0. STA $B1.. LDY #$
00.N6 LDA ($B0),Y. STA N8,
Y. INY. CPY #8.
BNE N6... INC N5+1. LDA
N5+1. BNE N7. INC N5+2..
N7 LDA #$37. STA $01.
JMP ROLSCRO...N9 LDA #<N4TEXT.
STA N5+1. LDA #>N4TEXT.
STA N5+2. JMP N5...N8
.BYTE 0,0,0,0,0,0,0,0...N4TEXT .T
EXT "HELLO THIS IS A COOL". .TEX
T " RUTINE FROM UNIC !!!". .TEXT
" ". .BYTE 0....N2 LDX #
$00.N3 ROL N8,X. ROL SCROL
L+(8*39),X. ROL SCROLL+(8*38),X.
ROL SCROLL+(8*37),X. RO
L SCROLL+(8*36),X. ROL SCROLL+(8
*35),X. ROL SCROLL+(8*34),X.
ROL SCROLL+(8*33),X. ROL SC
ROLL+(8*32),X. ROL SCROLL+(8*31)
,X. ROL SCROLL+(8*30),X.
ROL SCROLL+(8*29),X. ROL SCROLL
+(8*28),X. ROL SCROLL+(8*27),X.
ROL SCROLL+(8*26),X. ROL
SCROLL+(8*25),X. ROL SCROLL+(8*
24),X. ROL SCROLL+(8*23),X.
ROL SCROLL+(8*22),X. ROL SCR
OLL+(8*21),X. ROL SCROLL+(8*20),
X. ROL SCROLL+(8*19),X.
ROL SCROLL+(8*18),X. ROL SCROLL+
(8*17),X. ROL SCROLL+(8*16),X.
ROL SCROLL+(8*15),X. ROL
SCROLL+(8*14),X. ROL SCROLL+(8*1
3),X. ROL SCROLL+(8*12),X.
ROL SCROLL+(8*11),X. ROL SCRO
LL+(8*10),X. ROL SCROLL+(8*9),X.
ROL SCROLL+(8*8),X. ROL
SCROLL+(8*7),X. ROL SCROLL+(8*6
),X. ROL SCROLL+(8*5),X.
ROL SCROLL+(8*4),X. ROL SCROLL+
(8*3),X. ROL SCROLL+(8*2),X.
ROL SCROLL+(8*1),X. ROL SCR
OLL+(8*0),X. INX. CPX #8
. BNE N3. RTS..
> CLICK IMAGE PREVIEW FOR FULL MODAL