MV - CPCEMU Disk-File
Disk-Info
Z80onDSK v3.3 ( Track-Info
N Track-Info
N DISK AVERNO AVERNO 0 8
AVERNO 1 @
AVERNO 2 > PLUS3DOS ,
,
"00000":"0":ڰ"0":
"AVERNO "
PLUS3DOS { h V d 23659 k\ ,0 :0 :0 :"AVERNO.0":"AVERNO.1":"AVERNO.2":
] ] PLUS3DOS @ 5U_ A$RP,з@Z@SOJ@
, . ~@ 5UU_ U0 UUU_ V UU_ * @J- 0@Z@R H6JV@ Track-Info
N hq /д&A?! ,
* } j > 5UO? @)- @hZ
R|KKF@ @ C 02 5UU_
W?? UU_?V?UU_ n *a )- @hZ
L2-3&!4 ? `! *@ P? 5UBL Z)L2A2V!$Z
RLh U UUU_ _V UU_VUU_ jBI$$ AZ% RJAIV@ $Z t- @h j` પ
UoNO?3?!Z@R|KM6@ ?-Z - 0VUW x ? U UUU_
V UU_ UU_ ? !hRP, Z@R H J@ Zu߷ q j UU5\ UU1UU @ UW@GE UUUW@ pG } P ? ? P C ǃ * 𪪫 0 CEƿ @8A? `Np A x ~ ? UU5P5 UUWUUW
UUU/I UUUWbO ?? u@P' ` ! . C *j 1/D ᪪O ?? 뫀
& ! .C UU5P` ~UU ?UUW HT5UUU#dy UUU_Ѐa(! uX ? Հ ِ y>83 * ?| Lj*j $> ' * | a ?] >) UUUQ} ??UWw UW FA5UUU $ UUU_Q ? US 9U }\ ? w ,T?પ ?瀁 ?@ GA@ dLJ ? ? p \?? w $l??? . ݨ?0 xi ?G ! 0 m O
3 A x 0 P%% 8@ UX UV` -T uUUUC .i?0 ) >OA 0 z ? f 8 x (} $%D | LJ@ Z@ w b : ٪À .Ui?0 ) ~oA
0 p x 88 9 XJ@ ~ ֕U ]UUh< up UUUUc ^ * ?0 p1 .A
0 ? = Track-Info
N 8 J ` pk
? ) A_ Zp ̪ ^ _?0 ( 0 A GW @ x X ? p7UD 1 X >UUU^ < ? Up UUUa w fQ?0 ( ! 0 A ; z ǀ p ʪ W o p j w ~XFq? 0 l 0
p! U `@ X5b? O UY {Q T UUU F! 0
< 0 ~ > ! E " 8 ? @ *x? x ' ? & ꪪ
2O>2N*Lx ~# x M H M H !xM
~ J M PY #M H
M H M (D:V2V:V2V:R
:O=2O :O <2O
:N(o<2N
:N=2N
> 2O>
bo& ))) *N}@G}_P~#*N L& ))))) X w:O<2O 2O:N<2N
>2Nɯ*K\*Y\RDM*K\>ݾ > ݾ >ݾ( x#
x >wT[
wTwT>wT[
wTn | ;; *=\s#rv͎{ ::\ (
((<2\6 ! "B\! "D\;;}! :V2V:Xg:Yod!b :V(G~w #w#~w #w̓tW~w #
w#~w #
w ~w #
w#~w
w!VZ:\g:]od w#w̓tw#w w#w}@W}ob\ b))))) X|($}0 o|g o$!Tw>W >w! 8E_ >w!,9g >w!->g >w!d />G
>w>2S!
![JDM!^ $ X! ~<w@ xz[ :T(*H"H|
>2S *F"F|
>Track-Info
N 2S >2N>2O*H͊>2N>2O*F͊'ͥͥd ͥ
ͥM R8 >02RA>~2!>.2RA~(>/>.2R:O (A:2x #>~2#>~2:G2O:N<2N
MMMM
! "# $% &'
() *+
?DxU"<<"4nk ? "<<"?4k MMMM M M jUo_rr p>6 3qAFg; LL#X_LL ~~~~ &**2 G (> G 8D | G | D8 G @@PP| G |@xD8 G 8@xDD8 G x G 8D8DD8 G 8DD< G N ~ N N ~ N 6$$ $~$$~$ >(>
> bd&F (*D: > > 0 > 00 &**2 (> 8D | | D8 @@PP| |@xD8 8@xDD8 x 8D8DD8 8DD< 0 > > b"D D8
B< D$x$$" p(("r T****D X$TDD 4JJRB< X$&x ,RRBF8 \"<($B >Dx "| 4
JB< D***" D**" D"*** Fd&b D""" B< A>>A @ pp 8T "x ~ $$> 0 p p ( 0 )*440 +(ba>0 )*540
< 60006 f
d$ sd=-1 :sx=1 700
n^ s(sx-1 ,sy+1 )1 sx=sx-1 :59978 J ,50 2 :5100 :700
x1 s(sx-1 ,sy)1 su=2 :700
E sy>2 s(sx-1 ,sy-1 )1 su=3 :700
700
_ sd=-1 :59978 J ,0 :5100 :s(sx,sy+2 )1 ba=1 :700
700
$ sd=0 :sx=12 700
O s(sx+1 ,sy+1 )1 59978 J ,50 2 :5100 :700
1 s(sx+1 ,sy)1 su=2 :700
E sy>2 s(sx+1 ,sy-1 )1 su=3 :700
700
m sd=0 :sx=sx+1 :59978 J ,0 :5100 :s(sx,sy+2 )1 ba=1 :700
700
,# sx=2 sy=20 700
6 s(sx-1 ,sy+1 )1 s(sx-1 ,sy+2 )=1 s(sx-1 ,sy+3 )1 la=sx-1 :5200 P :59987 S 0 800
@ 700
^# sx=1 sy=20 700
hg s(sx,sy+2 )=1 s(sx,sy+3 )1 la=sx:5200 P :59987 S 0 800
r 700
$ sx=11 sy=20 700
s(sx+1 ,sy+1 )=0 s(sx+1 ,sy+2 )=1 s(sx+1 ,sy+3 )1 la=sx+1 :5200 Track-Info
N P :59987 S 0 800
700
$ sx=11 sy=20 700
s(sx+1 ,sy+2 )=1 s(sx+1 ,sy+3 )1 la=sx+1 :5200 P :59987 S 0 800
700
&O su=1 sx=sx+sd:59978 J ,50 2 :5100 :su=0 :700
05 su=su-1 :sy=sy-1 :5100 :700
sy=sy+1 :5100
1 s(sx,sy+2 )=1 ba=0 :700
700
60033
60030 ~
4 þ59978 J s(sx,sy+1 )=2 1400 x
] þ59978 J s(sx,sy+1 )=3 59987 S ,3 +3 *(nl=0 ):800
50 2
700
! " Salida Imposible "
" " Llave destruida "
# " Aun faltan llaves"
$ " Fin de tiempo "
% " Fin de energia "
& " Pantalla superada"
' " Fin del juego "
*F 59987 S 6 li=li-1 :li<0 59987 S ,7
4& cm=59987 S :59987 S ,0
> cm=6 1100 L
Hh .1}L,7 :.1}L,5 :.1}L,4 :.1}L,2 :.2~L,0 :cm+800
R} a$:0 ;10
,2 ;"";11 ,2 ;"";a$;"";12 ,2 ;""
\. n=0 20 :60030 ~ :5 :n
f= li<0 err=1050 :5050 :0 :1050
p 1300
" 23659 k\ ,2 :49999 O
? 23659 k\ ,2 :err=1030 :5050 :60018 r
q 23606 6\ ,48 0 :23607 7\ ,241 :23296 [ ,195 :23297 [ ,129 :23298 [ ,27
7 s(12 ,22 ):main=55000 :hs=3000
& 1 :1 :7 :0 :
$6 main=55000 :li=5 :le=1 :sc=0
.l 59974 F ,0 :n=0 7 :59982 N ,0 :59975 G ,n:59983 O ,n:60036 :n
3P 17 ,5 ;"BIENVENIDO AL INFIERNO";20 ,8 ;"PULSA UNA TECLA"
8 20 :mus=58500
Bs 60030 ~ :mus/10
,(mus+1 )-10
:mus=mus+2 :=""1090 B -10
*(mus>58569 )
Dm 59974 F ,0 :n=8 30 :59982 N ,0 :59975 G ,n:59983 O ,n:60036 :n
GH 0 :7 :0 :1 ::23624 H\ ,71 G :1200
V err=1190 :5050 :.1}L,7 :.1}L,7 :.1}L,7 :.5,0 :sc1=(59974 F +256 *59975 G )
`t sc=sc+1 :10
,26 ;("0"sc<10000 ' );("0"sc<1000 );("0"sc<100 d );("0"sc<10
);SC
j .001wn,30 :sc1=sc1-100 d *(sc1100 d )-sc1*(sc1<100 d ):6 ,26 ;("0"sc1<10000 ' );("0"sc1<1000 );("0"sc1<100 d );("0"sc1<10
);SC1:sc1>0 1120 `
t 6 ,26 ;"00000"
~$ main=main+250 :le=le+1
le14 1500
* 59976 H ,0 :59977 I ,0
sc>hshs=sc
- 59974 F ,112 p :59975 G ,23
(m po=(59976 H +256 *59977 I )+3510
:po:59976 H ,23670 v\ :59977 I ,23671 w\
2 5000
< 60009 i :60012 l
FD sx=59200 @ :sy=59201 A :sd=59202 B :nl=59203 C
PH 59992 X ,sx*2 -2 :59993 Y ,sy:59990 V ,sd*2
Z 60000 `
d9 cm=0 :su=0 :ba=0 :59978 J ,0
n 0 ,25 ;"FUERZA ";2 ,26 ;"05000";4 ,25 ;"TIEMPO ";6 ,26 ;"06000";8 ,25 ;"PUNTOS ";10
,26 ;("0"sc<10000 ' );("0"sc<1000 );("0"sc<100 d );("0"sc<10
);SC
s 12 ,25 ;"NIVEL: ";14 ,29 ;(" "le<10
);le;16 ,25 ;"VIDAS: ";18 ,30 ;li;20 ,25 ;"RECORD ";#0 ;0 ,26 ;("0"hs<10000 ' );hs
w% err=800 :5050 :50 2
m .1}L,0 :.1}L,0 :.5,7 :s(sx,sy+1 )=0 :nl=nl-1 :60027 {
v sc=sc+100 d :10
,26 ;("0"sc<10000 ' );("0"sc<1000 );("0"sc<100 d );("0"sc<10
);SC
& 0 :0 :7 :1 :
60024 x :59982 N ,0 :59983 O ,0 :N=0 31 :59986 R ,34 " :60015 o :59986 R ,35 # :60015 o :N
[ N=1 4 :59986 R ,34 " :60015 o :59986 R ,35 # :60015 o
; M=1 28 :59986 R ,33 ! :60015 o :M
K 59986 R ,34 " :60015 o :59986 R ,35 # :60015 o :N
59982 N ,6 :59983 O ,0 Track-Info
N :N=0 31 :59986 R ,34 " :60015 o :59986 R ,35 # :60015 o :N
M=1 3 :59982 N ,4 :59983 O ,28 :59986 R ,42 * :60015 o :59986 R ,43 + :60015 o
s 59982 N ,5 :59983 O ,28 :59986 R ,40 ( :60015 o :59986 R ,41 ) :60015 o
- N=2 27 :N2 60003 c
F N<26 59993 Y ,4 :59992 X ,N+3 :60000 `
59982 N ,4 :59983 O ,N:59986 R ,32 :60015 o :59986 R ,58 : :60015 o :59986 R ,59 ; :60015 o
59982 N ,5 :59983 O ,N:59986 R ,32 :60015 o :59986 R ,60 < :60015 o :59986 R ,61 = :60015 o :.01z#
=,N:N:M
" 0 ;11 ,7 ;"!! ENHORABUENA !!";14 ,3 ;"HAS ESCAPADO DEL INFIERNO";17 ,8 ;"PULSA UNA TECLA";20 ,6 ;"PARA VOLVER A JUGAR"
, 60030 ~ :=""1580 ,
6 1020
< main:59980 L ,23670 v\ :59981 M ,23671 w\ :
; err:60567 ,23670 v\ :60568 ,23671 w\ :
f 59992 X ,sx*2 +(59978 J =50 2 )-2 :59993 Y ,sy:60003 c :60000 ` :
P+ .01z#
=,20 :n=sy+2 20
Z/ s(la,n+1 )=1 .1}L,-30 :
dw 59982 N ,n:59983 O ,la*2 -2 :59986 R ,32 :60015 o :59986 R ,33 ! :60015 o
n s(la,n)=0
x 59982 N ,n+1 :59983 O ,la*2 -2 :59986 R ,34 " :60015 o :59986 R ,35 # :60015 o
. old=s(la,n+1 ):s(la,n+1 )=1
& old2 n:.1}L,-30 :
59987 S ,2 :
Track-Info
N Track-Info
N Track-Info
N
Track-Info
N Track-Info
N Track-Info
N
Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
N Track-Info
! N! ! ! ! ! ! ! ! ! Track-Info
" N" " " " " " " " " Track-Info
# N# # # # # # # # # Track-Info
$ N$ $ $ $ $ $ $ $ $ Track-Info
% N% % % % % % % % % Track-Info
& N& & & & & & & & & Track-Info
' N' ' ' ' ' ' ' ' '