PROJECTOR CTRL
FILE INFORMATION
FILENAME(S): PROJECTOR CTRL
FILE TYPE(S): PRG
FILE SIZE: 1.2K
FIRST SEEN: 2025-11-30 21:12:59
APPEARS ON: 1 disk(s)
FILE HASH
9d99b2f39c698e81ff41f32f7cf11b5cb4b78e2957cf4db8a8563e5159f15aa3
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TRANSACTOR 4 | PROJECTOR CTRL | PRG | DuncanTwain | 24 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 35 04 00 00 8F 20 54 48 45 20 54 52 41 4E |..5.... THE TRAN| 00000010: 53 41 43 54 4F 52 20 56 4F 4C 55 4D 45 20 35 20 |SACTOR VOLUME 5 | 00000020: 49 53 53 55 45 20 30 35 20 20 20 20 20 20 50 41 |ISSUE 05 PA| 00000030: 47 45 20 36 38 00 6C 04 64 00 8F 20 2A 2A 20 54 |GE 68.l.d.. ** T| 00000040: 45 44 20 45 56 45 52 53 20 2D 20 4D 2E 53 2E 53 |ED EVERS - M.S.S| 00000050: 2E 42 2E 20 54 4F 52 4F 4E 54 4F 20 3A 20 55 50 |.B. TORONTO : UP| 00000060: 44 41 54 45 20 53 45 50 54 2F 38 34 00 94 04 69 |DATE SEPT/84...i| 00000070: 00 8F 20 2A 2A 20 46 4F 52 20 55 53 45 20 57 49 |.. ** FOR USE WI| 00000080: 54 48 20 50 45 54 2F 43 42 4D 2F 43 36 34 2F 56 |TH PET/CBM/C64/V| 00000090: 49 43 32 30 00 A1 04 6E 00 99 20 C7 28 31 34 37 |IC20...n.. .(147| 000000A0: 29 00 D8 04 73 00 43 44 24 B2 C7 28 31 37 29 AA |)...s.CD$..(17).| 000000B0: C7 28 31 37 29 AA C7 28 31 37 29 AA C7 28 31 37 |.(17)..(17)..(17| 000000C0: 29 AA C7 28 31 37 29 3A 20 8F 20 2D 20 43 55 52 |)..(17): . - CUR| 000000D0: 53 4F 52 20 44 4F 57 4E 00 10 05 78 00 43 52 24 |SOR DOWN...x.CR$| 000000E0: B2 C7 28 32 39 29 AA C7 28 32 39 29 AA C7 28 32 |..(29)..(29)..(2| 000000F0: 39 29 AA C7 28 32 39 29 AA C7 28 32 39 29 3A 20 |9)..(29)..(29): | 00000100: 8F 20 2D 20 43 55 52 53 4F 52 20 52 49 47 48 54 |. - CURSOR RIGHT| 00000110: 00 56 05 7D 00 4D B2 35 39 34 35 39 3A 4E B2 35 |.V.}.M.59459:N.5| 00000120: 39 34 37 31 3A 8F 20 2A 2A 20 50 45 54 2F 43 42 |9471:. ** PET/CB| 00000130: 4D 20 2D 20 44 41 54 41 20 44 49 52 45 43 54 49 |M - DATA DIRECTI| 00000140: 4F 4E 20 52 45 47 20 41 2C 20 4F 55 54 50 55 54 |ON REG A, OUTPUT| 00000150: 20 52 45 47 20 41 00 7A 05 82 00 8F 20 3A 20 4D | REG A.z.... : M| 00000160: 3D 35 36 35 37 39 3A 4E 3D 35 36 35 37 37 3A 52 |=56579:N=56577:R| 00000170: 45 4D 20 2A 2A 20 43 2D 36 34 00 A0 05 87 00 8F |EM ** C-64......| 00000180: 20 3A 20 4D 3D 33 37 31 33 38 3A 4E 3D 33 37 31 | : M=37138:N=371| 00000190: 33 36 3A 52 45 4D 20 2A 2A 20 56 49 43 20 32 30 |36:REM ** VIC 20| 000001A0: 00 D9 05 8C 00 97 20 4D 2C 33 3A 97 20 4E 2C 33 |...... M,3:. N,3| 000001B0: 20 3A 8F 20 2D 20 53 45 54 20 50 4F 52 54 53 20 | :. - SET PORTS | 000001C0: 30 20 2B 20 31 20 41 53 20 4F 55 54 50 55 54 53 |0 + 1 AS OUTPUTS| 000001D0: 20 41 4E 44 20 48 49 47 48 00 0C 06 91 00 99 20 | AND HIGH...... | 000001E0: CA 28 43 44 24 2C 33 29 CA 28 43 52 24 2C 34 29 |.(CD$,3).(CR$,4)| 000001F0: 22 20 20 20 53 4C 49 44 45 20 50 52 4F 4A 45 43 |" SLIDE PROJEC| 00000200: 54 4F 52 20 43 4F 4E 54 52 4F 4C 22 00 39 06 96 |TOR CONTROL".9..| 00000210: 00 99 20 CA 28 43 44 24 2C 34 29 CA 28 43 52 24 |.. .(CD$,4).(CR$| 00000220: 2C 34 29 22 20 20 20 20 20 20 20 20 44 45 4D 4F |,4)" DEMO| 00000230: 20 50 52 4F 47 52 41 4D 22 00 67 06 9B 00 99 20 | PROGRAM".g.... | 00000240: CA 28 43 44 24 2C 31 29 CA 28 43 52 24 2C 31 29 |.(CD$,1).(CR$,1)| 00000250: 22 28 46 29 20 41 44 56 41 4E 43 45 53 20 4D 41 |"(F) ADVANCES MA| 00000260: 47 41 5A 49 4E 45 22 00 95 06 A0 00 99 20 CA 28 |GAZINE"...... .(| 00000270: 43 44 24 2C 34 29 CA 28 43 52 24 2C 31 29 22 28 |CD$,4).(CR$,1)"(| 00000280: 52 29 20 52 45 56 45 52 53 45 53 20 4D 41 47 41 |R) REVERSES MAGA| 00000290: 5A 49 4E 45 22 00 AC 06 A5 00 A1 41 24 3A 20 8B |ZINE"......A$: .| 000002A0: 20 41 24 B2 22 22 20 A7 20 31 36 35 00 C1 06 AA | A$."" . 165....| 000002B0: 00 8B 20 41 24 B2 22 46 22 20 A7 20 8D 20 31 39 |.. A$."F" . . 19| 000002C0: 35 00 D6 06 AF 00 8B 20 41 24 B2 22 52 22 20 A7 |5...... A$."R" .| 000002D0: 20 8D 20 32 34 35 00 E0 06 B4 00 89 20 31 36 35 | . 245...... 165| 000002E0: 00 E6 06 B9 00 3A 00 03 07 BE 00 8F 20 2A 2A 20 |.....:...... ** | 000002F0: 41 44 56 41 4E 43 45 20 4D 41 47 41 5A 49 4E 45 |ADVANCE MAGAZINE| 00000300: 20 2A 2A 00 27 07 C3 00 58 B2 C2 28 4E 29 3A 8F | **.'...X..(N):.| 00000310: 20 2D 20 52 45 54 41 49 4E 20 43 55 52 52 45 4E | - RETAIN CURREN| 00000320: 54 20 56 41 4C 55 45 00 49 07 C8 00 58 B2 58 20 |T VALUE.I...X.X | 00000330: AF 20 A8 20 31 20 3A 8F 20 2D 20 54 55 52 4E 20 |. . 1 :. - TURN | 00000340: 4F 46 46 20 42 49 54 20 30 00 68 07 CD 00 97 20 |OFF BIT 0.h.... | 00000350: 4E 2C 58 20 3A 8F 20 2D 20 50 4F 4B 45 20 49 54 |N,X :. - POKE IT| 00000360: 20 42 41 43 4B 20 49 4E 00 71 07 D2 00 4B B2 54 | BACK IN.q...K.T| 00000370: 49 00 94 07 D7 00 8B 20 54 49 B3 4B AA 32 30 20 |I...... TI.K.20 | 00000380: A7 20 32 31 35 20 3A 8F 20 2D 20 57 41 49 54 20 |. 215 :. - WAIT | 00000390: 4C 4F 4F 50 00 B3 07 DC 00 58 B2 58 20 B0 20 31 |LOOP.....X.X . 1| 000003A0: 20 3A 8F 20 2D 20 54 55 52 4E 20 4F 4E 20 42 49 | :. - TURN ON BI| 000003B0: 54 20 30 00 BD 07 E1 00 97 20 4E 2C 58 00 C3 07 |T 0...... N,X...| 000003C0: E6 00 8E 00 C9 07 EB 00 3A 00 E6 07 F0 00 8F 20 |........:...... | 000003D0: 2A 2A 20 52 45 56 45 52 53 45 20 4D 41 47 41 5A |** REVERSE MAGAZ| 000003E0: 49 4E 45 20 2A 2A 00 0A 08 F5 00 58 B2 C2 28 4E |INE **.....X..(N| 000003F0: 29 3A 8F 20 2D 20 52 45 54 41 49 4E 20 43 55 52 |):. - RETAIN CUR| 00000400: 52 45 4E 54 20 56 41 4C 55 45 00 2C 08 FA 00 58 |RENT VALUE.,...X| 00000410: B2 58 20 AF 20 A8 20 32 20 3A 8F 20 2D 20 54 55 |.X . . 2 :. - TU| 00000420: 52 4E 20 4F 46 46 20 42 49 54 20 31 00 4B 08 FF |RN OFF BIT 1.K..| 00000430: 00 97 20 4E 2C 58 20 3A 8F 20 2D 20 50 4F 4B 45 |.. N,X :. - POKE| 00000440: 20 49 54 20 42 41 43 4B 20 49 4E 00 54 08 04 01 | IT BACK IN.T...| 00000450: 4B B2 54 49 00 77 08 09 01 8B 20 54 49 B3 4B AA |K.TI.w.... TI.K.| 00000460: 32 30 20 A7 20 32 36 35 20 3A 8F 20 2D 20 57 41 |20 . 265 :. - WA| 00000470: 49 54 20 4C 4F 4F 50 00 96 08 0E 01 58 B2 58 20 |IT LOOP.....X.X | 00000480: B0 20 32 20 3A 8F 20 2D 20 54 55 52 4E 20 4F 4E |. 2 :. - TURN ON| 00000490: 20 42 49 54 20 31 00 A0 08 13 01 97 20 4E 2C 58 | BIT 1...... N,X| 000004A0: 00 A6 08 18 01 8E 00 00 00 |......... |
..5.... THE TRANSACTOR VOLUME 5 ISSUE 05
PAGE 68.L.D.. ** TED EVERS - M.S.S
.B. TORONTO : UPDATE SEPT/84...I.. ** FO
R USE WITH PET/CBM/C64/VIC20...N.. G(147
).X.S.CD$.G(17).G(17).G(17).G(17).G(17):
. - CURSOR DOWN...X.CR$.G(29).G(29).G(2
9).G(29).G(29): . - CURSOR RIGHT.V.}.M.5
9459:N.59471:. ** PET/CBM - DATA DIRECTI
ON REG A, OUTPUT REG A.Z.... : M=56579:N
=56577:REM ** C-64. .... : M=37138:N=371
36:REM ** VIC 20.Y.... M,3:. N,3 :. - SE
T PORTS 0 + 1 AS OUTPUTS AND HIGH......
J(CD$,3)J(CR$,4)" SLIDE PROJECTOR CONT
ROL".9.... J(CD$,4)J(CR$,4)" DEMO
PROGRAM".G.... J(CD$,1)J(CR$,1)"(F) ADV
ANCES MAGAZINE"... .. J(CD$,4)J(CR$,1)"(
R) REVERSES MAGAZINE"......A$: . A$."" .
165.A.... A$."F" . . 195.V.... A$."R" .
. 245...... 165.....:...... ** ADVANCE
MAGAZINE **.'.C.X.B(N):. - RETAIN CURREN
T VALUE.I.H.X.X . . 1 :. - TURN OFF BIT
0.H.M.. N,X :. - POKE IT BACK IN.Q.R.K.T
I...W.. TI.K.20 . 215 :. - WAIT LOOP....
.X.X . 1 :. - TURN ON BIT 0...... N,X.C.
....I...:...... ** REVERSE MAGAZINE **..
...X.B(N):. - RETAIN CURRENT VALUE.,...X
.X . . 2 :. - TURN OFF BIT 1.K.... N,X :
. - POKE IT BACK IN.T...K.TI.W.... TI.K.
20 . 265 :. - WAIT LOOP.....X.X . 2 :. -
TURN ON BIT 1. .... N,X.........
> CLICK IMAGE PREVIEW FOR FULL MODAL