TIM VEN SETUP.C
FILE INFORMATION
FILENAME(S): TIM VEN SETUP.C
FILE TYPE(S): PRG
FILE SIZE: 1.5K
FIRST SEEN: 2025-10-19 22:48:26
APPEARS ON: 1 disk(s)
FILE HASH
e65126f637bfa3d50cfe77a5b606af50179a985651196ef0c8bff5a4a0a01563
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG APRIL 83 C | TIM VEN SETUP.C | PRG | Radd Maxx | 8 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 24 08 05 00 83 55 50 2C 44 4F 57 4E 2C 4E |..$....UP,DOWN,N|
00000010: 4F 52 54 48 2C 53 4F 55 54 48 2C 45 41 53 54 2C |ORTH,SOUTH,EAST,|
00000020: 57 45 53 54 00 40 08 06 00 86 4D 24 28 35 29 3A |WEST.@....M$(5):|
00000030: 81 54 B2 30 A4 35 3A 87 4D 24 28 54 29 3A 82 54 |.T.0.5:.M$(T):.T|
00000040: 00 7D 08 08 00 99 22 93 54 48 45 20 54 49 4D 45 |.}....".THE TIME|
00000050: 20 4D 41 43 48 49 4E 45 20 49 53 20 53 45 54 20 | MACHINE IS SET |
00000060: 55 50 20 54 4F 20 47 4F 20 4F 4E 20 54 48 45 20 |UP TO GO ON THE |
00000070: 42 4F 54 54 4F 4D 20 4C 45 56 45 4C 22 00 C3 08 |BOTTOM LEVEL"...|
00000080: 09 00 99 22 11 53 4F 20 49 4E 20 54 48 45 20 52 |...".SO IN THE R|
00000090: 4F 4F 4D 20 59 4F 55 20 57 41 4E 54 20 49 54 20 |OOM YOU WANT IT |
000000A0: 54 4F 20 42 45 20 4E 45 58 54 20 54 4F 41 4C 4C |TO BE NEXT TOALL|
000000B0: 4F 57 20 49 54 20 54 4F 20 47 4F 20 44 4F 57 4E |OW IT TO GO DOWN|
000000C0: 21 21 22 00 DD 08 0A 00 85 22 4E 41 4D 45 20 4F |!!"......"NAME O|
000000D0: 46 20 53 45 43 54 49 4F 4E 22 3B 4E 24 00 FA 08 |F SECTION";N$...|
000000E0: 14 00 9F 31 2C 38 2C 32 2C 22 40 30 3A 54 49 4D |...1,8,2,"@0:TIM|
000000F0: 20 56 45 4E 31 2C 53 2C 57 22 00 12 09 15 00 85 | VEN1,S,W"......|
00000100: 22 44 49 4D 45 4E 53 49 4F 4E 53 22 3B 41 2C 42 |"DIMENSIONS";A,B|
00000110: 2C 43 00 34 09 1B 00 85 22 48 4F 57 20 4D 41 4E |,C.4...."HOW MAN|
00000120: 59 20 54 59 50 45 53 20 4F 46 20 52 4F 4F 4D 53 |Y TYPES OF ROOMS|
00000130: 22 3B 52 54 00 53 09 1C 00 98 31 2C 4E 24 3A 98 |";RT.S....1,N$:.|
00000140: 31 2C 41 AB 31 3A 98 31 2C 42 AB 31 3A 98 31 2C |1,A.1:.1,B.1:.1,|
00000150: 43 AB 31 00 5E 09 1F 00 98 31 2C 53 AB 31 00 78 |C.1.^....1,S.1.x|
00000160: 09 20 00 85 22 48 4F 57 20 4D 41 4E 59 20 46 49 |. .."HOW MANY FI|
00000170: 47 48 54 53 22 3B 42 45 00 84 09 21 00 98 31 2C |GHTS";BE...!..1,|
00000180: 42 45 AB 31 00 A1 09 22 00 85 22 48 4F 57 20 4D |BE.1...".."HOW M|
00000190: 41 4E 59 20 54 52 45 41 53 55 52 45 53 22 3B 54 |ANY TREASURES";T|
000001A0: 52 00 AD 09 23 00 98 31 2C 54 52 AB 31 00 D0 09 |R...#..1,TR.1...|
000001B0: 24 00 85 22 48 4F 57 20 4D 41 4E 59 20 47 49 46 |$.."HOW MANY GIF|
000001C0: 54 53 20 54 4F 20 42 45 41 53 54 53 22 3B 47 42 |TS TO BEASTS";GB|
000001D0: 00 DC 09 25 00 98 31 2C 47 42 AB 31 00 01 0A 26 |...%..1,GB.1...&|
000001E0: 00 85 22 48 4F 57 20 4D 41 4E 59 20 43 4F 4D 4D |.."HOW MANY COMM|
000001F0: 45 4E 54 53 20 4F 4E 20 52 4F 4F 4D 53 22 3B 52 |ENTS ON ROOMS";R|
00000200: 43 00 0D 0A 27 00 98 31 2C 52 43 AB 31 00 30 0A |C...'..1,RC.1.0.|
00000210: 28 00 85 22 54 4F 54 41 4C 20 41 4D 4F 55 4E 54 |(.."TOTAL AMOUNT|
00000220: 20 4F 46 20 54 52 45 41 53 55 52 45 22 3B 54 54 | OF TREASURE";TT|
00000230: 00 3A 0A 29 00 98 31 2C 54 54 00 53 0A 32 00 81 |.:.)..1,TT.S.2..|
00000240: 54 B2 31 A4 41 3A 81 52 B2 31 A4 42 3A 81 53 B2 |T.1.A:.R.1.B:.S.|
00000250: 31 A4 43 00 69 0A 3C 00 99 22 52 4F 4F 4D 20 22 |1.C.i.<.."ROOM "|
00000260: 54 22 2C 22 52 22 2C 22 53 00 80 0A 46 00 85 22 |T","R","S...F.."|
00000270: 4E 41 4D 45 20 4F 46 20 52 4F 4F 4D 22 3B 4E 24 |NAME OF ROOM";N$|
00000280: 00 95 0A 50 00 85 22 52 4F 4F 4D 20 54 59 50 45 |...P.."ROOM TYPE|
00000290: 22 3B 4E 31 24 00 A0 0A 64 00 81 57 B2 30 A4 35 |";N1$...d..W.0.5|
000002A0: 00 BA 0A 6E 00 99 22 43 41 4E 20 59 4F 55 20 47 |...n.."CAN YOU G|
000002B0: 4F 20 20 22 4D 24 28 57 29 3B 00 C2 0A 78 00 85 |O "M$(W);...x..|
000002C0: 46 24 00 D6 0A 82 00 8B 46 24 B2 22 59 22 A7 58 |F$......F$."Y".X|
000002D0: B2 58 AA 32 AE 57 00 DD 0A 8C 00 82 57 00 F5 0A |.X.2.W......W...|
000002E0: 96 00 4E 24 B2 C7 28 58 29 AA C9 28 4E 31 24 2C |..N$..(X)..(N1$,|
000002F0: 31 29 AA 4E 24 00 FF 0A A0 00 98 31 2C 4E 24 00 |1).N$......1,N$.|
00000300: 14 0B AA 00 4E 24 B2 22 22 3A 58 B2 2E 3A 82 53 |....N$."":X..:.S|
00000310: 2C 52 2C 54 00 20 0B B4 00 81 54 B2 31 A4 52 54 |,R,T. ....T.1.RT|
00000320: 00 35 0B BE 00 99 22 52 4F 4F 4D 20 54 59 50 45 |.5...."ROOM TYPE|
00000330: 20 23 22 54 3B 00 3D 0B C8 00 85 44 24 00 4A 0B | #"T;.=....D$.J.|
00000340: D2 00 98 31 2C 44 24 3A 82 54 00 56 0B DC 00 81 |...1,D$:.T.V....|
00000350: 54 B2 31 A4 42 45 00 74 0B E6 00 85 22 52 4F 4F |T.1.BE.t...."ROO|
00000360: 4D 20 23 20 42 45 41 53 54 20 47 4F 45 53 20 49 |M # BEAST GOES I|
00000370: 4E 22 3B 4E 00 80 0B F0 00 4E 24 B2 C7 28 4E 29 |N";N.....N$..(N)|
00000380: 00 A1 0B FA 00 85 22 47 49 46 54 20 4E 55 4D 42 |......"GIFT NUMB|
00000390: 45 52 20 28 30 20 49 46 20 4E 4F 4E 45 29 22 3B |ER (0 IF NONE)";|
000003A0: 4E 00 B5 0B 04 01 4E 24 B2 4E 24 AA C9 28 C4 28 |N.....N$.N$..(.(|
000003B0: 4E 29 2C 31 29 00 CE 0B 0E 01 85 22 4E 41 4D 45 |N),1)......"NAME|
000003C0: 20 4F 46 20 42 45 41 53 54 22 3B 4E 31 24 00 D9 | OF BEAST";N1$..|
000003D0: 0B 18 01 98 31 2C 4E 31 24 00 F5 0B 22 01 85 22 |....1,N1$...".."|
000003E0: 43 4F 4D 4D 45 4E 54 20 4F 4E 20 42 45 41 53 54 |COMMENT ON BEAST|
000003F0: 22 3B 4E 32 24 00 03 0C 2C 01 4E 24 B2 4E 24 AA |";N2$...,.N$.N$.|
00000400: 4E 32 24 00 0D 0C 36 01 98 31 2C 4E 24 00 14 0C |N2$...6..1,N$...|
00000410: 40 01 82 54 00 20 0C 4A 01 81 54 B2 31 A4 54 52 |@..T. .J..T.1.TR|
00000420: 00 41 0C 54 01 85 22 4E 55 4D 42 45 52 20 4F 46 |.A.T.."NUMBER OF|
00000430: 20 48 55 4E 44 52 45 44 20 43 4F 49 4E 53 22 3B | HUNDRED COINS";|
00000440: 46 00 5B 0C 5E 01 85 22 52 4F 4F 4D 20 49 54 20 |F.[.^.."ROOM IT |
00000450: 47 4F 45 53 20 49 4E 22 3B 52 44 00 73 0C 68 01 |GOES IN";RD.s.h.|
00000460: 85 22 4E 41 4D 45 20 4F 46 20 43 4F 49 4E 53 22 |."NAME OF COINS"|
00000470: 3B 4E 24 00 8D 0C 72 01 4E 24 B2 C9 28 C4 28 46 |;N$...r.N$..(.(F|
00000480: 29 2C 31 29 AA C7 28 52 44 29 AA 4E 24 00 9A 0C |),1)..(RD).N$...|
00000490: 7C 01 98 31 2C 4E 24 3A 82 54 00 A6 0C 86 01 81 ||..1,N$:.T......|
000004A0: 54 B2 31 A4 52 43 00 CF 0C 90 01 85 22 52 4F 4F |T.1.RC......"ROO|
000004B0: 4D 20 4E 55 4D 42 45 52 20 43 4F 4D 4D 45 4E 54 |M NUMBER COMMENT|
000004C0: 20 42 45 4C 4F 4E 47 53 20 54 4F 22 3B 45 44 00 | BELONGS TO";ED.|
000004D0: E1 0C A4 01 85 22 43 4F 4D 4D 45 4E 54 22 3B 4E |....."COMMENT";N|
000004E0: 24 00 F1 0C AE 01 4E 24 B2 C7 28 45 44 29 AA 4E |$.....N$..(ED).N|
000004F0: 24 00 F8 0C B8 01 82 54 00 04 0D C2 01 81 54 B2 |$......T......T.|
00000500: 31 A4 47 42 00 20 0D CC 01 85 22 52 4F 4F 4D 20 |1.GB. ...."ROOM |
00000510: 47 49 46 54 20 47 4F 45 53 20 49 4E 22 3B 52 46 |GIFT GOES IN";RF|
00000520: 00 34 0D D6 01 85 22 47 49 46 54 20 4E 41 4D 45 |.4...."GIFT NAME|
00000530: 22 3B 4E 24 00 44 0D E0 01 4E 24 B2 C7 28 52 46 |";N$.D...N$..(RF|
00000540: 29 AA 4E 24 00 4B 0D EA 01 82 54 00 6E 0D F4 01 |).N$.K....T.n...|
00000550: 85 22 52 4F 4F 4D 20 53 4C 45 45 50 20 53 50 45 |."ROOM SLEEP SPE|
00000560: 4C 4C 20 47 4F 45 53 20 49 4E 22 3B 46 52 00 7B |LL GOES IN";FR.{|
00000570: 0D FE 01 98 31 2C C7 28 46 52 29 00 9F 0D 08 02 |....1,.(FR).....|
00000580: 85 22 52 4F 4F 4D 20 54 52 41 56 45 4C 20 53 50 |."ROOM TRAVEL SP|
00000590: 45 4C 4C 20 47 4F 45 53 20 49 4E 22 3B 54 52 00 |ELL GOES IN";TR.|
000005A0: AC 0D 12 02 98 31 2C C7 28 54 52 29 00 CF 0D 1C |.....1,.(TR)....|
000005B0: 02 85 22 52 4F 4F 4D 20 48 45 41 4C 49 4E 47 20 |.."ROOM HEALING |
000005C0: 53 50 45 4C 4C 20 49 53 20 49 4E 22 3B 54 52 00 |SPELL IS IN";TR.|
000005D0: DC 0D 26 02 98 31 2C C7 28 54 52 29 00 00 0E 30 |..&..1,.(TR)...0|
000005E0: 02 85 22 52 4F 4F 4D 20 56 41 4E 49 53 48 49 4E |.."ROOM VANISHIN|
000005F0: 47 20 53 50 45 4C 4C 20 49 53 20 49 4E 22 3B 52 |G SPELL IS IN";R|
00000600: 00 0C 0E 3A 02 98 31 2C C7 28 52 29 00 13 0E 44 |...:..1,.(R)...D|
00000610: 02 A0 31 00 25 0E 4E 02 99 22 93 54 48 41 54 53 |..1.%.N..".THATS|
00000620: 20 41 4C 4C 22 00 00 00 | ALL"... |
..$....UP,DOWN,NORTH,SOUTH,EAST,WEST.@..
..M$(5):.T.0.5:.M$(T):.T.}....".THE TIME
MACHINE IS SET UP TO GO ON THE BOTTOM L
EVEL".C....".SO IN THE ROOM YOU WANT IT
TO BE NEXT TOALLOW IT TO GO DOWN!!".....
."NAME OF SECTION";N$......1,8,2,"@0:TIM
VEN1,S,W"......"DIMENSIONS";A,B,C.4....
"HOW MANY TYPES OF ROOMS";RT.S....1,N$:.
1,A.1:.1,B.1:.1,C.1.^....1,S.1.X. .."HOW
MANY FIGHTS";BE...!..1,BE.1...".."HOW M
ANY TREASURES";TR...#..1,TR.1.P.$.."HOW
MANY GIFTS TO BEASTS";GB...%..1,GB.1...&
.."HOW MANY COMMENTS ON ROOMS";RC...'..1
,RC.1.0.(.."TOTAL AMOUNT OF TREASURE";TT
.:.)..1,TT.S.2..T.1.A:.R.1.B:.S.1.C.I.<.
."ROOM "T","R","S...F.."NAME OF ROOM";N$
...P.."ROOM TYPE";N1$. .D..W.0.5...N.."C
AN YOU GO "M$(W);.B.X..F$.V....F$."Y".X
.X.2.W......W.....N$.G(X).I(N1$,1).N$...
..1,N$.....N$."":X..:.S,R,T. ....T.1.RT
.5...."ROOM TYPE #"T;.=.H..D$.J.R..1,D$:
.T.V....T.1.BE.T...."ROOM # BEAST GOES I
N";N.....N$.G(N)......"GIFT NUMBER (0 IF
NONE)";N.....N$.N$.I(D(N),1).N...."NAME
OF BEAST";N1$.Y....1,N1$...".."COMMENT
ON BEAST";N2$...,.N$.N$.N2$...6..1,N$...
@..T. .J..T.1.TR.A.T.."NUMBER OF HUNDRED
COINS";F.[.^.."ROOM IT GOES IN";RD.S.H.
."NAME OF COINS";N$...R.N$.I(D(F),1).G(R
D).N$...|..1,N$:.T......T.1.RC.O...."ROO
M NUMBER COMMENT BELONGS TO";ED......"CO
MMENT";N$.....N$.G(ED).N$......T...B..T.
1.GB. .L.."ROOM GIFT GOES IN";RF.4.V.."G
IFT NAME";N$.D...N$.G(RF).N$.K....T.N...
."ROOM SLEEP SPELL GOES IN";FR.{....1,G(
FR)......"ROOM TRAVEL SPELL GOES IN";TR.
.....1,G(TR).O...."ROOM HEALING SPELL IS
IN";TR...&..1,G(TR)...0.."ROOM VANISHIN
G SPELL IS IN";R...:..1,G(R)...D. 1.%.N.
.".THATS ALL"...
> CLICK IMAGE PREVIEW FOR FULL MODAL