00000000: 00 40 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 54 68 65 20 6F 6C |):2..T P "The ol|
00000030: 64 20 77 6F 6D 61 6E 20 69 73 20 67 6F 6E 65 2E |d woman is gone.|
00000040: 0D 2E 45 20 50 20 22 49 6E 73 69 64 65 20 74 68 |..E P "Inside th|
00000050: 65 20 68 75 74 20 79 6F 75 20 73 65 65 20 61 6E |e hut you see an|
00000060: 20 6F 6C 64 20 77 6F 6D 61 6E 0D 2E 45 20 50 20 | old woman..E P |
00000070: 22 70 6C 61 79 69 6E 67 20 61 20 66 6C 75 74 65 |"playing a flute|
00000080: 2E 20 53 68 65 20 70 61 75 73 65 73 20 61 73 20 |. She pauses as |
00000090: 79 6F 75 0D 2E 45 20 50 20 22 65 6E 74 65 72 20 |you..E P "enter |
000000A0: 61 6E 64 20 6C 6F 6F 6B 73 20 75 70 20 61 74 20 |and looks up at |
000000B0: 79 6F 75 2E 20 2E 20 2E 0D 2E 45 20 21 50 4C 46 |you. . ...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 70 20 61 6E 20 6F |.E P ""Help an o|
000000E0: 6C 64 20 77 6F 6D 61 6E 20 77 68 6F 20 69 73 20 |ld woman who is |
000000F0: 70 6F 6F 72 20 61 6E 64 0D 2E 45 20 50 20 22 20 |poor and..E P " |
00000100: 68 75 6E 67 72 79 2E 20 4B 69 6E 64 6E 65 73 73 |hungry. Kindness|
00000110: 20 69 73 20 61 6C 77 61 79 73 20 72 65 70 61 69 | is always repai|
00000120: 64 0D 2E 45 20 50 20 22 20 62 79 20 74 68 65 20 |d..E P " by the |
00000130: 67 6F 64 73 2E 22 0D 2E 54 20 21 48 45 52 45 0D |gods."..T !HERE.|
00000140: 25 4C 4F 32 32 0D 2E 50 20 22 49 74 20 69 73 20 |%LO22..P "It is |
00000150: 61 20 4B 61 73 68 6D 69 72 2D 62 6C 75 65 20 73 |a Kashmir-blue s|
00000160: 61 70 70 68 69 72 65 20 66 6C 75 74 65 21 0D 21 |apphire flute!.!|
00000170: 4C 4F 4F 4B 0D 4C 4F 4F 4B 20 57 4F 4D 41 4E 0D |LOOK.LOOK WOMAN.|
00000180: 2E 21 43 4C 52 54 0D 2E 49 20 4E 30 28 31 39 29 |.!CLRT..I N0(19)|
00000190: 3A 30 0D 2E 54 20 50 20 22 54 68 65 20 77 6F 6D |:0..T P "The wom|
000001A0: 61 6E 20 69 73 20 6C 6F 6F 6B 69 6E 67 20 61 74 |an is looking at|
000001B0: 20 79 6F 75 20 61 73 20 69 66 0D 2E 54 20 50 20 | you as if..T P |
000001C0: 22 73 68 65 27 73 20 65 78 70 65 63 74 69 6E 67 |"she's expecting|
000001D0: 20 73 6F 6D 65 74 68 69 6E 67 2E 0D 2E 45 20 50 | something...E P|
000001E0: 20 22 59 6F 75 20 61 72 65 20 61 6C 6F 6E 65 20 | "You are alone |
000001F0: 69 6E 20 74 68 65 20 68 75 74 2E 0D 25 4F 46 30 |in the hut..%OF0|
00000200: 37 0D 2E 49 20 54 43 28 37 29 23 30 0D 2E 54 20 |7..I TC(7)#0..T |
00000210: 50 20 22 59 6F 75 20 64 6F 6E 27 74 20 68 61 76 |P "You don't hav|
00000220: 65 20 61 6E 79 20 66 6F 6F 64 2E 0D 2E 54 20 4A |e any food...T J|
00000230: 20 2D 33 0D 2E 49 20 4E 30 28 31 39 29 3A 32 0D | -3..I N0(19):2.|
00000240: 2E 54 20 50 20 22 54 6F 20 77 68 6F 6D 3F 0D 2E |.T P "To whom?..|
00000250: 54 20 4A 20 2D 36 0D 2E 53 20 54 43 28 37 29 3D |T J -6..S TC(7)=|
00000260: 32 35 35 0D 2E 53 20 54 43 28 32 32 29 3D 30 0D |255..S TC(22)=0.|
00000270: 2E 53 20 54 4C 28 32 32 29 3D 32 35 35 0D 2E 50 |.S TL(22)=255..P|
00000280: 20 22 22 49 6E 20 65 78 63 68 61 6E 67 65 20 66 | ""In exchange f|
00000290: 6F 72 20 79 6F 75 72 20 6B 69 6E 64 6E 65 73 73 |or your kindness|
000002A0: 2C 0D 2E 50 20 22 20 70 6C 65 61 73 65 20 74 61 |,..P " please ta|
000002B0: 6B 65 20 74 68 69 73 20 66 6C 75 74 65 2E 20 0D |ke this flute. .|
000002C0: 2E 50 20 22 20 49 74 20 6D 61 79 20 68 65 6C 70 |.P " It may help|
000002D0: 20 79 6F 75 20 61 74 20 73 6F 6D 65 20 74 69 6D | you at some tim|
000002E0: 65 20 2E 20 2E 20 2E 22 0D 2E 21 4D 4F 52 45 0D |e . . ."..!MORE.|
000002F0: 2E 53 20 4E 30 28 31 39 29 3D 31 0D 2E 21 44 52 |.S N0(19)=1..!DR|
00000300: 41 57 0D 2E 21 43 4C 52 54 0D 2E 21 50 52 54 31 |AW..!CLRT..!PRT1|
00000310: 0D 2E 24 20 50 0D 2E 21 44 53 41 50 0D 2E 21 50 |..$ P..!DSAP..!P|
00000320: 52 54 31 0D 2E 21 57 41 49 54 0D 2E 21 58 46 52 |RT1..!WAIT..!XFR|
00000330: 4D 0D 2E 21 57 41 49 54 0D 2E 21 4D 4F 52 45 0D |M..!WAIT..!MORE.|
00000340: 2E 50 20 22 54 68 65 20 77 6F 6D 61 6E 20 64 69 |.P "The woman di|
00000350: 73 61 70 70 65 61 72 73 2C 20 6C 65 61 76 69 6E |sappears, leavin|
00000360: 67 20 79 6F 75 0D 2E 50 20 22 61 6C 6F 6E 65 2C |g you..P "alone,|
00000370: 20 6D 79 73 74 69 66 69 65 64 2E 0D 2E 53 20 4E | mystified...S N|
00000380: 30 28 31 39 29 3D 32 0D 25 47 54 32 32 0D 2E 49 |0(19)=2.%GT22..I|
00000390: 20 4E 30 28 31 39 29 3A 32 0D 2E 54 20 50 20 22 | N0(19):2..T P "|
000003A0: 59 6F 75 20 61 6C 72 65 61 64 79 20 68 61 76 65 |You already have|
000003B0: 20 69 74 2E 0D 2E 54 20 4A 20 2D 33 0D 2E 53 20 | it...T J -3..S |
000003C0: 54 4C 28 32 32 29 3D 32 35 35 0D 2E 21 50 52 54 |TL(22)=255..!PRT|
000003D0: 32 0D 2E 21 44 53 41 50 0D 2E 21 50 52 54 32 0D |2..!DSAP..!PRT2.|
000003E0: 2E 21 58 46 52 4D 0D 2E 21 57 41 49 54 0D 2E 21 |.!XFRM..!WAIT..!|
000003F0: 4D 4F 52 45 0D 2E 50 20 22 59 6F 75 20 61 72 65 |MORE..P "You are|
00000400: 20 61 6C 6F 6E 65 20 69 6E 20 74 68 65 20 68 75 | alone in the hu|
00000410: 74 2C 20 6D 79 73 74 69 66 69 65 64 2E 0D 2E 53 |t, mystified...S|
00000420: 20 4E 30 28 31 39 29 3D 32 0D 25 2E 2E 30 32 0D | N0(19)=2.%..02.|
00000430: 25 4F 55 2E 2E 0D 25 2E 2E 48 55 0D 2E 33 20 52 |%OU...%..HU..3 R|
00000440: 4F 4F 4D 20 31 38 2E 30 20 0D 2E 21 47 4F 54 4F |OOM 18.0 ..!GOTO|
00000450: 0D 21 44 52 41 57 0D 2E 53 20 50 3D 33 2D 50 0D |.!DRAW..S P=3-P.|
00000460: 2E 43 20 31 2C 50 2C 30 0D 2E 42 20 52 47 48 54 |.C 1,P,0..B RGHT|
00000470: 4C 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 49 20 |L..S V=P..D ..I |
00000480: 4E 30 28 31 39 29 3A 30 0D 2E 54 20 42 20 46 4C |N0(19):0..T B FL|
00000490: 55 54 45 0D 2E 49 20 4E 30 28 31 39 29 3A 31 0D |UTE..I N0(19):1.|
000004A0: 2E 54 20 42 20 4E 4F 46 4C 54 0D 2E 49 20 4E 30 |.T B NOFLT..I N0|
000004B0: 28 31 39 29 3A 32 0D 2E 54 20 42 20 45 4D 50 54 |(19):2..T B EMPT|
000004C0: 59 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E 49 20 |Y..S V=P..D ..I |
000004D0: 4E 30 28 31 39 29 3C 32 0D 2E 54 20 42 20 57 4F |N0(19)<2..T B WO|
000004E0: 4D 41 4E 0D 2E 53 20 56 3D 50 0D 2E 44 20 0D 2E |MAN..S V=P..D ..|
000004F0: 5F 20 50 0D 53 48 4F 4F 54 0D 2E 21 43 4C 52 54 |_ P.SHOOT..!CLRT|
00000500: 0D 2E 25 53 48 2E 2E 0D 2E 49 20 4E 30 28 31 39 |..%SH....I N0(19|
00000510: 29 3A 32 0D 2E 54 20 4A 20 2D 34 0D 2E 21 57 41 |):2..T J -4..!WA|
00000520: 49 54 0D 2E 53 20 54 4C 28 32 32 29 3D 32 35 35 |IT..S TL(22)=255|
00000530: 0D 2E 21 44 53 41 50 0D 2E 21 43 4C 52 54 0D 2E |..!DSAP..!CLRT..|
00000540: 21 58 46 52 4D 0D 2E 50 20 22 20 20 20 20 22 56 |!XFRM..P " "V|
00000550: 69 6F 6C 65 6E 63 65 20 6F 66 74 65 6E 20 72 65 |iolence often re|
00000560: 61 70 73 20 76 69 6F 6C 65 6E 63 65 2E 22 0D 2E |aps violence."..|
00000570: 50 20 22 0D 2E 50 20 22 20 20 20 20 20 20 20 20 |P "..P " |
00000580: 20 20 20 20 42 45 20 57 41 52 4E 45 44 21 21 0D | BE WARNED!!.|
00000590: 2E 53 20 4E 30 28 31 39 29 3D 32 0D 41 53 4B 20 |.S N0(19)=2.ASK |
000005A0: 20 57 4F 4D 41 4E 0D 2E 21 43 4C 52 54 0D 2E 49 | WOMAN..!CLRT..I|
000005B0: 20 4E 30 28 31 39 29 3A 32 0D 2E 45 20 50 20 22 | N0(19):2..E P "|
000005C0: 22 54 68 65 20 66 69 72 73 74 20 74 77 6F 20 6F |"The first two o|
000005D0: 66 20 74 68 72 65 65 22 0D 2E 45 20 50 20 22 20 |f three"..E P " |
000005E0: 70 72 6F 76 69 64 65 20 61 20 6B 65 79 2E 22 0D |provide a key.".|
000005F0: 2E 54 20 50 20 22 59 6F 75 20 61 72 65 20 61 6C |.T P "You are al|
00000600: 6F 6E 65 20 69 6E 20 74 68 65 20 68 75 74 2E 0D |one in the hut..|
00000610: 25 4F 46 2E 2E 0D 2E 49 20 4E 30 28 31 39 29 3A |%OF....I N0(19):|
00000620: 32 0D 2E 54 20 50 20 22 54 6F 20 77 68 6F 6D 3F |2..T P "To whom?|
00000630: 3F 0D 2E 45 20 50 20 22 54 68 65 20 6F 6C 64 20 |?..E P "The old |
00000640: 6C 61 64 79 20 6B 69 6E 64 6C 79 20 72 65 66 75 |lady kindly refu|
00000650: 73 65 73 20 79 6F 75 72 20 6F 66 66 65 72 2E 0D |ses your offer..|
00000660: 21 44 53 41 50 0D 2E 53 20 4B 3D 33 2D 50 0D 2E |!DSAP..S K=3-P..|
00000670: 43 20 31 2C 4B 2C 30 0D 2E 42 20 52 47 48 54 4C |C 1,K,0..B RGHTL|
00000680: 0D 2E 53 20 56 3D 4B 0D 2E 44 20 0D 2E 42 20 45 |..S V=K..D ..B E|
00000690: 4D 50 54 59 0D 2E 53 20 56 3D 4B 0D 2E 44 20 0D |MPTY..S V=K..D .|
000006A0: 2E 5F 20 4B 0D 2E 43 20 30 2C 4B 2C 31 34 34 0D |._ K..C 0,K,144.|
000006B0: 2E 56 20 31 32 0D 21 50 52 54 31 0D 2E 50 20 22 |.V 12.!PRT1..P "|
000006C0: 22 52 65 6D 65 6D 62 65 72 2C 20 6D 75 73 69 63 |"Remember, music|
000006D0: 20 73 6F 6F 74 68 65 73 20 74 68 65 20 73 61 76 | soothes the sav|
000006E0: 61 67 65 0D 2E 50 20 22 20 62 65 61 73 74 2E 22 |age..P " beast."|
000006F0: 0D 21 50 52 54 32 0D 2E 50 20 22 22 59 6F 75 72 |.!PRT2..P ""Your|
00000700: 20 67 72 65 65 64 20 67 65 74 73 20 79 6F 75 20 | greed gets you |
00000710: 6E 6F 74 68 69 6E 67 2E 22 0D 21 58 46 52 4D 0D |nothing.".!XFRM.|
00000720: 2E 53 20 4B 3D 33 2D 50 0D 2E 53 20 41 3D 32 30 |.S K=3-P..S A=20|
00000730: 0D 2E 53 20 42 3D 41 0D 2E 24 20 50 0D 2E 53 20 |..S B=A..$ P..S |
00000740: 42 3D 42 2D 31 0D 2E 49 20 42 3E 30 0D 2E 54 20 |B=B-1..I B>0..T |
00000750: 4A 20 2D 32 0D 2E 53 20 41 3D 41 2D 31 0D 2E 49 |J -2..S A=A-1..I|
00000760: 20 41 3E 31 0D 2E 24 20 4B 0D 2E 54 20 4A 20 2D | A>1..$ K..T J -|
00000770: 38 0D 2E 24 20 50 0D 2E 53 20 42 3D 41 0D 2E 24 |8..$ P..S B=A..$|
00000780: 20 4B 0D 2E 53 20 42 3D 42 2D 31 0D 2E 49 20 42 | K..S B=B-1..I B|
00000790: 3E 30 0D 2E 54 20 4A 20 2D 32 0D 2E 53 20 41 3D |>0..T J -2..S A=|
000007A0: 41 2B 31 0D 2E 49 20 41 3C 31 30 0D 2E 24 20 50 |A+1..I A<10..$ P|
000007B0: 0D 2E 54 20 4A 20 2D 38 0D 2E 24 20 4B 0D 2E 53 |..T J -8..$ K..S|
000007C0: 20 50 3D 4B 0D 40 40 40 40 40 0D | P=K.@@@@@. |
.@.S N=19..!DRAW..!CLRT..I N0(19):2..T P
"THE OLD WOMAN IS GONE...E P "INSIDE TH
E HUT YOU SEE AN OLD WOMAN..E P "PLAYING
A FLUTE. SHE PAUSES AS YOU..E P "ENTER
AND LOOKS UP AT YOU. . ...E !PLFT..$ P..
E !MORE..E P ""HELP AN OLD WOMAN WHO IS
POOR AND..E P " HUNGRY. KINDNESS IS ALWA
YS REPAID..E P " BY THE GODS."..T !HERE.
%LO22..P "IT IS A KASHMIR-BLUE SAPPHIRE
FLUTE!.!LOOK.LOOK WOMAN..!CLRT..I N0(19)
:0..T P "THE WOMAN IS LOOKING AT YOU AS
IF..T P "SHE'S EXPECTING SOMETHING...E P
"YOU ARE ALONE IN THE HUT..%OF07..I TC(
7)#0..T P "YOU DON'T HAVE ANY FOOD...T J
-3..I N0(19):2..T P "TO WHOM?..T J -6..
S TC(7)=255..S TC(22)=0..S TL(22)=255..P
""IN EXCHANGE FOR YOUR KINDNESS,..P " P
LEASE TAKE THIS FLUTE. ..P " IT MAY HELP
YOU AT SOME TIME . . ."..!MORE..S N0(19
)=1..!DRAW..!CLRT..!PRT1..$ P..!DSAP..!P
RT1..!WAIT..!XFRM..!WAIT..!MORE..P "THE
WOMAN DISAPPEARS, LEAVING YOU..P "ALONE,
MYSTIFIED...S N0(19)=2.%GT22..I N0(19):
2..T P "YOU ALREADY HAVE IT...T J -3..S
TL(22)=255..!PRT2..!DSAP..!PRT2..!XFRM..
!WAIT..!MORE..P "YOU ARE ALONE IN THE HU
T, MYSTIFIED...S N0(19)=2.%..02.%OU...%.
.HU..3 ROOM 18.0 ..!GOTO.!DRAW..S P=3-P.
.C 1,P,0..B RGHTL..S V=P..D ..I N0(19):0
..T B FLUTE..I N0(19):1..T B NOFLT..I N0
(19):2..T B EMPTY..S V=P..D ..I N0(19)<2
..T B WOMAN..S V=P..D .._ P.SHOOT..!CLRT
..%SH....I N0(19):2..T J -4..!WAIT..S TL
(22)=255..!DSAP..!CLRT..!XFRM..P " "V
IOLENCE OFTEN REAPS VIOLENCE."..P "..P "
BE WARNED!!..S N0(19)=2.ASK
WOMAN..!CLRT..I N0(19):2..E P ""THE FIR
ST TWO OF THREE"..E P " PROVIDE A KEY.".
.T P "YOU ARE ALONE IN THE HUT..%OF....I
N0(19):2..T P "TO WHOM??..E P "THE OLD
LADY KINDLY REFUSES YOUR OFFER..!DSAP..S
K=3-P..C 1,K,0..B RGHTL..S V=K..D ..B E
MPTY..S V=K..D .._ K..C 0,K,144..V 12.!P
RT1..P ""REMEMBER, MUSIC SOOTHES THE SAV
AGE..P " BEAST.".!PRT2..P ""YOUR GREED G
ETS YOU NOTHING.".!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.@@@@@.
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL