DEMOLOADER1
FILE INFORMATION
FILENAME(S): DEMOLOADER1
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-10-19 22:35:51
APPEARS ON: 1 disk(s)
FILE HASH
a47913380c435feba5f79285b3e08661a55eb853c67440fa107e887ed421a150
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RADD MAXX USP | DEMOLOADER1 | PRG | Radd Maxx | 7 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 19 08 05 00 50 B2 50 AA 31 3A 8B 20 50 B1 |......P.P.1:. P.| 00000010: 31 20 A7 20 89 20 33 30 30 00 3F 08 0A 00 8F 2A |1 . . 300.?....*| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000040: 65 08 0B 00 8F 2A 20 52 41 44 44 20 4D 41 58 58 |e....* RADD MAXX| 00000050: 21 21 20 55 53 50 20 20 20 20 20 20 20 20 20 20 |!! USP | 00000060: 20 20 20 20 2A 00 8B 08 0C 00 8F 2A 20 20 20 43 | *......* C| 00000070: 36 34 20 41 44 56 41 4E 43 45 44 20 44 45 4D 4F |64 ADVANCED DEMO| 00000080: 20 4C 4F 41 44 45 52 20 20 20 2A 00 B1 08 0D 00 | LOADER *.....| 00000090: 8F 2A 20 20 20 28 20 4D 55 4C 54 49 43 4F 4C 4F |.* ( MULTICOLO| 000000A0: 55 52 20 50 49 43 54 55 52 45 53 20 29 20 20 20 |UR PICTURES ) | 000000B0: 2A 00 D7 08 0E 00 8F 2A 20 20 20 20 20 20 20 20 |*......* | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 20 20 20 20 20 20 2A 00 FD 08 0F 00 8F 2A 20 20 | *......* | 000000E0: 20 54 48 49 53 20 50 52 4F 47 52 41 4D 20 44 45 | THIS PROGRAM DE| 000000F0: 4D 4F 4E 53 54 52 41 54 45 53 20 20 2A 00 23 09 |MONSTRATES *.#.| 00000100: 10 00 8F 2A 20 20 48 4F 57 20 59 4F 55 20 43 41 |...* HOW YOU CA| 00000110: 4E 20 4C 4F 41 44 20 41 20 50 49 43 54 55 52 45 |N LOAD A PICTURE| 00000120: 20 20 2A 00 49 09 11 00 8F 2A 20 20 43 52 45 41 | *.I....* CREA| 00000130: 54 45 44 20 42 59 20 41 52 54 20 53 54 55 44 49 |TED BY ART STUDI| 00000140: 4F 20 49 4E 54 4F 20 20 2A 00 6F 09 12 00 8F 2A |O INTO *.o....*| 00000150: 20 20 54 48 45 20 43 4F 4D 4D 4F 44 4F 52 45 20 | THE COMMODORE | 00000160: 36 34 20 46 4F 52 20 55 53 45 20 49 4E 20 2A 00 |64 FOR USE IN *.| 00000170: 95 09 13 00 8F 2A 20 20 59 4F 55 52 20 4F 57 4E |.....* YOUR OWN| 00000180: 20 50 52 4F 47 52 41 4D 53 2E 20 20 20 20 20 20 | PROGRAMS. | 00000190: 20 20 20 20 2A 00 BB 09 14 00 8F 2A 20 20 20 20 | *......* | 000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001B0: 20 20 20 20 20 20 20 20 20 20 2A 00 E1 09 15 00 | *.....| 000001C0: 8F 2A 20 20 57 52 49 54 54 45 4E 20 42 59 20 52 |.* WRITTEN BY R| 000001D0: 41 44 44 20 4D 41 58 58 20 20 20 20 20 20 20 20 |ADD MAXX | 000001E0: 2A 00 07 0A 16 00 8F 2A 20 20 46 4F 52 20 44 45 |*......* FOR DE| 000001F0: 4D 4F 53 20 4B 4F 41 4C 41 20 48 41 48 41 48 41 |MOS KOALA HAHAHA| 00000200: 48 41 48 41 21 20 2A 00 2D 0A 17 00 8F 2A 20 20 |HAHA! *.-....* | 00000210: 41 4E 44 20 4F 4E 45 53 20 55 20 57 52 49 47 48 |AND ONES U WRIGH| 00000220: 54 20 52 49 47 48 54 3F 3F 20 20 20 2A 00 53 0A |T RIGHT?? *.S.| 00000230: 19 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************| 00000240: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000250: 2A 2A 2A 00 6F 0A 1E 00 53 50 24 B2 22 20 20 20 |***.o...SP$." | 00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".| 00000270: 79 0A 31 00 99 3A 99 3A 99 00 A5 0A 32 00 99 20 |y.1..:.:....2.. | 00000280: 22 41 44 56 41 4E 43 45 44 20 44 45 4D 4F 4C 4F |"ADVANCED DEMOLO| 00000290: 41 44 45 52 20 2D 20 53 43 52 45 45 4E 20 4C 4F |ADER - SCREEN LO| 000002A0: 41 44 45 52 22 00 AD 0A 33 00 99 3A 99 00 B3 0A |ADER"...3..:....| 000002B0: 63 00 8F 00 D8 0A 64 00 8F 20 20 46 49 52 53 54 |c.....d.. FIRST| 000002C0: 20 47 45 54 20 54 48 45 20 46 49 4C 45 4E 41 4D | GET THE FILENAM| 000002D0: 45 20 4F 46 20 54 48 45 00 FD 0A 65 00 8F 20 20 |E OF THE...e.. | 000002E0: 44 45 53 49 52 45 44 20 50 49 43 54 55 52 45 2E |DESIRED PICTURE.| 000002F0: 20 4E 41 4D 45 53 20 41 52 45 20 31 36 00 21 0B | NAMES ARE 16.!.| 00000300: 66 00 8F 20 20 43 48 41 52 41 43 54 45 52 53 20 |f.. CHARACTERS | 00000310: 4C 4F 4E 47 2C 54 48 45 20 4C 41 53 54 20 54 57 |LONG,THE LAST TW| 00000320: 4F 00 41 0B 67 00 8F 20 20 4F 46 20 57 48 49 43 |O.A.g.. OF WHIC| 00000330: 48 20 41 52 45 20 41 4C 57 41 59 53 20 27 52 4D |H ARE ALWAYS 'RM| 00000340: 27 00 47 0B 68 00 8F 00 6B 0B 69 00 8F 20 20 54 |'.G.h...k.i.. T| 00000350: 48 49 53 20 52 4F 55 54 49 4E 45 20 41 44 44 53 |HIS ROUTINE ADDS| 00000360: 20 54 48 45 20 4C 41 53 54 20 35 00 8C 0B 6A 00 | THE LAST 5...j.| 00000370: 8F 20 20 43 48 41 52 41 43 54 45 52 53 20 4F 4E |. CHARACTERS ON| 00000380: 20 54 4F 20 54 48 45 20 45 4E 44 2E 00 92 0B 6B | TO THE END....k| 00000390: 00 8F 00 AD 0B 96 00 85 20 22 4E 41 4D 45 20 4F |........ "NAME O| 000003A0: 46 20 50 49 43 54 55 52 45 22 3B 41 24 00 CF 0B |F PICTURE";A$...| 000003B0: 9B 00 41 24 B2 C8 28 20 41 24 20 AA 20 53 50 24 |..A$..( A$ . SP$| 000003C0: 2C 20 31 32 20 29 20 AA 20 22 4D 50 49 43 22 00 |, 12 ) . "MPIC".| 000003D0: EC 0B A0 00 81 20 49 B2 31 A4 20 31 36 3A 41 B2 |..... I.1. 16:A.| 000003E0: C6 28 CA 28 41 24 2C 49 2C 31 29 29 00 0C 0C A5 |.(.(A$,I,1))....| 000003F0: 00 8B 20 28 41 B1 B2 31 39 32 29 AF 28 41 B3 B2 |.. (A..192).(A..| 00000400: 32 32 33 29 A7 20 41 B2 41 AB 39 36 00 1F 0C AA |223). A.A.96....| 00000410: 00 42 24 B2 42 24 AA C7 28 41 29 3A 20 82 49 00 |.B$.B$..(A): .I.| 00000420: 25 0C B4 00 8F 00 49 0C B5 00 8F 20 20 50 52 49 |%.....I.... PRI| 00000430: 4E 54 20 54 48 45 20 20 46 55 4C 4C 20 46 49 4C |NT THE FULL FIL| 00000440: 45 4E 41 4D 45 20 41 4E 44 00 6E 0C B6 00 8F 20 |ENAME AND.n.... | 00000450: 20 41 54 54 45 4D 50 54 20 54 4F 20 4C 4F 41 44 | ATTEMPT TO LOAD| 00000460: 20 54 48 45 20 46 49 4C 45 20 46 52 4F 4D 00 93 | THE FILE FROM..| 00000470: 0C B7 00 8F 20 20 54 48 45 20 44 49 53 4B 20 44 |.... THE DISK D| 00000480: 52 49 56 45 2E 20 28 43 48 41 4E 47 45 20 54 48 |RIVE. (CHANGE TH| 00000490: 45 20 38 00 B9 0C B8 00 8F 20 20 54 4F 20 41 20 |E 8...... TO A | 000004A0: 31 20 49 46 20 59 4F 55 20 57 49 53 48 20 54 4F |1 IF YOU WISH TO| 000004B0: 20 55 53 45 20 54 48 49 53 00 DE 0C B9 00 8F 20 | USE THIS...... | 000004C0: 20 50 52 4F 47 52 41 4D 20 54 4F 20 4C 4F 41 44 | PROGRAM TO LOAD| 000004D0: 20 50 49 43 54 55 52 45 53 20 46 52 4F 4D 00 01 | PICTURES FROM..| 000004E0: 0D BA 00 8F 20 20 54 48 45 20 43 41 53 53 45 54 |.... THE CASSET| 000004F0: 54 45 20 55 4E 49 54 20 49 4E 53 54 45 41 44 2E |TE UNIT INSTEAD.| 00000500: 29 00 07 0D BB 00 8F 00 25 0D C8 00 99 3A 99 22 |).......%....:."| 00000510: 4C 4F 4F 4B 49 4E 47 20 46 4F 52 20 27 22 3B 42 |LOOKING FOR '";B| 00000520: 24 3B 22 27 22 00 31 0D FA 00 93 42 24 2C 38 2C |$;"'".1....B$,8,| 00000530: 31 00 37 0D 2C 01 8F 00 59 0D 2D 01 8F 20 20 49 |1.7.,...Y.-.. I| 00000540: 46 20 57 45 20 47 45 54 20 54 4F 20 48 45 52 45 |F WE GET TO HERE| 00000550: 20 54 48 45 4E 20 54 48 45 00 7D 0D 2E 01 8F 20 | THEN THE.}.... | 00000560: 20 50 49 43 54 55 52 45 20 4D 55 53 54 20 48 41 | PICTURE MUST HA| 00000570: 56 45 20 4C 4F 41 44 45 44 2C 20 53 4F 00 A2 0D |VE LOADED, SO...| 00000580: 2F 01 8F 20 20 57 45 20 4D 55 53 54 20 4E 4F 57 |/.. WE MUST NOW| 00000590: 20 44 49 53 50 4C 41 59 20 49 54 2E 20 46 49 52 | DISPLAY IT. FIR| 000005A0: 53 54 00 C7 0D 30 01 8F 20 20 53 45 54 20 54 48 |ST...0.. SET TH| 000005B0: 45 20 53 43 52 45 45 4E 20 54 4F 20 4D 55 4C 54 |E SCREEN TO MULT| 000005C0: 49 43 4F 4C 4F 55 52 00 EB 0D 31 01 8F 20 20 48 |ICOLOUR...1.. H| 000005D0: 49 20 52 45 53 20 4D 4F 44 45 20 41 4E 44 20 54 |I RES MODE AND T| 000005E0: 48 45 20 53 54 41 52 54 20 4F 46 00 0F 0E 32 01 |HE START OF...2.| 000005F0: 8F 20 20 54 48 45 20 53 43 52 45 45 4E 20 54 4F |. THE SCREEN TO| 00000600: 20 4C 4F 43 41 54 49 4F 4E 20 38 31 39 32 2E 00 | LOCATION 8192..| 00000610: 35 0E 33 01 8F 20 20 28 54 48 49 53 20 49 53 20 |5.3.. (THIS IS | 00000620: 54 48 45 20 41 44 44 52 45 53 53 20 54 48 41 54 |THE ADDRESS THAT| 00000630: 20 46 49 4C 45 00 5A 0E 34 01 8F 20 20 49 53 20 | FILE.Z.4.. IS | 00000640: 53 41 56 45 44 20 46 52 4F 4D 20 42 59 20 41 52 |SAVED FROM BY AR| 00000650: 54 20 53 54 55 44 49 4F 2E 29 00 60 0E 35 01 8F |T STUDIO.).`.5..| 00000660: 00 83 0E 36 01 8F 20 20 43 4F 4E 53 55 4C 54 20 |...6.. CONSULT | 00000670: 54 48 45 20 43 36 34 20 50 52 4F 47 52 41 4D 4D |THE C64 PROGRAMM| 00000680: 45 52 53 00 A7 0E 37 01 8F 20 20 52 45 46 45 52 |ERS...7.. REFER| 00000690: 45 4E 43 45 20 4D 41 4E 55 41 4C 20 46 4F 52 20 |ENCE MANUAL FOR | 000006A0: 44 45 54 41 49 4C 53 00 CC 0E 38 01 8F 20 20 4F |DETAILS...8.. O| 000006B0: 46 20 48 4F 57 20 54 4F 20 50 4F 53 49 54 49 4F |F HOW TO POSITIO| 000006C0: 4E 20 54 48 45 20 53 43 52 45 45 4E 00 EF 0E 39 |N THE SCREEN...9| 000006D0: 01 8F 20 20 41 4E 44 20 53 45 54 20 54 48 45 20 |.. AND SET THE | 000006E0: 56 41 52 49 4F 55 53 20 44 49 53 50 4C 41 59 00 |VARIOUS DISPLAY.| 000006F0: 15 0F 3A 01 8F 20 20 4D 4F 44 45 53 20 46 4F 52 |..:.. MODES FOR| 00000700: 20 54 48 45 20 47 52 41 50 48 49 43 53 20 50 49 | THE GRAPHICS PI| 00000710: 43 54 55 52 45 00 1B 0F 3B 01 8F 00 34 0F 40 01 |CTURE...;...4.@.| 00000720: 97 20 35 33 32 37 32 2C C2 28 35 33 32 37 32 29 |. 53272,.(53272)| 00000730: 20 B0 20 38 00 4E 0F 4A 01 97 20 35 33 32 36 35 | . 8.N.J.. 53265| 00000740: 2C C2 28 35 33 32 36 35 29 20 B0 20 33 32 00 68 |,.(53265) . 32.h| 00000750: 0F 54 01 97 20 35 33 32 37 30 2C C2 28 35 33 32 |.T.. 53270,.(532| 00000760: 37 30 29 20 B0 20 31 36 00 6E 0F 90 01 8F 00 93 |70) . 16.n......| 00000770: 0F 91 01 8F 20 20 4E 4F 57 20 43 4F 50 59 20 54 |.... NOW COPY T| 00000780: 48 45 20 43 4F 4C 4F 55 52 20 44 41 54 41 20 46 |HE COLOUR DATA F| 00000790: 52 4F 4D 00 B7 0F 92 01 8F 20 20 54 48 45 20 4C |ROM...... THE L| 000007A0: 4F 41 44 45 44 20 46 49 4C 45 20 49 4E 54 4F 20 |OADED FILE INTO | 000007B0: 54 48 45 20 54 57 4F 00 D9 0F 93 01 8F 20 20 43 |THE TWO...... C| 000007C0: 4F 4C 4F 55 52 20 4D 45 4D 4F 52 59 20 41 52 45 |OLOUR MEMORY ARE| 000007D0: 41 53 2E 20 54 48 45 53 45 00 FF 0F 94 01 8F 20 |AS. THESE...... | 000007E0: 20 41 52 45 41 53 20 41 52 45 20 53 41 56 45 44 | AREAS ARE SAVED| 000007F0: 20 53 54 52 41 49 47 48 54 20 41 46 54 45 52 00 | STRAIGHT AFTER.| 00000800: 24 10 95 01 8F 20 20 54 48 45 20 45 4E 44 20 4F |$.... THE END O| 00000810: 46 20 54 48 45 20 53 43 52 45 45 4E 20 4D 45 4D |F THE SCREEN MEM| 00000820: 4F 52 59 2C 00 4A 10 96 01 8F 20 20 57 49 54 48 |ORY,.J.... WITH| 00000830: 20 41 20 31 36 20 42 59 54 45 20 47 41 50 20 49 | A 16 BYTE GAP I| 00000840: 4E 20 42 45 54 57 45 45 4E 2E 00 70 10 97 01 8F |N BETWEEN..p....| 00000850: 20 20 54 48 45 20 46 49 52 53 54 20 53 45 54 20 | THE FIRST SET | 00000860: 49 53 20 43 4F 50 49 45 44 20 54 4F 20 54 48 45 |IS COPIED TO THE| 00000870: 00 95 10 98 01 8F 20 20 4E 4F 52 4D 41 4C 20 54 |...... NORMAL T| 00000880: 45 58 54 20 53 43 52 45 45 4E 20 4D 45 4D 4F 52 |EXT SCREEN MEMOR| 00000890: 59 20 28 41 54 00 BA 10 99 01 8F 20 20 4C 4F 43 |Y (AT...... LOC| 000008A0: 41 54 49 4F 4E 53 20 31 30 32 34 20 54 4F 20 32 |ATIONS 1024 TO 2| 000008B0: 30 32 33 29 20 57 48 49 4C 45 00 DD 10 9A 01 8F |023) WHILE......| 000008C0: 20 20 54 48 45 20 53 45 43 4F 4E 44 20 53 45 54 | THE SECOND SET| 000008D0: 20 49 53 20 43 4F 50 49 45 44 20 54 4F 00 03 11 | IS COPIED TO...| 000008E0: 9B 01 8F 20 20 54 48 45 20 41 52 45 41 20 4E 4F |... THE AREA NO| 000008F0: 52 4D 41 4C 4C 59 20 55 53 45 44 20 46 4F 52 20 |RMALLY USED FOR | 00000900: 54 48 45 00 27 11 9C 01 8F 20 20 53 43 52 45 45 |THE.'.... SCREE| 00000910: 4E 20 43 4F 4C 4F 55 52 20 4D 45 4D 4F 52 59 20 |N COLOUR MEMORY | 00000920: 49 4E 20 54 45 58 54 00 4B 11 9D 01 8F 20 20 4D |IN TEXT.K.... M| 00000930: 4F 44 45 20 28 20 46 52 4F 4D 20 35 35 32 39 36 |ODE ( FROM 55296| 00000940: 20 54 4F 20 35 36 32 39 35 20 29 00 51 11 9E 01 | TO 56295 ).Q...| 00000950: 8F 00 75 11 9F 01 8F 20 20 20 54 48 49 53 20 49 |..u.... THIS I| 00000960: 53 20 53 49 4D 50 4C 59 20 50 45 52 46 4F 52 4D |S SIMPLY PERFORM| 00000970: 45 44 20 42 59 00 91 11 A0 01 8F 20 20 55 53 49 |ED BY...... USI| 00000980: 4E 47 20 54 57 4F 20 46 4F 52 20 4C 4F 4F 50 53 |NG TWO FOR LOOPS| 00000990: 3A 00 97 11 A1 01 8F 00 AE 11 A4 01 44 B2 31 30 |:...........D.10| 000009A0: 32 34 3A 53 B2 38 30 30 30 AA 38 31 39 32 00 C9 |24:S.8000.8192..| 000009B0: 11 AE 01 81 49 B2 30 A4 39 39 39 3A 97 44 AA 49 |....I.0.999:.D.I| 000009C0: 2C C2 28 53 AA 49 29 3A 82 00 E9 11 C2 01 44 B2 |,.(S.I):......D.| 000009D0: 35 35 32 39 36 3A 53 B2 38 30 30 30 AA 38 31 39 |55296:S.8000.819| 000009E0: 32 AA 31 36 AA 31 30 30 30 00 04 12 CC 01 81 49 |2.16.1000......I| 000009F0: B2 30 A4 39 39 39 3A 97 44 AA 49 2C C2 28 53 AA |.0.999:.D.I,.(S.| 00000A00: 49 29 3A 82 00 0A 12 F4 01 8F 00 30 12 F5 01 8F |I):........0....| 00000A10: 20 20 46 49 4E 41 4C 4C 59 20 43 4F 50 59 20 54 | FINALLY COPY T| 00000A20: 48 45 20 42 4F 52 44 45 52 20 43 4F 4C 4F 55 52 |HE BORDER COLOUR| 00000A30: 00 54 12 F6 01 8F 20 20 46 52 4F 4D 20 57 48 45 |.T.... FROM WHE| 00000A40: 52 45 20 49 54 20 49 53 20 53 54 4F 52 45 44 20 |RE IT IS STORED | 00000A50: 49 4E 54 4F 00 77 12 F7 01 8F 20 20 54 48 45 20 |INTO.w.... THE | 00000A60: 41 50 50 52 4F 50 52 49 41 54 45 20 52 45 47 49 |APPROPRIATE REGI| 00000A70: 53 54 45 52 20 49 4E 00 9C 12 F8 01 8F 20 20 54 |STER IN...... T| 00000A80: 48 45 20 56 49 43 20 43 48 49 50 2E 20 54 48 45 |HE VIC CHIP. THE| 00000A90: 20 42 4F 52 44 45 52 20 42 59 54 45 00 C2 12 F9 | BORDER BYTE....| 00000AA0: 01 8F 20 20 46 4F 4C 4C 4F 57 53 20 41 46 54 45 |.. FOLLOWS AFTE| 00000AB0: 52 20 54 48 45 20 43 4F 4C 4F 55 52 20 44 41 54 |R THE COLOUR DAT| 00000AC0: 41 2E 00 EB 12 FA 01 8F 20 20 20 20 49 54 20 49 |A....... IT I| 00000AD0: 53 20 55 53 55 41 4C 4C 59 20 42 4C 41 43 4B 20 |S USUALLY BLACK | 00000AE0: 2D 20 52 41 44 44 20 4D 41 58 58 00 03 13 26 02 |- RADD MAXX...&.| 00000AF0: 97 20 35 33 32 38 30 2C 20 C2 28 20 31 37 31 39 |. 53280, .( 1719| 00000B00: 32 20 29 00 19 13 30 02 97 20 35 33 32 38 31 2C |2 )...0.. 53281,| 00000B10: C2 28 20 31 37 31 39 33 29 00 1F 13 58 02 8F 00 |.( 17193)...X...| 00000B20: 43 13 59 02 8F 20 20 4E 4F 57 20 57 41 49 54 20 |C.Y.. NOW WAIT | 00000B30: 46 4F 52 20 41 20 4B 45 59 20 54 4F 20 42 45 20 |FOR A KEY TO BE | 00000B40: 48 49 54 00 66 13 5A 02 8F 20 20 41 4E 44 20 54 |HIT.f.Z.. AND T| 00000B50: 48 45 4E 20 52 45 53 54 4F 52 45 20 54 48 45 20 |HEN RESTORE THE | 00000B60: 4E 4F 52 4D 41 4C 00 7F 13 5B 02 8F 20 20 54 45 |NORMAL...[.. TE| 00000B70: 58 54 20 4D 4F 44 45 20 53 43 52 45 45 4E 2E 00 |XT MODE SCREEN..| 00000B80: A6 13 5C 02 8F 20 20 4F 52 20 53 54 41 52 54 20 |..\.. OR START | 00000B90: 54 4F 20 4C 4F 41 44 20 4F 52 20 57 48 41 54 45 |TO LOAD OR WHATE| 00000BA0: 56 45 52 21 21 21 00 C0 13 8A 02 A1 20 41 24 3A |VER!!!...... A$:| 00000BB0: 20 8B 20 41 24 20 B2 20 22 22 20 A7 20 36 35 30 | . A$ . "" . 650| 00000BC0: 00 E0 13 94 02 97 20 35 33 32 36 35 2C C2 28 35 |...... 53265,.(5| 00000BD0: 33 32 36 35 29 20 AF 20 28 32 35 35 AB 33 32 29 |3265) . (255.32)| 00000BE0: 00 FF 13 9E 02 97 20 35 33 32 37 32 2C C2 28 35 |...... 53272,.(5| 00000BF0: 33 32 37 32 29 20 AF 20 28 32 35 35 AB 38 29 00 |3272) . (255.8).| 00000C00: 1F 14 A8 02 97 20 35 33 32 37 30 2C C2 28 35 33 |..... 53270,.(53| 00000C10: 32 37 30 29 20 AF 20 28 32 35 35 AB 31 36 29 00 |270) . (255.16).| 00000C20: 3B 14 B2 02 99 22 93 22 3A 97 35 33 32 38 30 2C |;....".":.53280,| 00000C30: 31 34 3A 97 35 33 32 38 31 2C 36 00 00 00 |14:.53281,6... |
......P.P.1:. P.1 . . 300.?....*********
***********************.E....* RADD MAXX
!! USP *......* C64 ADVAN
CED DEMO LOADER *......* ( MULTICOLO
UR PICTURES ) *.W....*
*......* THIS PROGRAM DE
MONSTRATES *.#....* HOW YOU CAN LOAD A
PICTURE *.I....* CREATED BY ART STUDI
O INTO *.O....* THE COMMODORE 64 FOR U
SE IN *......* YOUR OWN PROGRAMS.
*......*
*......* WRITTEN BY RADD MAXX
*......* FOR DEMOS KOALA HAHAHAHAHA! *.
-....* AND ONES U WRIGHT RIGHT?? *.S.
...********************************.O...
SP$." ".Y.1..:.:....2..
"ADVANCED DEMOLOADER - SCREEN LOADER"...
3..:....C...X.D.. FIRST GET THE FILENAM
E OF THE...E.. DESIRED PICTURE. NAMES A
RE 16.!.F.. CHARACTERS LONG,THE LAST TW
O.A.G.. OF WHICH ARE ALWAYS 'RM'.G.H...
K.I.. THIS ROUTINE ADDS THE LAST 5...J.
. CHARACTERS ON TO THE END....K........
"NAME OF PICTURE";A$.O...A$.H( A$ . SP$
, 12 ) . "MPIC"... .. I.1. 16:A.F(J(A$,I
,1))...... (A..192).(A..223). A.A.96....
.B$.B$.G(A): .I.%.....I.... PRINT THE
FULL FILENAME AND.N.... ATTEMPT TO LOAD
THE FILE FROM...... THE DISK DRIVE. (C
HANGE THE 8...... TO A 1 IF YOU WISH TO
USE THIS...... PROGRAM TO LOAD PICTURE
S FROM...... THE CASSETTE UNIT INSTEAD.
).......%.H..:."LOOKING FOR '";B$;"'".1.
...B$,8,1.7.,...Y.-.. IF WE GET TO HERE
THEN THE.}.... PICTURE MUST HAVE LOADE
D, SO.../.. WE MUST NOW DISPLAY IT. FIR
ST.G.0.. SET THE SCREEN TO MULTICOLOUR.
..1.. HI RES MODE AND THE START OF...2.
. THE SCREEN TO LOCATION 8192..5.3.. (
THIS IS THE ADDRESS THAT FILE.Z.4.. IS
SAVED FROM BY ART STUDIO.).`.5.....6..
CONSULT THE C64 PROGRAMMERS...7.. REFER
ENCE MANUAL FOR DETAILS.L.8.. OF HOW TO
POSITION THE SCREEN...9.. AND SET THE
VARIOUS DISPLAY...:.. MODES FOR THE GRA
PHICS PICTURE...;...4.@.. 53272,B(53272)
. 8.N.J.. 53265,B(53265) . 32.H.T.. 532
70,B(53270) . 16.N.......... NOW COPY T
HE COLOUR DATA FROM...... THE LOADED FI
LE INTO THE TWO.Y.... COLOUR MEMORY ARE
AS. THESE...... AREAS ARE SAVED STRAIGH
T AFTER.$.... THE END OF THE SCREEN MEM
ORY,.J.... WITH A 16 BYTE GAP IN BETWEE
N..P.... THE FIRST SET IS COPIED TO THE
...... NORMAL TEXT SCREEN MEMORY (AT...
... LOCATIONS 1024 TO 2023) WHILE......
THE SECOND SET IS COPIED TO...... THE
AREA NORMALLY USED FOR THE.'.... SCREE
N COLOUR MEMORY IN TEXT.K.... MODE ( FR
OM 55296 TO 56295 ).Q.....U.... THIS I
S SIMPLY PERFORMED BY... .. USING TWO F
OR LOOPS:...........D.1024:S.8000.8192.I
....I.0.999:.D.I,B(S.I):....B.D.55296:S.
8000.8192.16.1000...L..I.0.999:.D.I,B(S.
I):........0.... FINALLY COPY THE BORDE
R COLOUR.T.... FROM WHERE IT IS STORED
INTO.W.... THE APPROPRIATE REGISTER IN.
..... THE VIC CHIP. THE BORDER BYTE.B..
.. FOLLOWS AFTER THE COLOUR DATA.......
IT IS USUALLY BLACK - RADD MAXX...&.
. 53280, B( 17192 )...0.. 53281,B( 17193
)...X...C.Y.. NOW WAIT FOR A KEY TO BE
HIT.F.Z.. AND THEN RESTORE THE NORMAL.
.[.. TEXT MODE SCREEN....\.. OR START
TO LOAD OR WHATEVER!!!...... A$: . A$ .
"" . 650...... 53265,B(53265) . (255.32)
...... 53272,B(53272) . (255.8)...... 53
270,B(53270) . (255.16).;....".":.53280,
14:.53281,6...
> CLICK IMAGE PREVIEW FOR FULL MODAL