SCROLL.B
FILE INFORMATION
FILENAME(S): SCROLL.B
FILE TYPE(S): DEL
FILE SIZE: 4.3K
FIRST SEEN: 2025-12-01 01:08:46
APPEARS ON: 1 disk(s)
FILE HASH
3d85d10f859b66f86c7b2471a673d6bbcb004660e59abe9c359985d17d016064
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FAST ASS SYSTEM | SCROLL.B | DEL | hedning, loot | 15 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 1C 12 2D 12 0A 00 81 20 50 41 53 53 B2 31 20 A4 |..-.... PASS.1 .|
00000010: 20 33 00 3C 12 14 00 90 82 20 34 39 31 35 32 2C | 3.<..... 49152,|
00000020: 30 00 56 12 1E 00 8B 20 50 41 53 53 B2 33 20 A7 |0.V.... PASS.3 .|
00000030: 20 90 82 20 34 39 31 35 32 2C 31 00 76 12 64 00 | .. 49152,1.v.d.|
00000040: 3B 20 53 4D 4F 4F 54 48 20 53 43 52 4F 4C 4C 49 |; SMOOTH SCROLLI|
00000050: 4E 47 20 52 4F 55 54 49 4E 45 53 00 7C 12 6E 00 |NG ROUTINES.|.n.|
00000060: 3B 00 82 12 78 00 3B 00 B3 12 82 00 53 43 4C 53 |;...x.;.....SCLS|
00000070: 43 52 20 20 20 20 B2 20 24 45 38 45 41 3B 20 53 |CR . $E8EA; S|
00000080: 43 52 4F 4C 4C 20 53 43 52 45 45 4E 20 55 50 20 |CROLL SCREEN UP |
00000090: 4F 4E 45 20 4C 49 4E 45 00 B9 12 8C 00 3B 00 CA |ONE LINE.....;..|
000000A0: 12 96 00 53 43 4C 58 3A 20 20 20 90 80 20 30 00 |...SCLX: .. 0.|
000000B0: DB 12 A0 00 53 43 4C 59 3A 20 20 20 90 80 20 30 |....SCLY: .. 0|
000000C0: 00 EC 12 AA 00 53 43 4C 52 4F 57 3A 20 90 80 20 |.....SCLROW: .. |
000000D0: 30 00 FD 12 AF 00 46 52 4F 4D 52 4F 57 3A 90 80 |0.....FROMROW:..|
000000E0: 20 30 00 0E 13 B4 00 54 4F 52 4F 57 3A 20 20 90 | 0.....TOROW: .|
000000F0: 80 20 30 00 14 13 BE 00 3B 00 3D 13 C8 00 3B 20 |. 0.....;.=...; |
00000100: 22 47 4F 33 38 22 20 53 45 54 20 53 43 52 45 45 |"GO38" SET SCREE|
00000110: 4E 20 A4 20 33 38 20 43 4F 4C 55 4D 4E 20 4D 4F |N . 38 COLUMN MO|
00000120: 44 45 00 43 13 D2 00 3B 00 5A 13 DC 00 47 4F 33 |DE.C...;.Z...GO3|
00000130: 38 3A 20 20 20 20 20 90 94 20 24 44 30 31 36 00 |8: .. $D016.|
00000140: 6F 13 E6 00 20 20 20 20 20 20 20 20 20 20 AF 20 |o... . |
00000150: 23 32 34 37 00 86 13 F0 00 20 20 20 20 20 20 20 |#247..... |
00000160: 20 20 20 90 97 20 24 44 30 31 36 00 97 13 FA 00 | .. $D016.....|
00000170: 20 20 20 20 20 20 20 20 20 20 90 B6 00 9D 13 04 | ......|
00000180: 01 3B 00 C6 13 0E 01 3B 20 22 47 4F 34 30 22 20 |.;.....; "GO40" |
00000190: 53 45 54 20 53 43 52 45 45 4E 20 A4 20 34 30 20 |SET SCREEN . 40 |
000001A0: 43 4F 4C 55 4D 4E 20 4D 4F 44 45 00 CC 13 18 01 |COLUMN MODE.....|
000001B0: 3B 00 E3 13 22 01 47 4F 34 30 3A 20 20 20 20 20 |;...".GO40: |
000001C0: 90 94 20 24 44 30 31 36 00 F7 13 2C 01 20 20 20 |.. $D016...,. |
000001D0: 20 20 20 20 20 20 20 90 95 20 23 38 00 0E 14 36 | .. #8...6|
000001E0: 01 20 20 20 20 20 20 20 20 20 20 90 97 20 24 44 |. .. $D|
000001F0: 30 31 36 00 1F 14 40 01 20 20 20 20 20 20 20 20 |016...@. |
00000200: 20 20 90 B6 00 25 14 4A 01 3B 00 4B 14 54 01 3B | ...%.J.;.K.T.;|
00000210: 20 22 47 4F 32 34 22 20 53 45 54 20 53 43 52 45 | "GO24" SET SCRE|
00000220: 45 4E 20 A4 20 32 34 20 52 4F 57 20 4D 4F 44 45 |EN . 24 ROW MODE|
00000230: 00 51 14 5E 01 3B 00 68 14 68 01 47 4F 32 34 3A |.Q.^.;.h.h.GO24:|
00000240: 20 20 20 20 20 90 94 20 24 44 30 31 31 00 7D 14 | .. $D011.}.|
00000250: 72 01 20 20 20 20 20 20 20 20 20 20 AF 20 23 32 |r. . #2|
00000260: 34 37 00 94 14 7C 01 20 20 20 20 20 20 20 20 20 |47...|. |
00000270: 20 90 97 20 24 44 30 31 31 00 A5 14 86 01 20 20 | .. $D011..... |
00000280: 20 20 20 20 20 20 20 20 90 B6 00 AB 14 90 01 3B | .......;|
00000290: 00 D1 14 9A 01 3B 20 22 47 4F 32 35 22 20 53 45 |.....; "GO25" SE|
000002A0: 54 20 53 43 52 45 45 4E 20 A4 20 32 35 20 52 4F |T SCREEN . 25 RO|
000002B0: 57 20 4D 4F 44 45 00 D7 14 A4 01 3B 00 EE 14 AE |W MODE.....;....|
000002C0: 01 47 4F 32 35 3A 20 20 20 20 20 90 94 20 24 44 |.GO25: .. $D|
000002D0: 30 31 31 00 02 15 B8 01 20 20 20 20 20 20 20 20 |011..... |
000002E0: 20 20 90 95 20 23 38 00 19 15 C2 01 20 20 20 20 | .. #8..... |
000002F0: 20 20 20 20 20 20 90 97 20 24 44 30 31 31 00 2A | .. $D011.*|
00000300: 15 CC 01 20 20 20 20 20 20 20 20 20 20 90 B6 00 |... ...|
00000310: 30 15 D6 01 3B 00 5B 15 E0 01 3B 20 22 53 43 52 |0...;.[...; "SCR|
00000320: 4F 4C 4C 58 22 20 53 43 52 4F 4C 4C 20 53 43 52 |OLLX" SCROLL SCR|
00000330: 45 45 4E 20 52 49 47 48 54 20 B0 20 4C 45 46 54 |EEN RIGHT . LEFT|
00000340: 00 61 15 EA 01 3B 00 78 15 F4 01 53 43 52 4F 4C |.a...;.x...SCROL|
00000350: 4C 58 3A 20 20 90 94 20 24 44 30 31 36 00 8D 15 |LX: .. $D016...|
00000360: FE 01 20 20 20 20 20 20 20 20 20 20 AF 20 23 32 |.. . #2|
00000370: 34 38 00 A3 15 08 02 20 20 20 20 20 20 20 20 20 |48..... |
00000380: 20 90 95 20 53 43 4C 58 00 BA 15 12 02 20 20 20 | .. SCLX..... |
00000390: 20 20 20 20 20 20 20 90 97 20 24 44 30 31 36 00 | .. $D016.|
000003A0: CB 15 1C 02 20 20 20 20 20 20 20 20 20 20 90 B6 |.... ..|
000003B0: 00 D1 15 26 02 3B 00 F9 15 30 02 3B 20 22 53 43 |...&.;...0.; "SC|
000003C0: 52 4F 4C 4C 59 22 20 53 43 52 4F 4C 4C 20 53 43 |ROLLY" SCROLL SC|
000003D0: 52 45 45 4E 20 55 50 20 B0 20 44 4F 57 4E 00 FF |REEN UP . DOWN..|
000003E0: 15 3A 02 3B 00 16 16 44 02 53 43 52 4F 4C 4C 59 |.:.;...D.SCROLLY|
000003F0: 3A 20 20 90 94 20 24 44 30 31 31 00 2B 16 4E 02 |: .. $D011.+.N.|
00000400: 20 20 20 20 20 20 20 20 20 20 AF 20 23 32 34 38 | . #248|
00000410: 00 41 16 58 02 20 20 20 20 20 20 20 20 20 20 90 |.A.X. .|
00000420: 95 20 53 43 4C 59 00 58 16 62 02 20 20 20 20 20 |. SCLY.X.b. |
00000430: 20 20 20 20 20 90 97 20 24 44 30 31 31 00 69 16 | .. $D011.i.|
00000440: 6C 02 20 20 20 20 20 20 20 20 20 20 90 B6 00 6F |l. ...o|
00000450: 16 76 02 3B 00 98 16 80 02 3B 20 22 58 4C 49 4E |.v.;.....; "XLIN|
00000460: 45 53 43 4C 22 20 53 48 49 46 54 20 4C 49 4E 45 |ESCL" SHIFT LINE|
00000470: 20 52 49 47 48 54 20 B0 20 4C 45 46 54 00 9E 16 | RIGHT . LEFT...|
00000480: 8A 02 3B 00 B6 16 94 02 58 4C 49 4E 45 53 43 4C |..;.....XLINESCL|
00000490: 3A 20 90 94 20 53 43 4C 52 4F 57 00 CB 16 9E 02 |: .. SCLROW.....|
000004A0: 20 20 20 20 20 20 20 20 20 20 90 97 20 24 44 36 | .. $D6|
000004B0: 00 E1 16 A8 02 20 20 20 20 20 20 20 20 20 20 90 |..... .|
000004C0: 94 20 23 24 30 30 00 F6 16 B2 02 20 20 20 20 20 |. #$00..... |
000004D0: 20 20 20 20 20 90 97 20 24 44 33 00 3B 17 BC 02 | .. $D3.;...|
000004E0: 20 20 20 20 20 20 20 20 20 20 90 A4 20 24 45 35 | .. $E5|
000004F0: 36 43 3B 20 43 41 4C 43 2E 20 50 4F 49 4E 54 45 |6C; CALC. POINTE|
00000500: 52 20 A4 20 53 43 52 45 45 4E 20 52 41 4D 2C 20 |R . SCREEN RAM, |
00000510: 53 54 4F 52 45 20 49 4E 20 24 44 31 AB 24 44 32 |STORE IN $D1.$D2|
00000520: 00 41 17 C6 02 3B 00 86 17 D0 02 20 20 20 20 20 |.A...;..... |
00000530: 20 20 20 20 20 90 A4 20 24 45 41 32 34 3B 20 43 | .. $EA24; C|
00000540: 41 4C 43 2E 20 50 4F 49 4E 54 45 52 20 A4 20 43 |ALC. POINTER . C|
00000550: 4F 4C 4F 55 52 20 52 41 4D 2C 20 53 54 4F 52 45 |OLOUR RAM, STORE|
00000560: 20 49 4E 20 24 46 33 AB 24 46 34 00 8C 17 DA 02 | IN $F3.$F4.....|
00000570: 3B 00 A2 17 E4 02 20 20 20 20 20 20 20 20 20 20 |;..... |
00000580: 90 94 20 53 43 4C 58 00 BB 17 EE 02 20 20 20 20 |.. SCLX..... |
00000590: 20 20 20 20 20 20 90 8A 20 4C 45 46 54 53 43 4C | .. LEFTSCL|
000005A0: 00 C1 17 F8 02 3B 00 D4 17 02 03 3B 20 53 43 52 |.....;.....; SCR|
000005B0: 4F 4C 4C 20 52 49 47 48 54 00 DA 17 0C 03 3B 00 |OLL RIGHT.....;.|
000005C0: EE 17 16 03 20 20 20 20 20 20 20 20 20 20 90 A2 |.... ..|
000005D0: 20 23 31 00 F4 17 20 03 3B 00 05 18 2A 03 52 49 | #1... .;...*.RI|
000005E0: 47 48 54 4C 4F 4F 50 3A 90 BF 00 16 18 34 03 20 |GHTLOOP:.....4. |
000005F0: 20 20 20 20 20 20 20 20 20 90 BA 00 2F 18 3E 03 | .../.>.|
00000600: 20 20 20 20 20 20 20 20 20 20 90 94 20 28 24 44 | .. ($D|
00000610: 31 29 2C 59 00 40 18 48 03 20 20 20 20 20 20 20 |1),Y.@.H. |
00000620: 20 20 20 90 AD 00 59 18 52 03 20 20 20 20 20 20 | ...Y.R. |
00000630: 20 20 20 20 90 97 20 28 24 44 31 29 2C 59 00 6A | .. ($D1),Y.j|
00000640: 18 5C 03 20 20 20 20 20 20 20 20 20 20 90 BD 00 |.\. ...|
00000650: 7B 18 66 03 20 20 20 20 20 20 20 20 20 20 90 BB |{.f. ..|
00000660: 00 94 18 70 03 20 20 20 20 20 20 20 20 20 20 90 |...p. .|
00000670: 94 20 28 24 46 33 29 2C 59 00 A5 18 7A 03 20 20 |. ($F3),Y...z. |
00000680: 20 20 20 20 20 20 20 20 90 AD 00 BE 18 84 03 20 | ....... |
00000690: 20 20 20 20 20 20 20 20 20 90 97 20 28 24 46 33 | .. ($F3|
000006A0: 29 2C 59 00 CF 18 8E 03 20 20 20 20 20 20 20 20 |),Y..... |
000006B0: 20 20 90 AF 00 E0 18 93 03 20 20 20 20 20 20 20 | ....... |
000006C0: 20 20 20 90 AF 00 F5 18 98 03 20 20 20 20 20 20 | ....... |
000006D0: 20 20 20 20 90 A0 20 23 34 30 00 10 19 9D 03 20 | .. #40..... |
000006E0: 20 20 20 20 20 20 20 20 20 90 8C 20 52 49 47 48 | .. RIGH|
000006F0: 54 4C 4F 4F 50 00 21 19 A2 03 20 20 20 20 20 20 |TLOOP.!... |
00000700: 20 20 20 20 90 B6 00 27 19 AC 03 3B 00 2D 19 B6 | ...'...;.-..|
00000710: 03 3B 00 42 19 C0 03 4C 45 46 54 53 43 4C 3A 20 |.;.B...LEFTSCL: |
00000720: 20 90 A2 20 23 33 38 00 48 19 CA 03 3B 00 59 19 | .. #38.H...;.Y.|
00000730: D4 03 4C 45 46 54 4C 4F 4F 50 3A 20 90 BF 00 6A |..LEFTLOOP: ...j|
00000740: 19 DE 03 20 20 20 20 20 20 20 20 20 20 90 BA 00 |... ...|
00000750: 82 19 E8 03 20 20 20 20 20 20 20 20 20 90 94 20 |.... .. |
00000760: 28 24 44 31 29 2C 59 00 92 19 F2 03 20 20 20 20 |($D1),Y..... |
00000770: 20 20 20 20 20 90 AF 00 AA 19 FC 03 20 20 20 20 | ....... |
00000780: 20 20 20 20 20 90 97 20 28 24 44 31 29 2C 59 00 | .. ($D1),Y.|
00000790: BA 19 06 04 20 20 20 20 20 20 20 20 20 90 BD 00 |.... ...|
000007A0: CA 19 10 04 20 20 20 20 20 20 20 20 20 90 BB 00 |.... ...|
000007B0: E2 19 1A 04 20 20 20 20 20 20 20 20 20 90 94 20 |.... .. |
000007C0: 28 24 46 33 29 2C 59 00 F2 19 24 04 20 20 20 20 |($F3),Y...$. |
000007D0: 20 20 20 20 20 90 AF 00 0A 1A 2E 04 20 20 20 20 | ....... |
000007E0: 20 20 20 20 20 90 97 20 28 24 46 33 29 2C 59 00 | .. ($F3),Y.|
000007F0: 1A 1A 38 04 20 20 20 20 20 20 20 20 20 90 AD 00 |..8. ...|
00000800: 2A 1A 42 04 20 20 20 20 20 20 20 20 20 90 AD 00 |*.B. ...|
00000810: 3F 1A 56 04 20 20 20 20 20 20 20 20 20 90 A0 20 |?.V. .. |
00000820: 23 24 46 46 00 58 1A 60 04 20 20 20 20 20 20 20 |#$FF.X.`. |
00000830: 20 20 90 8C 20 4C 45 46 54 4C 4F 4F 50 00 68 1A | .. LEFTLOOP.h.|
00000840: 6A 04 20 20 20 20 20 20 20 20 20 90 B6 00 6E 1A |j. ...n.|
00000850: 74 04 3B 00 99 1A 7E 04 3B 20 22 53 43 4C 53 43 |t.;...~.; "SCLSC|
00000860: 52 58 22 20 53 43 52 4F 4C 4C 20 53 43 52 45 45 |RX" SCROLL SCREE|
00000870: 4E 20 4C 45 46 54 20 B0 20 52 49 47 48 54 00 9F |N LEFT . RIGHT..|
00000880: 1A 88 04 3B 00 B4 1A 92 04 53 43 4C 53 43 52 58 |...;.....SCLSCRX|
00000890: 3A 20 90 94 20 23 24 30 30 00 CB 1A 9C 04 20 20 |: .. #$00..... |
000008A0: 20 20 20 20 20 20 20 90 97 20 53 43 4C 52 4F 57 | .. SCLROW|
000008B0: 00 D1 1A A6 04 3B 00 EA 1A B0 04 53 43 52 4C 4F |.....;.....SCRLO|
000008C0: 4F 50 3A 20 90 A4 20 58 4C 49 4E 45 53 43 4C 00 |OP: .. XLINESCL.|
000008D0: 01 1B BA 04 20 20 20 20 20 20 20 20 20 90 9A 20 |.... .. |
000008E0: 53 43 4C 52 4F 57 00 18 1B C4 04 20 20 20 20 20 |SCLROW..... |
000008F0: 20 20 20 20 90 94 20 53 43 4C 52 4F 57 00 2C 1B | .. SCLROW.,.|
00000900: CE 04 20 20 20 20 20 20 20 20 20 90 92 20 23 32 |.. .. #2|
00000910: 35 00 44 1B D8 04 20 20 20 20 20 20 20 20 20 90 |5.D... .|
00000920: 8C 20 53 43 52 4C 4F 4F 50 00 54 1B E2 04 20 20 |. SCRLOOP.T... |
00000930: 20 20 20 20 20 20 20 90 B6 00 5A 1B EC 04 3B 00 | ...Z...;.|
00000940: 86 1B F6 04 3B 20 22 53 43 4C 53 43 52 55 50 22 |....; "SCLSCRUP"|
00000950: 20 53 43 52 4F 4C 4C 20 53 43 52 45 45 4E 20 55 | SCROLL SCREEN U|
00000960: 50 20 4F 4E 45 20 4C 49 4E 45 2E 00 8C 1B 00 05 |P ONE LINE......|
00000970: 3B 00 A1 1B 0A 05 53 43 4C 53 43 52 55 50 3A 90 |;.....SCLSCRUP:.|
00000980: 94 20 23 24 30 31 00 B8 1B 14 05 20 20 20 20 20 |. #$01..... |
00000990: 20 20 20 20 90 97 20 53 43 4C 52 4F 57 00 BE 1B | .. SCLROW...|
000009A0: 1E 05 3B 00 D5 1B 28 05 55 50 4C 4F 4F 50 3A 20 |..;...(.UPLOOP: |
000009B0: 20 90 94 20 53 43 4C 52 4F 57 00 ED 1B 32 05 20 | .. SCLROW...2. |
000009C0: 20 20 20 20 20 20 20 20 90 97 20 46 52 4F 4D 52 | .. FROMR|
000009D0: 4F 57 00 04 1C 3C 05 20 20 20 20 20 20 20 20 20 |OW...<. |
000009E0: 90 97 20 53 43 4C 52 4F 57 00 1A 1C 46 05 20 20 |.. SCLROW...F. |
000009F0: 20 20 20 20 20 20 20 90 99 20 54 4F 52 4F 57 00 | .. TOROW.|
00000A00: 20 1C 5A 05 3B 00 39 1C 64 05 20 20 20 20 20 20 | .Z.;.9.d. |
00000A10: 20 20 20 90 A4 20 43 41 4C 43 41 44 44 52 00 51 | .. CALCADDR.Q|
00000A20: 1C 78 05 20 20 20 20 20 20 20 20 20 90 A4 20 4D |.x. .. M|
00000A30: 4F 56 45 52 4F 57 00 57 1C 82 05 3B 00 6E 1C 8C |OVEROW.W...;.n..|
00000A40: 05 20 20 20 20 20 20 20 20 20 90 9A 20 53 43 4C |. .. SCL|
00000A50: 52 4F 57 00 85 1C 96 05 20 20 20 20 20 20 20 20 |ROW..... |
00000A60: 20 90 94 20 53 43 4C 52 4F 57 00 99 1C A0 05 20 | .. SCLROW..... |
00000A70: 20 20 20 20 20 20 20 20 90 92 20 23 32 35 00 B0 | .. #25..|
00000A80: 1C AA 05 20 20 20 20 20 20 20 20 20 90 8C 20 55 |... .. U|
00000A90: 50 4C 4F 4F 50 00 C0 1C B4 05 20 20 20 20 20 20 |PLOOP..... |
00000AA0: 20 20 20 90 B6 00 C6 1C BE 05 3B 00 F6 1C C8 05 | .......;.....|
00000AB0: 3B 20 22 53 43 4C 53 43 52 44 4F 57 4E 22 20 53 |; "SCLSCRDOWN" S|
00000AC0: 43 52 4F 4C 4C 20 53 43 52 45 45 4E 20 44 4F 57 |CROLL SCREEN DOW|
00000AD0: 4E 20 4F 4E 45 20 4C 49 4E 45 2E 00 FC 1C D2 05 |N ONE LINE......|
00000AE0: 3B 00 13 1D DC 05 53 43 4C 53 43 52 44 4F 57 4E |;.....SCLSCRDOWN|
00000AF0: 3A 90 94 20 23 24 31 37 00 2C 1D E6 05 20 20 20 |:.. #$17.,... |
00000B00: 20 20 20 20 20 20 20 20 90 97 20 53 43 4C 52 4F | .. SCLRO|
00000B10: 57 00 32 1D F0 05 3B 00 4B 1D FA 05 44 4F 57 4E |W.2...;.K...DOWN|
00000B20: 4C 4F 4F 50 3A 20 20 90 94 20 53 43 4C 52 4F 57 |LOOP: .. SCLROW|
00000B30: 00 65 1D 04 06 20 20 20 20 20 20 20 20 20 20 20 |.e... |
00000B40: 90 97 20 46 52 4F 4D 52 4F 57 00 7D 1D 0E 06 20 |.. FROMROW.}... |
00000B50: 20 20 20 20 20 20 20 20 20 20 90 97 20 54 4F 52 | .. TOR|
00000B60: 4F 57 00 95 1D 18 06 20 20 20 20 20 20 20 20 20 |OW..... |
00000B70: 20 20 90 9A 20 54 4F 52 4F 57 00 9B 1D 22 06 3B | .. TOROW...".;|
00000B80: 00 B6 1D 2C 06 20 20 20 20 20 20 20 20 20 20 20 |...,. |
00000B90: 90 A4 20 43 41 4C 43 41 44 44 52 00 D0 1D 36 06 |.. CALCADDR...6.|
00000BA0: 20 20 20 20 20 20 20 20 20 20 20 90 A4 20 4D 4F | .. MO|
00000BB0: 56 45 52 4F 57 00 D6 1D 40 06 3B 00 EF 1D 4A 06 |VEROW...@.;...J.|
00000BC0: 20 20 20 20 20 20 20 20 20 20 20 90 99 20 53 43 | .. SC|
00000BD0: 4C 52 4F 57 00 0A 1E 54 06 20 20 20 20 20 20 20 |LROW...T. |
00000BE0: 20 20 20 20 90 8D 20 44 4F 57 4E 4C 4F 4F 50 00 | .. DOWNLOOP.|
00000BF0: 1C 1E 5E 06 20 20 20 20 20 20 20 20 20 20 20 90 |..^. .|
00000C00: B6 00 22 1E 68 06 3B 00 5D 1E 72 06 3B 20 22 43 |..".h.;.].r.; "C|
00000C10: 41 4C 43 41 44 44 52 22 20 43 41 4C 43 55 4C 41 |ALCADDR" CALCULA|
00000C20: 54 45 20 41 44 44 52 45 53 53 20 81 20 53 4F 55 |TE ADDRESS . SOU|
00000C30: 52 43 45 20 AF 20 54 41 52 47 45 54 20 52 4F 57 |RCE . TARGET ROW|
00000C40: 53 2E 00 63 1E 7C 06 3B 00 7B 1E 86 06 43 41 4C |S..c.|.;.{...CAL|
00000C50: 43 41 44 44 52 3A 90 A1 20 46 52 4F 4D 52 4F 57 |CADDR:.. FROMROW|
00000C60: 00 BF 1E 90 06 20 20 20 20 20 20 20 20 20 90 A4 |..... ..|
00000C70: 20 24 45 35 36 43 3B 20 43 41 4C 43 2E 20 50 4F | $E56C; CALC. PO|
00000C80: 49 4E 54 45 52 20 A4 20 53 43 52 45 45 4E 20 52 |INTER . SCREEN R|
00000C90: 41 4D 2C 20 53 54 4F 52 45 20 49 4E 20 24 44 31 |AM, STORE IN $D1|
00000CA0: AB 24 44 32 00 C5 1E 9A 06 3B 00 09 1F A4 06 20 |.$D2.....;..... |
00000CB0: 20 20 20 20 20 20 20 20 90 A4 20 24 45 41 32 34 | .. $EA24|
00000CC0: 3B 20 43 41 4C 43 2E 20 50 4F 49 4E 54 45 52 20 |; CALC. POINTER |
00000CD0: A4 20 43 4F 4C 4F 55 52 20 52 41 4D 2C 20 53 54 |. COLOUR RAM, ST|
00000CE0: 4F 52 45 20 49 4E 20 24 46 33 AB 24 46 34 00 0F |ORE IN $F3.$F4..|
00000CF0: 1F AE 06 3B 00 23 1F B8 06 20 20 20 20 20 20 20 |...;.#... |
00000D00: 20 20 90 A1 20 24 44 31 00 37 1F C2 06 20 20 20 | .. $D1.7... |
00000D10: 20 20 20 20 20 20 90 A2 20 24 44 32 00 4B 1F CC | .. $D2.K..|
00000D20: 06 20 20 20 20 20 20 20 20 20 90 9E 20 24 46 43 |. .. $FC|
00000D30: 00 5F 1F D6 06 20 20 20 20 20 20 20 20 20 90 A3 |._... ..|
00000D40: 20 24 46 44 00 65 1F E0 06 3B 00 79 1F EA 06 20 | $FD.e...;.y... |
00000D50: 20 20 20 20 20 20 20 20 90 A1 20 24 46 33 00 8D | .. $F3..|
00000D60: 1F F4 06 20 20 20 20 20 20 20 20 20 90 A2 20 24 |... .. $|
00000D70: 46 34 00 A1 1F FE 06 20 20 20 20 20 20 20 20 20 |F4..... |
00000D80: 90 9E 20 24 46 45 00 B5 1F 08 07 20 20 20 20 20 |.. $FE..... |
00000D90: 20 20 20 20 90 A3 20 24 46 46 00 BB 1F 12 07 3B | .. $FF.....;|
00000DA0: 00 D1 1F 1C 07 20 20 20 20 20 20 20 20 20 90 A1 |..... ..|
00000DB0: 20 54 4F 52 4F 57 00 15 20 26 07 20 20 20 20 20 | TOROW.. &. |
00000DC0: 20 20 20 20 90 A4 20 24 45 35 36 43 3B 20 43 41 | .. $E56C; CA|
00000DD0: 4C 43 2E 20 50 4F 49 4E 54 45 52 20 A4 20 53 43 |LC. POINTER . SC|
00000DE0: 52 45 45 4E 20 52 41 4D 2C 20 53 54 4F 52 45 20 |REEN RAM, STORE |
00000DF0: 49 4E 20 24 44 31 AB 24 44 32 00 1B 20 30 07 3B |IN $D1.$D2.. 0.;|
00000E00: 00 5F 20 3A 07 20 20 20 20 20 20 20 20 20 90 A4 |._ :. ..|
00000E10: 20 24 45 41 32 34 3B 20 43 41 4C 43 2E 20 50 4F | $EA24; CALC. PO|
00000E20: 49 4E 54 45 52 20 A4 20 43 4F 4C 4F 55 52 20 52 |INTER . COLOUR R|
00000E30: 41 4D 2C 20 53 54 4F 52 45 20 49 4E 20 24 46 33 |AM, STORE IN $F3|
00000E40: AB 24 46 34 00 65 20 44 07 3B 00 75 20 4E 07 20 |.$F4.e D.;.u N. |
00000E50: 20 20 20 20 20 20 20 20 90 B6 00 7B 20 58 07 3B | ...{ X.;|
00000E60: 00 BF 20 62 07 3B 20 22 4D 4F 56 45 52 4F 57 22 |.. b.; "MOVEROW"|
00000E70: 20 4D 4F 56 45 20 41 20 52 4F 57 20 57 49 54 48 | MOVE A ROW WITH|
00000E80: 20 41 44 44 52 2E 20 49 4E 20 28 24 46 43 AB 46 | ADDR. IN ($FC.F|
00000E90: 44 29 20 A4 20 52 4F 57 20 49 4E 20 28 24 44 31 |D) . ROW IN ($D1|
00000EA0: AB 44 32 29 00 E6 20 6C 07 3B 20 43 4F 4C 4F 55 |.D2).. l.; COLOU|
00000EB0: 52 53 20 46 52 4F 4D 20 28 24 46 45 AB 46 46 29 |RS FROM ($FE.FF)|
00000EC0: 20 A4 20 28 24 46 33 AB 46 34 29 00 EC 20 76 07 | . ($F3.F4).. v.|
00000ED0: 3B 00 01 21 80 07 4D 4F 56 45 52 4F 57 3A 20 90 |;..!..MOVEROW: .|
00000EE0: A2 20 23 24 30 30 00 07 21 8A 07 3B 00 1F 21 94 |. #$00..!..;..!.|
00000EF0: 07 4D 4F 56 45 4C 4F 4F 50 3A 90 94 20 28 24 46 |.MOVELOOP:.. ($F|
00000F00: 43 29 2C 59 00 37 21 9E 07 20 20 20 20 20 20 20 |C),Y.7!.. |
00000F10: 20 20 90 97 20 28 24 44 31 29 2C 59 00 4F 21 A8 | .. ($D1),Y.O!.|
00000F20: 07 20 20 20 20 20 20 20 20 20 90 94 20 28 24 46 |. .. ($F|
00000F30: 45 29 2C 59 00 67 21 B2 07 20 20 20 20 20 20 20 |E),Y.g!.. |
00000F40: 20 20 90 97 20 28 24 46 33 29 2C 59 00 6D 21 BC | .. ($F3),Y.m!.|
00000F50: 07 3B 00 7D 21 C6 07 20 20 20 20 20 20 20 20 20 |.;.}!.. |
00000F60: 90 AF 00 91 21 D0 07 20 20 20 20 20 20 20 20 20 |....!.. |
00000F70: 90 A0 20 23 34 30 00 AA 21 DA 07 20 20 20 20 20 |.. #40..!.. |
00000F80: 20 20 20 20 90 8C 20 4D 4F 56 45 4C 4F 4F 50 00 | .. MOVELOOP.|
00000F90: BA 21 E4 07 20 20 20 20 20 20 20 20 20 90 B6 00 |.!.. ...|
00000FA0: C0 21 EE 07 3B 00 C6 21 F8 07 3B 00 CC 21 02 08 |.!..;..!..;..!..|
00000FB0: 3B 00 D7 21 0C 08 82 20 50 41 53 53 00 E1 21 88 |;..!... PASS..!.|
00000FC0: 13 99 22 93 22 3B 00 15 22 92 13 41 24 28 30 29 |..".";.."..A$(0)|
00000FD0: B2 22 4C 4F 56 45 20 48 41 53 20 47 4F 4E 45 2C |."LOVE HAS GONE,|
00000FE0: 20 4C 4F 56 45 20 48 41 53 20 54 55 52 4E 45 44 | LOVE HAS TURNED|
00000FF0: 20 54 4F 20 50 41 49 4E 2E 22 00 49 22 9C 13 41 | TO PAIN.".I"..A|
00001000: 24 28 31 29 B2 22 54 48 45 20 46 45 45 4C 49 4E |$(1)."THE FEELIN|
00001010: 47 20 49 53 20 57 52 4F 4E 47 2C 20 4A 4F 59 20 |G IS WRONG, JOY |
00001020: 48 41 53 20 54 55 52 4E 45 44 20 54 4F 22 00 7D |HAS TURNED TO".}|
00001030: 22 A6 13 41 24 28 32 29 B2 22 50 41 49 4E 2E 20 |"..A$(2)."PAIN. |
00001040: 57 49 4C 4C 20 57 45 20 45 56 45 52 20 42 45 20 |WILL WE EVER BE |
00001050: 54 48 45 20 53 41 4D 45 3F 20 20 20 20 20 20 20 |THE SAME? |
00001060: 20 22 00 88 22 B0 13 9E 20 47 4F 32 34 00 95 22 | ".."... GO24.."|
00001070: BA 13 97 20 53 43 4C 59 2C 30 00 A0 22 C4 13 4C |... SCLY,0.."..L|
00001080: 49 4E 45 B2 30 00 B1 22 CE 13 81 20 4C 4F 4F 50 |INE.0.."... LOOP|
00001090: B2 30 20 A4 20 39 00 C0 22 D8 13 99 20 41 24 28 |.0 . 9.."... A$(|
000010A0: 4C 4F 4F 50 29 00 D3 22 E2 13 81 20 53 43 52 4F |LOOP).."... SCRO|
000010B0: 4C 4C B2 30 20 A4 20 37 00 E5 22 EC 13 97 20 53 |LL.0 . 7.."... S|
000010C0: 43 4C 59 2C 53 43 52 4F 4C 4C 00 F2 22 F6 13 82 |CLY,SCROLL.."...|
000010D0: 20 53 43 52 4F 4C 4C 00 03 23 00 14 9E 20 53 43 | SCROLL..#... SC|
000010E0: 4C 53 43 52 44 4F 57 4E 00 09 23 0A 14 82 00 00 |LSCRDOWN..#.....|
000010F0: 00 12 07 00 20 20 20 22 43 55 52 53 4F 52 2E 46 |.... "CURSOR.F|
00001100: 2E 41 22 20 20 20 20 20 20 20 50 52 47 |.A" PRG |
..-.... PASS.1 . 3.<..... 49152,0.V....
PASS.3 . .. 49152,1.V.D.; SMOOTH SCROLLI
NG ROUTINES.|.N.;...X.;.....SCLSCR .
$E8EA; SCROLL SCREEN UP ONE LINE.....;.J
...SCLX: .. 0... .SCLY: .. 0.....SCL
ROW: .. 0.....FROMROW:.. 0.....TOROW: .
. 0.....;.=.H.; "GO38" SET SCREEN . 38 C
OLUMN MODE.C.R.;.Z...GO38: .. $D016.
O... . #247..... .. $D
016..... .......;.F...; "GO40"
SET SCREEN . 40 COLUMN MODE.L...;...".GO
40: .. $D016...,. .. #8...6
. .. $D016...@. ...%.J
.;.K.T.; "GO24" SET SCREEN . 24 ROW MODE
.Q.^.;.H.H.GO24: .. $D011.}.R.
. #247...|. .. $D011.....
.......;.Q...; "GO25" SET SCREEN
. 25 ROW MODE.W...;.....GO25: .. $D
011..... .. #8...B. ..
$D011.*.L. ...0.V.;.[...; "SCR
OLLX" SCROLL SCREEN RIGHT . LEFT.A...;.X
...SCROLLX: .. $D016..... . #2
48..... .. SCLX..... .
. $D016.K... ...Q.&.;...0.; "SC
ROLLY" SCROLL SCREEN UP . DOWN...:.;...D
.SCROLLY: .. $D011.+.N. . #248
.A.X. .. SCLY.X.B. ..
$D011.I.L. ...O.V.;.....; "XLIN
ESCL" SHIFT LINE RIGHT . LEFT.....;.....
XLINESCL: .. SCLROW.K... .. $D6
..... .. #$00..... ..
$D3.;... .. $E56C; CALC. POINTE
R . SCREEN RAM, STORE IN $D1.$D2.A.F.;..
.P. .. $EA24; CALC. POINTER . C
OLOUR RAM, STORE IN $F3.$F4...Z.;.....
.. SCLX..... .. LEFTSCL
.A...;.T...; SCROLL RIGHT.Z...;.....
.. #1... .;...*.RIGHTLOOP:.....4.
.../.>. .. ($D1),Y.@.H
. ...Y.R. .. ($D1),Y.J
.\. ...{.F. .....P.
.. ($F3),Y...Z. .......
.. ($F3),Y.O... ......
. ....... . #40.....
.. RIGHTLOOP.!... ...'
...;.-...;.B...LEFTSCL: .. #38.H.J.;.Y.
T.LEFTLOOP: ...J... .......
.. ($D1),Y..... .......
.. ($D1),Y..... ...J...
....... .. ($F3),Y...$.
....... .. ($F3),Y...8.
...*.B. ...?.V. .
#$FF.X.`. .. LEFTLOOP.H.J.
...N.T.;...~.; "SCLSCRX" SCROLL SCREE
N LEFT . RIGHT.....;.....SCLSCRX: .. #$0
0.K... .. SCLROW.Q...;.....SCRLO
OP: .. XLINESCL..... .. SCLROW..
.D. .. SCLROW.,.N. .. #2
5.D.X. .. SCRLOOP.T... .
..Z...;.....; "SCLSCRUP" SCROLL SCREEN U
P ONE LINE......;.....SCLSCRUP:.. #$01..
... .. SCLROW.....;.U.(.UPLOOP:
.. SCLROW...2. .. FROMROW...<.
.. SCLROW...F. .. TOROW.
.Z.;.9.D. .. CALCADDR.Q.X.
.. MOVEROW.W...;.N... .. SCL
ROW..... .. SCLROW... .
.. #25..... .. UPLOOP.....
...F...;...H.; "SCLSCRDOWN" SCROLL SC
REEN DOWN ONE LINE....R.;.....SCLSCRDOWN
:.. #$17.,... .. SCLROW.2...;.
K...DOWNLOOP: .. SCLROW.E...
.. FROMROW.}... .. TOROW.....
.. TOROW...".;...,.
.. CALCADDR.P.6. .. MOVEROW.V.
@.;...J. .. SCLROW...T.
.. DOWNLOOP...^. ...".H.;.
].R.; "CALCADDR" CALCULATE ADDRESS . SOU
RCE . TARGET ROWS..C.|.;.{...CALCADDR:..
FROMROW..... .. $E56C; CALC. PO
INTER . SCREEN RAM, STORE IN $D1.$D2.E..
.;..... .. $EA24; CALC. POINTER
. COLOUR RAM, STORE IN $F3.$F4.....;.#..
. .. $D1.7.B. .. $D2.K.L
. .. $FC._.V. .. $FD.E..
.;.Y... .. $F3..... .. $
F4..... .. $FE..... .. $
FF.....;.Q... .. TOROW.. &.
.. $E56C; CALC. POINTER . SCREEN RAM
, STORE IN $D1.$D2.. 0.;._ :. ..
$EA24; CALC. POINTER . COLOUR RAM, STOR
E IN $F3.$F4.E D.;.U N. ...{ X.;
.. B.; "MOVEROW" MOVE A ROW WITH ADDR. I
N ($FC.FD) . ROW IN ($D1.D2).. L.; COLOU
RS FROM ($FE.FF) . ($F3.F4).. V.;..!..MO
VEROW: .. #$00..!..;..!..MOVELOOP:.. ($F
C),Y.7!.. .. ($D1),Y.O!..
.. ($FE),Y.G!.. .. ($F3),Y.M!.
.;.}!F. ....!P. . #40..
!Z. .. MOVELOOP..!.. ...
.!..;.F!..;.L!..;.W!... PASS..!...".";..
"..A$(0)."LOVE HAS GONE, LOVE HAS TURNED
TO PAIN.".I"..A$(1)."THE FEELING IS WRO
NG, JOY HAS TURNED TO".}"..A$(2)."PAIN.
WILL WE EVER BE THE SAME? ".."...
GO24.."... SCLY,0. "D.LINE.0.."N.. LOOP
.0 . 9.."X.. A$(LOOP).S"... SCROLL.0 . 7
.."... SCLY,SCROLL.."... SCROLL..#... SC
LSCRDOWN..#......... "CURSOR.F.A"
PRG
> CLICK IMAGE PREVIEW FOR FULL MODAL