ROOM 16.0
FILE INFORMATION
FILENAME(S): ROOM 16.0
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-11-30 18:24:02
APPEARS ON: 1 disk(s)
FILE HASH
373f64c0f2be60d3f20ce4ffb0c63654119a2645bfeeccba8631088467760a3a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FRANTIC SOFT | ROOM 16.0 | PRG | Sailor, Pbv | 26 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 20 2E 53 20 4E 3D 31 36 0D 2E 4C 20 4C 2C 54 |. .S N=16..L L,T|
00000010: 45 4D 50 4C 20 45 58 0D 2E 21 44 52 41 57 0D 2E |EMPL EX..!DRAW..|
00000020: 50 20 22 53 69 65 20 62 65 74 72 65 74 65 6E 20 |P "Sie betreten |
00000030: 65 69 6E 65 6E 20 52 61 75 6D 20 6D 69 74 20 7A |einen Raum mit z|
00000040: 77 65 69 20 41 75 73 2D 20 20 20 67 2A 6E 67 65 |wei Aus- g*nge|
00000050: 6E 20 75 6E 64 20 65 69 6E 65 72 20 54 25 72 20 |n und einer T%r |
00000060: 69 6E 20 64 65 72 20 4D 69 74 74 65 2E 20 20 20 |in der Mitte. |
00000070: 20 20 20 44 69 65 20 54 25 72 20 69 73 74 20 3B | Die T%r ist ;|
00000080: 0D 2E 49 20 4E 30 28 31 36 29 3A 34 0D 2E 45 20 |..I N0(16):4..E |
00000090: 50 20 22 67 65 73 63 68 6C 6F 73 73 65 6E 2E 0D |P "geschlossen..|
000000A0: 2E 54 20 50 20 22 6F 66 66 65 6E 2E 0D 2E 24 20 |.T P "offen...$ |
000000B0: 50 0D 2E 21 4D 4F 52 45 0D 2E 50 20 22 50 6F 64 |P..!MORE..P "Pod|
000000C0: 65 73 74 65 20 66 6C 61 6E 6B 69 65 72 65 6E 20 |este flankieren |
000000D0: 64 69 65 20 54 25 72 2E 20 41 75 66 20 64 65 6D |die T%r. Auf dem|
000000E0: 0D 2E 54 20 50 20 22 72 65 63 68 74 65 6E 20 50 |..T P "rechten P|
000000F0: 6F 64 65 73 74 20 3B 0D 2E 54 20 4A 20 2B 34 0D |odest ;..T J +4.|
00000100: 2E 49 20 4E 30 28 31 36 29 3A 32 0D 2E 54 20 50 |.I N0(16):2..T P|
00000110: 20 22 42 6F 64 65 6E 20 3B 0D 2E 45 20 50 20 22 | "Boden ;..E P "|
00000120: 6C 69 6E 6B 65 6E 20 50 6F 64 65 73 74 20 3B 0D |linken Podest ;.|
00000130: 2E 50 20 22 73 74 65 68 74 20 65 69 6E 65 20 53 |.P "steht eine S|
00000140: 74 65 69 6E 75 72 6E 65 2E 0D 2E 21 48 45 52 45 |teinurne...!HERE|
00000150: 0D 21 4C 4F 4F 4B 0D 2E 50 20 22 4C 69 6E 6B 73 |.!LOOK..P "Links|
00000160: 20 75 6E 64 20 72 65 63 68 74 73 20 73 69 6E 64 | und rechts sind|
00000170: 20 41 75 73 67 2A 6E 67 65 2E 20 56 6F 72 20 20 | Ausg*nge. Vor |
00000180: 20 20 20 49 68 6E 65 6E 20 69 73 74 20 65 69 6E | Ihnen ist ein|
00000190: 65 20 54 25 72 2E 20 0D 25 4C 4F 55 52 0D 2E 50 |e T%r. .%LOUR..P|
000001A0: 20 22 44 69 65 20 55 72 6E 65 20 65 6E 74 68 2A | "Die Urne enth*|
000001B0: 6C 74 20 68 65 69 7B 65 20 4B 6F 68 6C 65 6E 2E |lt hei{e Kohlen.|
000001C0: 20 20 0D 25 47 54 55 52 0D 2E 49 20 4E 30 28 31 | .%GTUR..I N0(1|
000001D0: 36 29 3A 31 0D 2E 54 20 50 20 22 53 69 65 20 68 |6):1..T P "Sie h|
000001E0: 61 62 65 6E 20 73 69 65 20 62 65 72 65 69 74 73 |aben sie bereits|
000001F0: 2E 0D 2E 54 20 4A 20 2D 33 0D 2E 53 20 4E 31 28 |...T J -3..S N1(|
00000200: 31 36 29 3D 4E 30 28 31 36 29 0D 2E 53 20 4E 30 |16)=N0(16)..S N0|
00000210: 28 31 36 29 3D 31 0D 2E 21 44 52 41 57 0D 2E 49 |(16)=1..!DRAW..I|
00000220: 20 4E 31 28 31 36 29 3A 34 0D 2E 54 20 50 20 22 | N1(16):4..T P "|
00000230: 44 69 65 20 54 25 72 20 73 63 68 6C 69 65 7B 74 |Die T%r schlie{t|
00000240: 20 73 69 63 68 2E 20 0D 2E 45 20 50 20 22 44 69 | sich. ..E P "Di|
00000250: 65 20 55 72 6E 65 20 69 73 74 20 73 65 68 72 20 |e Urne ist sehr |
00000260: 73 63 68 77 65 72 2C 20 53 69 65 20 6B 3C 6E 6E |schwer, Sie k<nn|
00000270: 65 6E 20 20 20 20 73 69 65 20 6B 61 75 6D 20 62 |en sie kaum b|
00000280: 65 77 65 67 65 6E 2E 0D 2E 24 20 50 0D 25 44 52 |ewegen...$ P.%DR|
00000290: 55 52 0D 2E 21 4E 55 52 4E 0D 2E 54 20 4A 20 2D |UR..!NURN..T J -|
000002A0: 32 0D 2E 53 20 4E 30 28 31 36 29 3D 32 0D 2E 50 |2..S N0(16)=2..P|
000002B0: 20 22 20 53 69 65 20 73 74 65 6C 6C 65 6E 20 64 | " Sie stellen d|
000002C0: 69 65 20 55 72 6E 65 20 61 75 66 20 64 65 6E 20 |ie Urne auf den |
000002D0: 42 6F 64 65 6E 2E 0D 21 4E 55 52 4E 0D 2E 21 43 |Boden..!NURN..!C|
000002E0: 4C 52 54 0D 2E 49 20 4E 30 28 31 36 29 23 31 0D |LRT..I N0(16)#1.|
000002F0: 2E 54 20 50 20 22 53 69 65 20 68 61 62 65 6E 20 |.T P "Sie haben |
00000300: 64 69 65 20 55 72 6E 65 20 6E 69 63 68 74 2E 0D |die Urne nicht..|
00000310: 53 45 54 5A 45 55 52 4E 45 20 4C 49 4E 4B 45 50 |SETZEURNE LINKEP|
00000320: 4F 44 45 53 0D 53 54 45 4C 4C 55 52 4E 45 20 4C |ODES.STELLURNE L|
00000330: 49 4E 4B 45 50 4F 44 45 53 0D 4C 45 47 45 20 55 |INKEPODES.LEGE U|
00000340: 52 4E 45 20 4C 49 4E 4B 45 50 4F 44 45 53 0D 48 |RNE LINKEPODES.H|
00000350: 45 42 45 20 55 52 4E 45 20 4C 49 4E 4B 45 50 4F |EBE URNE LINKEPO|
00000360: 44 45 53 0D 2E 21 4E 55 52 4E 0D 2E 54 20 4A 20 |DES..!NURN..T J |
00000370: 2D 32 0D 2E 53 20 4E 30 28 31 36 29 3D 30 0D 2E |-2..S N0(16)=0..|
00000380: 21 44 52 41 57 0D 2E 5F 20 50 0D 2E 21 43 4C 52 |!DRAW.._ P..!CLR|
00000390: 54 0D 2E 50 20 22 53 74 3C 68 6E 65 6E 64 20 73 |T..P "St<hnend s|
000003A0: 65 74 7A 65 6E 20 53 69 65 20 64 69 65 20 55 72 |etzen Sie die Ur|
000003B0: 6E 65 20 61 62 2E 0D 2E 24 20 50 0D 53 45 54 5A |ne ab...$ P.SETZ|
000003C0: 45 55 52 4E 45 20 52 45 43 48 54 50 4F 44 45 53 |EURNE RECHTPODES|
000003D0: 0D 53 54 45 4C 4C 55 52 4E 45 20 52 45 43 48 54 |.STELLURNE RECHT|
000003E0: 50 4F 44 45 53 0D 4C 45 47 45 20 55 52 4E 45 20 |PODES.LEGE URNE |
000003F0: 52 45 43 48 54 50 4F 44 45 53 0D 48 45 42 45 20 |RECHTPODES.HEBE |
00000400: 55 52 4E 45 20 52 45 43 48 54 50 4F 44 45 53 0D |URNE RECHTPODES.|
00000410: 2E 21 4E 55 52 4E 0D 2E 54 20 4A 20 2D 32 0D 2E |.!NURN..T J -2..|
00000420: 53 20 4E 30 28 31 36 29 3D 33 0D 2E 21 44 52 41 |S N0(16)=3..!DRA|
00000430: 57 0D 2E 5F 20 50 0D 2E 21 43 4C 52 54 0D 2E 50 |W.._ P..!CLRT..P|
00000440: 20 22 53 69 65 20 73 65 74 7A 65 6E 20 64 69 65 | "Sie setzen die|
00000450: 20 55 72 6E 65 20 61 75 66 20 64 61 73 20 50 6F | Urne auf das Po|
00000460: 64 65 73 74 2E 0D 2E 50 20 22 4D 69 74 20 65 69 |dest...P "Mit ei|
00000470: 6E 65 6D 20 4B 6C 69 63 6B 65 6E 20 73 69 6E 6B |nem Klicken sink|
00000480: 74 20 64 61 73 20 50 6F 64 65 73 74 0D 2E 50 20 |t das Podest..P |
00000490: 22 65 69 6E 20 53 74 25 63 6B 63 68 65 6E 20 65 |"ein St%ckchen e|
000004A0: 69 6E 2E 20 0D 2E 24 20 50 0D 2E 21 4D 4F 52 45 |in. ..$ P..!MORE|
000004B0: 0D 2E 53 20 4E 30 28 31 36 29 3D 34 0D 2E 21 44 |..S N0(16)=4..!D|
000004C0: 52 41 57 0D 2E 50 20 22 45 72 73 74 61 75 6E 6C |RAW..P "Erstaunl|
000004D0: 69 63 68 20 6C 65 69 63 68 74 20 3C 66 66 6E 65 |ich leicht <ffne|
000004E0: 74 20 73 69 63 68 20 0D 2E 50 20 22 64 69 65 20 |t sich ..P "die |
000004F0: 6D 69 74 74 6C 65 72 65 20 54 25 72 20 21 0D 2E |mittlere T%r !..|
00000500: 24 20 50 0D 53 45 54 5A 45 55 52 4E 45 20 50 4F |$ P.SETZEURNE PO|
00000510: 44 45 53 0D 53 54 45 4C 4C 55 52 4E 45 20 50 4F |DES.STELLURNE PO|
00000520: 44 45 53 0D 4C 45 47 45 20 55 52 4E 45 20 50 4F |DES.LEGE URNE PO|
00000530: 44 45 53 0D 48 45 42 45 20 55 52 4E 45 20 50 4F |DES.HEBE URNE PO|
00000540: 44 45 53 0D 2E 21 4E 55 52 4E 0D 2E 54 20 4A 20 |DES..!NURN..T J |
00000550: 2D 32 0D 2E 50 20 22 41 75 66 20 77 65 6C 63 68 |-2..P "Auf welch|
00000560: 65 73 20 50 6F 64 65 73 74 20 3F 0D 20 50 4F 54 |es Podest ?. POT|
00000570: 45 53 0D 2E 21 43 4C 52 54 0D 2E 50 20 22 45 73 |ES..!CLRT..P "Es|
00000580: 20 68 65 69 73 73 74 20 22 50 6F 64 65 73 74 22 | heisst "Podest"|
00000590: 2E 0D 49 4E 48 41 4C 0D 49 20 20 20 20 0D 2E 21 |..INHAL.I ..!|
000005A0: 43 4C 52 54 0D 2E 49 20 4E 30 28 31 36 29 3A 31 |CLRT..I N0(16):1|
000005B0: 0D 2E 54 20 50 20 22 4D 69 74 20 64 65 72 20 55 |..T P "Mit der U|
000005C0: 72 6E 65 20 69 6E 20 64 65 72 20 48 61 6E 64 20 |rne in der Hand |
000005D0: 6B 2A 6E 6E 65 6E 20 53 69 65 20 20 20 20 20 6E |k*nnen Sie n|
000005E0: 69 63 68 74 20 6E 61 63 68 20 47 65 67 65 6E 73 |icht nach Gegens|
000005F0: 74 2A 6E 6E 64 65 6E 20 73 65 68 65 6E 2E 0D 2E |t*nnden sehen...|
00000600: 45 20 25 2E 2E 45 51 0D 25 46 57 2E 2E 0D 25 2E |E %..EQ.%FW...%.|
00000610: 2E 45 4E 0D 2E 49 20 4E 30 28 31 36 29 23 34 0D |.EN..I N0(16)#4.|
00000620: 2E 54 20 50 20 22 44 69 65 20 54 25 72 20 69 73 |.T P "Die T%r is|
00000630: 74 20 67 65 73 63 68 6C 6F 73 73 65 6E 2E 20 0D |t geschlossen. .|
00000640: 2E 45 20 33 20 52 4F 4F 4D 20 37 2E 31 20 20 0D |.E 3 ROOM 7.1 .|
00000650: 2E 45 20 21 47 4F 54 4F 0D 21 4E 4F 47 4F 0D 2E |.E !GOTO.!NOGO..|
00000660: 49 20 4E 30 28 31 36 29 3A 31 0D 2E 54 20 50 20 |I N0(16):1..T P |
00000670: 22 44 69 65 20 55 72 6E 65 20 69 73 74 20 73 65 |"Die Urne ist se|
00000680: 68 72 20 73 63 68 77 65 72 2C 20 64 61 6D 69 74 |hr schwer, damit|
00000690: 20 6B 6F 6D 6D 65 6E 0D 2E 54 20 50 20 22 53 69 | kommen..T P "Si|
000006A0: 65 20 6E 69 63 68 74 20 77 65 69 74 2E 0D 25 4C |e nicht weit..%L|
000006B0: 2E 2E 2E 0D 2E 21 4E 4F 47 4F 0D 2E 45 20 53 20 |.....!NOGO..E S |
000006C0: 47 45 28 36 29 3D 31 37 0D 2E 45 20 33 20 52 4F |GE(6)=17..E 3 RO|
000006D0: 4F 4D 20 31 33 2E 30 20 0D 2E 45 20 21 54 55 4E |OM 13.0 ..E !TUN|
000006E0: 4C 0D 25 52 2E 2E 2E 0D 2E 21 4E 4F 47 4F 0D 2E |L.%R.....!NOGO..|
000006F0: 54 20 4A 20 2D 32 0D 2E 49 20 4E 30 28 31 37 29 |T J -2..I N0(17)|
00000700: 3A 34 0D 2E 54 20 53 20 47 45 28 36 29 3D 31 30 |:4..T S GE(6)=10|
00000710: 30 0D 2E 54 20 33 20 52 4F 4F 4D 20 31 36 2E 30 |0..T 3 ROOM 16.0|
00000720: 20 0D 2E 45 20 53 20 47 45 28 36 29 3D 30 0D 2E | ..E S GE(6)=0..|
00000730: 45 20 33 20 52 4F 4F 4D 20 31 37 2E 30 20 0D 2E |E 3 ROOM 17.0 ..|
00000740: 21 54 55 4E 4C 0D 21 44 52 41 57 0D 2E 53 20 50 |!TUNL.!DRAW..S P|
00000750: 3D 33 2D 50 0D 2E 43 20 31 2C 50 2C 30 0D 2E 42 |=3-P..C 1,P,0..B|
00000760: 20 52 47 48 54 4C 0D 2E 53 20 56 3D 50 0D 2E 44 | RGHTL..S V=P..D|
00000770: 20 0D 2E 49 20 4E 30 28 31 36 29 3A 30 0D 2E 54 | ..I N0(16):0..T|
00000780: 20 42 20 50 45 44 31 4A 0D 2E 45 20 42 20 50 45 | B PED1J..E B PE|
00000790: 44 31 4E 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E |D1N..S V=P..D ..|
000007A0: 49 20 4E 30 28 31 36 29 3E 32 0D 2E 54 20 42 20 |I N0(16)>2..T B |
000007B0: 50 45 44 32 4A 0D 2E 45 20 42 20 50 45 44 32 4E |PED2J..E B PED2N|
000007C0: 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 42 20 54 |..S V=P..D ..B T|
000007D0: 4D 50 45 58 0D 2E 49 20 4E 30 28 31 36 29 3A 34 |MPEX..I N0(16):4|
000007E0: 0D 2E 54 20 53 20 43 4F 28 31 35 29 3D 34 0D 2E |..T S CO(15)=4..|
000007F0: 53 20 56 3D 50 0D 2E 44 20 0D 2E 5F 20 50 0D 2E |S V=P..D .._ P..|
00000800: 21 43 4C 52 54 0D 40 40 40 40 40 0D 0D |!CLRT.@@@@@.. |
. .S N=16..L L,TEMPL EX..!DRAW..P "SIE B
ETRETEN EINEN RAUM MIT ZWEI AUS- G*NGE
N UND EINER T%R IN DER MITTE. DIE T
%R IST ;..I N0(16):4..E P "GESCHLOSSEN..
.T P "OFFEN...$ P..!MORE..P "PODESTE FLA
NKIEREN DIE T%R. AUF DEM..T P "RECHTEN P
ODEST ;..T J +4..I N0(16):2..T P "BODEN
;..E P "LINKEN PODEST ;..P "STEHT EINE S
TEINURNE...!HERE.!LOOK..P "LINKS UND REC
HTS SIND AUSG*NGE. VOR IHNEN IST EIN
E T%R. .%LOUR..P "DIE URNE ENTH*LT HEI{E
KOHLEN. .%GTUR..I N0(16):1..T P "SIE H
ABEN SIE BEREITS...T J -3..S N1(16)=N0(1
6)..S N0(16)=1..!DRAW..I N1(16):4..T P "
DIE T%R SCHLIE{T SICH. ..E P "DIE URNE I
ST SEHR SCHWER, SIE K<NNEN SIE KAUM B
EWEGEN...$ P.%DRUR..!NURN..T J -2..S N0(
16)=2..P " SIE STELLEN DIE URNE AUF DEN
BODEN..!NURN..!CLRT..I N0(16)#1..T P "SI
E HABEN DIE URNE NICHT..SETZEURNE LINKEP
ODES.STELLURNE LINKEPODES.LEGE URNE LINK
EPODES.HEBE URNE LINKEPODES..!NURN..T J
-2..S N0(16)=0..!DRAW.._ P..!CLRT..P "ST
<HNEND SETZEN SIE DIE URNE AB...$ P.SETZ
EURNE RECHTPODES.STELLURNE RECHTPODES.LE
GE URNE RECHTPODES.HEBE URNE RECHTPODES.
.!NURN..T J -2..S N0(16)=3..!DRAW.._ P..
!CLRT..P "SIE SETZEN DIE URNE AUF DAS PO
DEST...P "MIT EINEM KLICKEN SINKT DAS PO
DEST..P "EIN ST%CKCHEN EIN. ..$ P..!MORE
..S N0(16)=4..!DRAW..P "ERSTAUNLICH LEIC
HT <FFNET SICH ..P "DIE MITTLERE T%R !..
$ P.SETZEURNE PODES.STELLURNE PODES.LEGE
URNE PODES.HEBE URNE PODES..!NURN..T J
-2..P "AUF WELCHES PODEST ?. POTES..!CLR
T..P "ES HEISST "PODEST"..INHAL.I ..!
CLRT..I N0(16):1..T P "MIT DER URNE IN D
ER HAND K*NNEN SIE NICHT NACH GEGENS
T*NNDEN SEHEN...E %..EQ.%FW...%..EN..I N
0(16)#4..T P "DIE T%R IST GESCHLOSSEN. .
.E 3 ROOM 7.1 ..E !GOTO.!NOGO..I N0(16)
:1..T P "DIE URNE IST SEHR SCHWER, DAMIT
KOMMEN..T P "SIE NICHT WEIT..%L.....!NO
GO..E S GE(6)=17..E 3 ROOM 13.0 ..E !TUN
L.%R.....!NOGO..T J -2..I N0(17):4..T S
GE(6)=100..T 3 ROOM 16.0 ..E S GE(6)=0..
E 3 ROOM 17.0 ..!TUNL.!DRAW..S P=3-P..C
1,P,0..B RGHTL..S V=P..D ..I N0(16):0..T
B PED1J..E B PED1N..S V=P..D ..I N0(16)
>2..T B PED2J..E B PED2N..S V=P..D ..B T
MPEX..I N0(16):4..T S CO(15)=4..S V=P..D
.._ P..!CLRT.@@@@@..
> CLICK IMAGE PREVIEW FOR FULL MODAL