DEMO 2
FILE INFORMATION
FILENAME(S): DEMO 2
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-10-19 22:48:38
APPEARS ON: 2 disk(s)
FILE HASH
5f28744e25ae1ed2c6ebf56e4f8b7fa54df3e53fde6e82065ff13f999732ef1c
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAZETTE FEB 86 | DEMO 2 | PRG | Radd Maxx | 25 | 2 | DOWNLOAD FILE |
| COMPUTE GAZ 1 4 | DEMO 2 | PRG | Sailor, Ganheden | 10 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 63 00 8B 41 B2 30 A7 41 B2 31 3A 93 |....c..A.0.A.1:.| 00000010: 22 42 4C 49 4E 4B 4F 42 4A 22 2C 38 2C 31 00 65 |"BLINKOBJ",8,1.e| 00000020: 08 64 00 8F 20 50 4F 4B 45 35 36 2C 32 38 3A 50 |.d.. POKE56,28:P| 00000030: 4F 4B 45 35 35 2C 30 3A 43 4C 52 20 46 4F 52 20 |OKE55,0:CLR FOR | 00000040: 56 49 43 2C 20 50 4F 4B 45 35 36 2C 36 30 3A 50 |VIC, POKE56,60:P| 00000050: 4F 4B 45 35 35 2C 30 3A 43 4C 52 20 46 4F 52 20 |OKE55,0:CLR FOR | 00000060: 2B 34 2F 31 36 00 7E 08 6E 00 4E 55 B2 31 35 3A |+4/16.~.n.NU.15:| 00000070: 8F 20 4E 55 3D 37 20 46 4F 52 20 56 49 43 00 C9 |. NU=7 FOR VIC..| 00000080: 08 78 00 56 31 B2 37 38 35 3A 56 32 B2 37 38 36 |.x.V1.785:V2.786| 00000090: 3A 43 4F B2 36 34 36 3A 48 49 B2 31 39 32 3A 8F |:CO.646:HI.192:.| 000000A0: 20 46 4F 52 20 2B 34 2F 31 36 2C 20 56 31 3D 31 | FOR +4/16, V1=1| 000000B0: 32 38 31 3A 56 32 3D 31 32 38 32 3A 43 4F 3D 31 |281:V2=1282:CO=1| 000000C0: 33 33 39 3A 48 49 3D 36 30 00 EE 08 82 00 8F 20 |339:HI=60...... | 000000D0: 46 4F 52 20 56 49 43 20 56 31 3D 31 3A 56 32 3D |FOR VIC V1=1:V2=| 000000E0: 32 3A 43 4F 3D 36 34 36 3A 48 49 3D 32 38 00 FF |2:CO=646:HI=28..| 000000F0: 08 8C 00 97 56 31 2C 30 3A 97 56 32 2C 48 49 00 |....V1,0:.V2,HI.| 00000100: 37 09 96 00 8F 20 2A 2A 20 43 48 41 4E 47 45 20 |7.... ** CHANGE | 00000110: 54 48 45 53 45 20 56 41 4C 55 45 53 20 54 4F 20 |THESE VALUES TO | 00000120: 43 48 41 4E 47 45 20 54 48 45 20 42 4C 49 4E 4B |CHANGE THE BLINK| 00000130: 20 43 4F 4C 4F 52 53 00 43 09 A0 00 86 43 54 28 | COLORS.C....CT(| 00000140: 4E 55 29 00 5C 09 AA 00 81 49 B2 30 A4 4E 55 3A |NU).\....I.0.NU:| 00000150: 43 54 28 49 29 B2 4E 55 AB 49 3A 82 00 A1 09 B4 |CT(I).NU.I:.....| 00000160: 00 8F 20 2A 2A 20 55 53 52 28 29 20 49 53 20 41 |.. ** USR() IS A| 00000170: 54 20 24 43 30 30 30 20 46 4F 52 20 36 34 2C 20 |T $C000 FOR 64, | 00000180: 24 33 43 30 30 20 46 4F 52 20 2B 34 2F 31 36 2C |$3C00 FOR +4/16,| 00000190: 20 24 31 43 30 30 20 46 4F 52 20 56 49 43 20 2A | $1C00 FOR VIC *| 000001A0: 2A 00 C3 09 BE 00 53 44 B2 31 36 33 38 34 3A 20 |*.....SD.16384: | 000001B0: 8F 20 2A 2A 20 53 45 54 20 44 45 4C 41 59 20 46 |. ** SET DELAY F| 000001C0: 4C 41 47 00 E4 09 C8 00 44 42 B2 38 31 39 32 20 |LAG.....DB.8192 | 000001D0: 3A 20 8F 20 2A 2A 20 44 49 53 41 42 4C 45 20 42 |: . ** DISABLE B| 000001E0: 4C 49 4E 4B 00 04 0A D2 00 45 42 B2 34 30 39 36 |LINK.....EB.4096| 000001F0: 20 3A 20 8F 20 2A 2A 20 45 4E 41 42 4C 45 20 42 | : . ** ENABLE B| 00000200: 4C 49 4E 4B 00 30 0A DC 00 53 42 B2 32 30 34 38 |LINK.0...SB.2048| 00000210: 20 3A 20 8F 20 2A 2A 20 53 54 4F 50 20 43 4F 4C | : . ** STOP COL| 00000220: 4F 52 20 46 52 4F 4D 20 42 4C 49 4E 4B 49 4E 47 |OR FROM BLINKING| 00000230: 00 5B 0A E6 00 4D 42 B2 31 30 32 34 20 3A 20 8F |.[...MB.1024 : .| 00000240: 20 2A 2A 20 4D 41 4B 45 20 43 4F 4C 4F 52 20 53 | ** MAKE COLOR S| 00000250: 54 41 52 54 20 42 4C 49 4E 4B 47 00 8D 0A F0 00 |TART BLINKG.....| 00000260: 56 42 B2 35 31 32 20 20 3A 20 8F 20 2A 2A 20 52 |VB.512 : . ** R| 00000270: 45 54 55 52 4E 20 56 41 4C 55 45 20 4F 46 20 42 |ETURN VALUE OF B| 00000280: 4C 49 4E 4B 49 4E 47 20 43 4F 4C 4F 52 00 BE 0A |LINKING COLOR...| 00000290: FA 00 52 43 B2 32 35 36 20 20 3A 20 8F 20 2A 2A |..RC.256 : . **| 000002A0: 20 52 45 53 45 54 20 41 4C 4C 20 43 4F 4C 4F 52 | RESET ALL COLOR| 000002B0: 53 2D 4E 4E 4F 20 42 4C 49 4E 4B 49 4E 47 00 E1 |S-NNO BLINKING..| 000002C0: 0A 04 01 8F 20 2A 2A 2A 20 4E 4F 57 20 57 45 20 |.... *** NOW WE | 000002D0: 44 45 4D 4F 4E 53 54 52 41 54 45 20 42 4C 49 4E |DEMONSTRATE BLIN| 000002E0: 4B 00 10 0B 0E 01 58 B2 B7 28 44 42 29 3A 20 8F |K.....X..(DB): .| 000002F0: 20 2A 2A 20 4D 55 53 54 20 44 49 53 41 42 4C 45 | ** MUST DISABLE| 00000300: 20 42 4C 49 4E 4B 4D 4F 44 45 20 46 49 52 53 54 | BLINKMODE FIRST| 00000310: 00 19 0B 18 01 99 22 93 22 00 47 0B 22 01 97 35 |......".".G."..5| 00000320: 33 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 3A |3280,0:.53281,0:| 00000330: 8F 20 4D 41 4B 45 20 42 41 43 4B 47 52 4F 55 4E |. MAKE BACKGROUN| 00000340: 44 20 42 4C 41 43 4B 00 7D 0B 2C 01 8F 20 46 4F |D BLACK.}.,.. FO| 00000350: 52 20 2B 34 2F 31 36 20 2D 20 43 4F 4C 4F 52 20 |R +4/16 - COLOR | 00000360: 30 2C 31 2C 37 3A 43 4F 4C 4F 52 20 34 2C 31 2C |0,1,7:COLOR 4,1,| 00000370: 37 20 49 4E 20 4C 49 4E 45 20 32 39 30 00 A5 0B |7 IN LINE 290...| 00000380: 36 01 8F 20 46 4F 52 20 56 49 43 20 2D 20 50 4F |6.. FOR VIC - PO| 00000390: 4B 45 33 36 38 37 39 2C 38 20 49 4E 20 4C 49 4E |KE36879,8 IN LIN| 000003A0: 45 20 32 39 30 00 CD 0B 40 01 81 20 4C B2 30 20 |E 290...@.. L.0 | 000003B0: A4 20 4E 55 3A 20 8F 20 2A 2A 20 53 45 54 20 41 |. NU: . ** SET A| 000003C0: 4C 4C 20 54 48 45 20 43 4F 4C 4F 52 53 00 DA 0B |LL THE COLORS...| 000003D0: 4A 01 43 4C B2 43 54 28 4C 29 00 10 0C 54 01 58 |J.CL.CT(L)...T.X| 000003E0: B2 B7 28 4D 42 AA 28 43 4C AC 31 36 29 AA 4C 29 |..(MB.(CL.16).L)| 000003F0: 3A 20 8F 20 2A 2A 20 53 45 54 20 54 48 45 20 43 |: . ** SET THE C| 00000400: 4F 4C 4F 52 20 54 4F 20 42 4C 49 4E 4B 20 54 4F |OLOR TO BLINK TO| 00000410: 00 39 0C 5E 01 97 43 4F 2C 4C 3A 8F 20 2A 2A 20 |.9.^..CO,L:. ** | 00000420: 43 48 41 4E 47 45 20 43 55 52 52 45 4E 54 20 43 |CHANGE CURRENT C| 00000430: 4F 4C 4F 52 20 54 4F 20 58 00 55 0C 68 01 99 22 |OLOR TO X.U.h.."| 00000440: 42 4C 49 4E 4B 49 4E 47 20 46 52 4F 4D 22 4C 22 |BLINKING FROM"L"| 00000450: 54 4F 22 43 4C 00 5D 0C 72 01 82 20 4C 00 88 0C |TO"CL.].r.. L...| 00000460: 7C 01 58 B2 B7 28 53 44 AA 36 30 29 3A 20 8F 20 ||.X..(SD.60): . | 00000470: 2A 20 53 45 54 20 42 4C 49 4E 4B 20 46 4F 52 20 |* SET BLINK FOR | 00000480: 31 20 53 45 43 4F 4E 44 00 A4 0C 86 01 99 3A 99 |1 SECOND......:.| 00000490: 22 48 49 54 20 41 20 4B 45 59 20 54 4F 20 53 54 |"HIT A KEY TO ST| 000004A0: 41 52 54 22 00 B8 0C 90 01 A1 41 24 3A 8B 41 24 |ART"......A$:.A$| 000004B0: B2 22 22 20 A7 34 30 30 00 C4 0C 9A 01 58 B2 B7 |."" .400.....X..| 000004C0: 28 45 42 29 00 CA 0C A4 01 80 00 00 00 |(EB)......... |
....C..A.0.A.1:."BLINKOBJ",8,1.E.D.. POK E56,28:POKE55,0:CLR FOR VIC, POKE56,60:P OKE55,0:CLR FOR +4/16.~.N.NU.15:. NU=7 F OR VIC.I.X.V1.785:V2.786:CO.646:HI.192:. FOR +4/16, V1=1281:V2=1282:CO=1339:HI=6 0...... FOR VIC V1=1:V2=2:CO=646:HI=28.. ....V1,0:.V2,HI.7.... ** CHANGE THESE VA LUES TO CHANGE THE BLINK COLORS.C. ..CT( NU).\....I.0.NU:CT(I).NU.I:....... ** US R() IS AT $C000 FOR 64, $3C00 FOR +4/16, $1C00 FOR VIC **.C...SD.16384: . ** SET DELAY FLAG...H.DB.8192 : . ** DISABLE B LINK...R.EB.4096 : . ** ENABLE BLINK.0.. .SB.2048 : . ** STOP COLOR FROM BLINKING .[...MB.1024 : . ** MAKE COLOR START BLI NKG.....VB.512 : . ** RETURN VALUE OF B LINKING COLOR.....RC.256 : . ** RESET A LL COLORS-NNO BLINKING...... *** NOW WE DEMONSTRATE BLINK.....X..(DB): . ** MUST DISABLE BLINKMODE FIRST......".".G."..5 3280,0:.53281,0:. MAKE BACKGROUND BLACK. }.,.. FOR +4/16 - COLOR 0,1,7:COLOR 4,1, 7 IN LINE 290...6.. FOR VIC - POKE36879, 8 IN LINE 290.M.@.. L.0 . NU: . ** SET A LL THE COLORS.Z.J.CL.CT(L)...T.X..(MB.(C L.16).L): . ** SET THE COLOR TO BLINK TO .9.^..CO,L:. ** CHANGE CURRENT COLOR TO X.U.H.."BLINKING FROM"L"TO"CL.].R.. L... |.X..(SD.60): . * SET BLINK FOR 1 SECOND ......:."HIT A KEY TO START"......A$:.A$ ."" .400.D...X..(EB).J.......
> CLICK IMAGE PREVIEW FOR FULL MODAL