ROOM 19.0
FILE INFORMATION
FILENAME(S): ROOM 19.0
FILE TYPE(S): PRG
FILE SIZE: 1.9K
FIRST SEEN: 2025-11-30 18:24:02
APPEARS ON: 1 disk(s)
FILE HASH
326cf70be941a44f646cdcab01ebe9af2e1299f07d14ab8bc4bcd6abe72c4b60
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FRANTIC SOFT | ROOM 19.0 | PRG | Sailor, Pbv | 9 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 20 2E 53 20 4E 3D 31 39 0D 2E 21 44 52 41 57 |. .S N=19..!DRAW|
00000010: 0D 2E 21 43 4C 52 54 0D 2E 49 20 4E 30 28 31 39 |..!CLRT..I N0(19|
00000020: 29 3A 32 0D 2E 54 20 50 20 22 44 69 65 20 61 6C |):2..T P "Die al|
00000030: 74 65 20 46 72 61 75 20 69 73 74 20 77 65 67 2E |te Frau ist weg.|
00000040: 0D 2E 45 20 50 20 22 49 6E 20 64 65 72 20 48 25 |..E P "In der H%|
00000050: 74 74 65 20 73 65 68 65 6E 20 53 69 65 20 65 69 |tte sehen Sie ei|
00000060: 6E 65 20 61 6C 74 65 20 46 72 61 75 0D 2E 45 20 |ne alte Frau..E |
00000070: 50 20 22 6D 69 74 20 65 69 6E 65 72 20 46 6C 3C |P "mit einer Fl<|
00000080: 74 65 2E 20 53 69 65 20 73 74 6F 70 70 74 2C 20 |te. Sie stoppt, |
00000090: 61 6C 73 0D 2E 45 20 50 20 22 53 69 65 20 65 69 |als..E P "Sie ei|
000000A0: 6E 74 72 65 74 65 6E 20 75 6E 64 20 6D 75 73 74 |ntreten und must|
000000B0: 65 72 74 20 53 69 65 2E 0D 2E 45 20 21 50 4C 46 |ert Sie...E !PLF|
000000C0: 54 0D 2E 24 20 50 0D 2E 45 20 21 4D 4F 52 45 0D |T..$ P..E !MORE.|
000000D0: 2E 45 20 50 20 22 22 48 65 6C 66 65 6E 20 53 69 |.E P ""Helfen Si|
000000E0: 65 20 65 69 6E 65 72 20 61 72 6D 65 6E 2C 20 68 |e einer armen, h|
000000F0: 75 6E 67 72 69 67 65 6E 0D 2E 45 20 50 20 22 20 |ungrigen..E P " |
00000100: 46 72 61 75 2E 20 47 65 73 65 67 6E 65 74 20 73 |Frau. Gesegnet s|
00000110: 69 6E 64 20 64 69 65 0D 2E 45 20 50 20 22 20 47 |ind die..E P " G|
00000120: 72 6F 7B 7A 25 67 69 67 65 6E 2E 20 22 0D 2E 54 |ro{z%gigen. "..T|
00000130: 20 21 48 45 52 45 0D 25 4C 4F 32 32 0D 2E 50 20 | !HERE.%LO22..P |
00000140: 22 45 73 20 69 73 74 20 65 69 6E 65 20 6B 61 73 |"Es ist eine kas|
00000150: 63 68 6D 69 72 2D 62 6C 61 75 65 20 53 61 70 68 |chmir-blaue Saph|
00000160: 69 72 20 46 6C 3C 74 65 2E 0D 21 4C 4F 4F 4B 0D |ir Fl<te..!LOOK.|
00000170: 42 45 54 52 41 46 52 41 55 20 0D 2E 21 43 4C 52 |BETRAFRAU ..!CLR|
00000180: 54 0D 2E 49 20 4E 30 28 31 39 29 3A 30 0D 2E 54 |T..I N0(19):0..T|
00000190: 20 50 20 22 44 69 65 20 46 72 61 75 20 73 63 68 | P "Die Frau sch|
000001A0: 61 75 74 20 53 69 65 20 61 6E 2C 20 61 6C 73 20 |aut Sie an, als |
000001B0: 6F 62 20 73 69 65 0D 2E 54 20 50 20 22 65 74 77 |ob sie..T P "etw|
000001C0: 61 73 20 65 72 77 61 72 74 65 6E 20 77 25 72 64 |as erwarten w%rd|
000001D0: 65 2E 20 0D 2E 45 20 50 20 22 53 69 65 20 73 69 |e. ..E P "Sie si|
000001E0: 6E 64 20 61 6C 6C 65 69 6E 20 69 6E 20 64 65 72 |nd allein in der|
000001F0: 20 48 25 74 74 65 2E 20 0D 25 4F 46 30 37 0D 2E | H%tte. .%OF07..|
00000200: 49 20 54 43 28 37 29 23 30 0D 2E 54 20 50 20 22 |I TC(7)#0..T P "|
00000210: 53 69 65 20 68 61 62 65 6E 20 6B 65 69 6E 20 45 |Sie haben kein E|
00000220: 73 73 65 6E 2E 0D 2E 54 20 4A 20 2D 33 0D 2E 49 |ssen...T J -3..I|
00000230: 20 4E 30 28 31 39 29 3A 32 0D 2E 54 20 50 20 22 | N0(19):2..T P "|
00000240: 41 6E 20 77 65 6E 3F 0D 2E 54 20 4A 20 2D 36 0D |An wen?..T J -6.|
00000250: 2E 53 20 54 43 28 37 29 3D 32 35 35 0D 2E 53 20 |.S TC(7)=255..S |
00000260: 54 43 28 32 32 29 3D 30 0D 2E 53 20 54 4C 28 32 |TC(22)=0..S TL(2|
00000270: 32 29 3D 32 35 35 0D 2E 50 20 22 22 41 6C 73 20 |2)=255..P ""Als |
00000280: 5A 65 69 63 68 65 6E 20 6D 65 69 6E 65 72 20 44 |Zeichen meiner D|
00000290: 61 6E 6B 62 61 72 6B 65 69 74 20 6E 65 68 6D 65 |ankbarkeit nehme|
000002A0: 6E 0D 2E 50 20 22 20 53 69 65 20 62 69 74 74 65 |n..P " Sie bitte|
000002B0: 20 64 69 65 20 46 6C 3C 74 65 2E 53 69 65 20 6B | die Fl<te.Sie k|
000002C0: 61 6E 6E 20 49 68 6E 65 6E 0D 2E 50 20 22 20 76 |ann Ihnen..P " v|
000002D0: 69 65 6C 65 69 63 68 74 20 68 65 6C 66 65 6E 2E |ieleicht helfen.|
000002E0: 2E 2E 22 0D 2E 21 4D 4F 52 45 0D 2E 53 20 4E 30 |.."..!MORE..S N0|
000002F0: 28 31 39 29 3D 31 0D 2E 21 44 52 41 57 0D 2E 21 |(19)=1..!DRAW..!|
00000300: 43 4C 52 54 0D 2E 21 50 52 54 31 0D 2E 24 20 50 |CLRT..!PRT1..$ P|
00000310: 0D 2E 21 44 53 41 50 0D 2E 21 50 52 54 31 0D 2E |..!DSAP..!PRT1..|
00000320: 21 57 41 49 54 0D 2E 21 58 46 52 4D 0D 2E 21 57 |!WAIT..!XFRM..!W|
00000330: 41 49 54 0D 2E 21 4D 4F 52 45 0D 2E 50 20 22 44 |AIT..!MORE..P "D|
00000340: 69 65 20 46 72 61 75 20 76 65 72 73 63 68 77 69 |ie Frau verschwi|
00000350: 6E 64 65 74 20 75 6E 64 20 6C 2A 7B 74 20 53 69 |ndet und l*{t Si|
00000360: 65 20 20 0D 2E 50 20 22 61 6C 6C 65 69 6E 65 2E |e ..P "alleine.|
00000370: 0D 2E 53 20 4E 30 28 31 39 29 3D 32 0D 25 47 54 |..S N0(19)=2.%GT|
00000380: 32 32 0D 2E 49 20 4E 30 28 31 39 29 3A 32 0D 2E |22..I N0(19):2..|
00000390: 54 20 50 20 22 53 69 65 20 68 61 62 65 6E 20 53 |T P "Sie haben S|
000003A0: 69 65 20 62 65 72 65 69 74 73 2E 0D 2E 54 20 4A |ie bereits...T J|
000003B0: 20 2D 33 0D 2E 53 20 54 4C 28 32 32 29 3D 32 35 | -3..S TL(22)=25|
000003C0: 35 0D 2E 21 50 52 54 32 0D 2E 21 44 53 41 50 0D |5..!PRT2..!DSAP.|
000003D0: 2E 21 50 52 54 32 0D 2E 21 58 46 52 4D 0D 2E 21 |.!PRT2..!XFRM..!|
000003E0: 57 41 49 54 0D 2E 21 4D 4F 52 45 0D 2E 50 20 22 |WAIT..!MORE..P "|
000003F0: 53 69 65 20 73 69 6E 64 20 61 6C 6C 65 69 6E 20 |Sie sind allein |
00000400: 69 6E 20 64 65 72 20 48 25 74 74 65 2E 0D 2E 53 |in der H%tte...S|
00000410: 20 4E 30 28 31 39 29 3D 32 0D 25 2E 2E 30 32 0D | N0(19)=2.%..02.|
00000420: 25 4F 55 2E 2E 0D 25 2E 2E 48 55 0D 2E 33 20 52 |%OU...%..HU..3 R|
00000430: 4F 4F 4D 20 31 38 2E 30 20 0D 2E 21 47 4F 54 4F |OOM 18.0 ..!GOTO|
00000440: 0D 21 44 52 41 57 0D 2E 53 20 50 3D 33 2D 50 0D |.!DRAW..S P=3-P.|
00000450: 2E 43 20 31 2C 50 2C 30 0D 2E 42 20 52 47 48 54 |.C 1,P,0..B RGHT|
00000460: 4C 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 49 20 |L..S V=P..D ..I |
00000470: 4E 30 28 31 39 29 3A 30 0D 2E 54 20 42 20 46 4C |N0(19):0..T B FL|
00000480: 55 54 45 0D 2E 49 20 4E 30 28 31 39 29 3A 31 0D |UTE..I N0(19):1.|
00000490: 2E 54 20 42 20 4E 4F 46 4C 54 0D 2E 49 20 4E 30 |.T B NOFLT..I N0|
000004A0: 28 31 39 29 3A 32 0D 2E 54 20 42 20 45 4D 50 54 |(19):2..T B EMPT|
000004B0: 59 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 49 20 |Y..S V=P..D ..I |
000004C0: 4E 30 28 31 39 29 3C 32 0D 2E 54 20 42 20 57 4F |N0(19)<2..T B WO|
000004D0: 4D 41 4E 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E |MAN..S V=P..D ..|
000004E0: 5F 20 50 0D 54 4F 45 54 45 0D 2E 21 43 4C 52 54 |_ P.TOETE..!CLRT|
000004F0: 0D 2E 25 53 48 2E 2E 0D 2E 49 20 4E 30 28 31 39 |..%SH....I N0(19|
00000500: 29 3A 32 0D 2E 54 20 4A 20 2D 34 0D 2E 21 57 41 |):2..T J -4..!WA|
00000510: 49 54 0D 2E 53 20 54 4C 28 32 32 29 3D 32 35 35 |IT..S TL(22)=255|
00000520: 0D 2E 21 44 53 41 50 0D 2E 21 43 4C 52 54 0D 2E |..!DSAP..!CLRT..|
00000530: 21 58 46 52 4D 0D 2E 50 20 22 20 20 20 20 22 47 |!XFRM..P " "G|
00000540: 65 77 61 6C 74 20 65 72 6E 74 65 74 20 47 65 77 |ewalt erntet Gew|
00000550: 61 6C 74 2E 22 0D 2E 50 20 22 0D 2E 50 20 22 20 |alt."..P "..P " |
00000560: 20 20 20 20 20 20 20 20 53 45 49 20 47 45 57 41 | SEI GEWA|
00000570: 52 4E 54 21 21 0D 2E 53 20 4E 30 28 31 39 29 3D |RNT!!..S N0(19)=|
00000580: 32 0D 46 52 41 47 45 20 46 52 41 55 20 0D 2E 21 |2.FRAGE FRAU ..!|
00000590: 43 4C 52 54 0D 2E 49 20 4E 30 28 31 39 29 3A 32 |CLRT..I N0(19):2|
000005A0: 0D 2E 45 20 50 20 22 22 44 69 65 20 65 72 73 74 |..E P ""Die erst|
000005B0: 65 6E 20 5A 77 65 69 20 76 6F 6E 20 44 72 65 69 |en Zwei von Drei|
000005C0: 22 0D 2E 45 20 50 20 22 20 68 61 62 65 6E 20 65 |"..E P " haben e|
000005D0: 69 6E 65 6E 20 53 63 68 6C 25 73 73 65 6C 2E 21 |inen Schl%ssel.!|
000005E0: 20 0D 2E 54 20 50 20 22 53 69 65 20 73 69 6E 64 | ..T P "Sie sind|
000005F0: 20 61 6C 6C 65 69 6E 20 69 6E 20 64 65 72 20 48 | allein in der H|
00000600: 25 74 74 65 2E 20 0D 25 4F 46 2E 2E 0D 2E 49 20 |%tte. .%OF....I |
00000610: 4E 30 28 31 39 29 3A 32 0D 2E 54 20 50 20 22 41 |N0(19):2..T P "A|
00000620: 6E 20 77 65 6E 3F 3F 0D 2E 45 20 50 20 22 48 3C |n wen??..E P "H<|
00000630: 66 6C 69 63 68 20 6C 65 68 6E 74 20 64 69 65 20 |flich lehnt die |
00000640: 46 72 61 75 20 61 62 2E 20 0D 21 44 53 41 50 0D |Frau ab. .!DSAP.|
00000650: 2E 53 20 4B 3D 33 2D 50 0D 2E 43 20 31 2C 4B 2C |.S K=3-P..C 1,K,|
00000660: 30 0D 2E 42 20 52 47 48 54 4C 0D 2E 53 20 56 3D |0..B RGHTL..S V=|
00000670: 4B 0D 2E 44 20 0D 2E 42 20 45 4D 50 54 59 0D 2E |K..D ..B EMPTY..|
00000680: 53 20 56 3D 4B 0D 2E 44 20 0D 2E 5F 20 4B 0D 2E |S V=K..D .._ K..|
00000690: 43 20 30 2C 4B 2C 31 34 34 0D 2E 56 20 31 32 0D |C 0,K,144..V 12.|
000006A0: 21 50 52 54 31 0D 2E 50 20 22 22 44 65 6E 6B 65 |!PRT1..P ""Denke|
000006B0: 6E 20 53 69 65 20 64 61 72 61 6E 2C 20 4D 75 73 |n Sie daran, Mus|
000006C0: 69 6B 20 7A 2A 68 6D 74 20 64 61 73 20 0D 2E 50 |ik z*hmt das ..P|
000006D0: 20 22 20 77 69 6C 64 65 20 42 69 65 73 74 2E 22 | " wilde Biest."|
000006E0: 0D 21 50 52 54 32 0D 2E 50 20 22 22 49 68 72 65 |.!PRT2..P ""Ihre|
000006F0: 20 47 69 65 72 20 6E 25 74 7A 74 20 49 68 6E 65 | Gier n%tzt Ihne|
00000700: 6E 20 6E 69 63 68 74 73 2E 20 22 0D 21 58 46 52 |n nichts. ".!XFR|
00000710: 4D 0D 2E 53 20 4B 3D 33 2D 50 0D 2E 53 20 41 3D |M..S K=3-P..S A=|
00000720: 32 30 0D 2E 53 20 42 3D 41 0D 2E 24 20 50 0D 2E |20..S B=A..$ P..|
00000730: 53 20 42 3D 42 2D 31 0D 2E 49 20 42 3E 30 0D 2E |S B=B-1..I B>0..|
00000740: 54 20 4A 20 2D 32 0D 2E 53 20 41 3D 41 2D 31 0D |T J -2..S A=A-1.|
00000750: 2E 49 20 41 3E 31 0D 2E 24 20 4B 0D 2E 54 20 4A |.I A>1..$ K..T J|
00000760: 20 2D 38 0D 2E 24 20 50 0D 2E 53 20 42 3D 41 0D | -8..$ P..S B=A.|
00000770: 2E 24 20 4B 0D 2E 53 20 42 3D 42 2D 31 0D 2E 49 |.$ K..S B=B-1..I|
00000780: 20 42 3E 30 0D 2E 54 20 4A 20 2D 32 0D 2E 53 20 | B>0..T J -2..S |
00000790: 41 3D 41 2B 31 0D 2E 49 20 41 3C 31 30 0D 2E 24 |A=A+1..I A<10..$|
000007A0: 20 50 0D 2E 54 20 4A 20 2D 38 0D 2E 24 20 4B 0D | P..T J -8..$ K.|
000007B0: 2E 53 20 50 3D 4B 0D 40 40 40 40 40 0D |.S P=K.@@@@@. |
. .S N=19..!DRAW..!CLRT..I N0(19):2..T P
"DIE ALTE FRAU IST WEG...E P "IN DER H%
TTE SEHEN SIE EINE ALTE FRAU..E P "MIT E
INER FL<TE. SIE STOPPT, ALS..E P "SIE EI
NTRETEN UND MUSTERT SIE...E !PLFT..$ P..
E !MORE..E P ""HELFEN SIE EINER ARMEN, H
UNGRIGEN..E P " FRAU. GESEGNET SIND DIE.
.E P " GRO{Z%GIGEN. "..T !HERE.%LO22..P
"ES IST EINE KASCHMIR-BLAUE SAPHIR FL<TE
..!LOOK.BETRAFRAU ..!CLRT..I N0(19):0..T
P "DIE FRAU SCHAUT SIE AN, ALS OB SIE..
T P "ETWAS ERWARTEN W%RDE. ..E P "SIE SI
ND ALLEIN IN DER H%TTE. .%OF07..I TC(7)#
0..T P "SIE HABEN KEIN ESSEN...T J -3..I
N0(19):2..T P "AN WEN?..T J -6..S TC(7)
=255..S TC(22)=0..S TL(22)=255..P ""ALS
ZEICHEN MEINER DANKBARKEIT NEHMEN..P " S
IE BITTE DIE FL<TE.SIE KANN IHNEN..P " V
IELEICHT HELFEN..."..!MORE..S N0(19)=1..
!DRAW..!CLRT..!PRT1..$ P..!DSAP..!PRT1..
!WAIT..!XFRM..!WAIT..!MORE..P "DIE FRAU
VERSCHWINDET UND L*{T SIE ..P "ALLEINE.
..S N0(19)=2.%GT22..I N0(19):2..T P "SIE
HABEN SIE BEREITS...T J -3..S TL(22)=25
5..!PRT2..!DSAP..!PRT2..!XFRM..!WAIT..!M
ORE..P "SIE SIND ALLEIN IN DER H%TTE...S
N0(19)=2.%..02.%OU...%..HU..3 ROOM 18.0
..!GOTO.!DRAW..S P=3-P..C 1,P,0..B RGHT
L..S V=P..D ..I N0(19):0..T B FLUTE..I N
0(19):1..T B NOFLT..I N0(19):2..T B EMPT
Y..S V=P..D ..I N0(19)<2..T B WOMAN..S V
=P..D .._ P.TOETE..!CLRT..%SH....I N0(19
):2..T J -4..!WAIT..S TL(22)=255..!DSAP.
.!CLRT..!XFRM..P " "GEWALT ERNTET GEW
ALT."..P "..P " SEI GEWARNT!!..S
N0(19)=2.FRAGE FRAU ..!CLRT..I N0(19):2
..E P ""DIE ERSTEN ZWEI VON DREI"..E P "
HABEN EINEN SCHL%SSEL.! ..T P "SIE SIND
ALLEIN IN DER H%TTE. .%OF....I N0(19):2
..T P "AN WEN??..E P "H<FLICH LEHNT DIE
FRAU AB. .!DSAP..S K=3-P..C 1,K,0..B RGH
TL..S V=K..D ..B EMPTY..S V=K..D .._ K..
C 0,K,144..V 12.!PRT1..P ""DENKEN SIE DA
RAN, MUSIK Z*HMT DAS ..P " WILDE BIEST."
.!PRT2..P ""IHRE GIER N%TZT IHNEN NICHTS
. ".!XFRM..S K=3-P..S A=20..S B=A..$ P..
S B=B-1..I B>0..T J -2..S A=A-1..I A>1..
$ K..T J -8..$ P..S B=A..$ K..S B=B-1..I
B>0..T J -2..S A=A+1..I A<10..$ P..T J
-8..$ K..S P=K.@@@@@.
> CLICK IMAGE PREVIEW FOR FULL MODAL