------
LOXLEY
------
(C) 1991-2022 ARIEL RUIZ

*******
 INTRO
*******

MAPA MEMORIA 
-------------

PAGE 0= DIAPOSITIVAS 1-6
PAGE 1= SFX+FMV FIREARROW+TITLE
PAGE 3= FMV ARROW-SHOT
PAGE 4= FMV FIRE-ARROW
PAGE 5+2+7= SCREEN+SYSVARS+BASIC+VARS+STACKS+MUSICA+TEXTOS
PAGE 6= FMV CAM-ARROW

VARIABLES BASIC
---------------
LET F=66
LET J=2
LET N=8
FOR X=0
FOR Y=0
LET Z=10
LET K=0
LET L=1

LISTADO BASIC (CON CODIGOS)
---------------------------

LOS NUMEROS EN CADENAS PRINT QUE ESTAN PRECEDIDOS POR | SON BYTES INSERTADOS, POR EJEMPLO, |006 ES UN SOLO BYTE IGUAL A 6.

2 BORDER K: CLS : LET F=CODE "|065":GO TO -9930
4 GO TO -9900:POKE 23920,CODE "|065"+F:IF F<K OR F>L+L THEN GO TO CODE "|004"
8 PRINT "|020|135|023|140|020|176|075|092|002|000|136";A$;"|020|140|023|091|075|092|002|000|135|017|140|046|142|001|091|018|000|135|023|136";:POKE 23296,L:POKE 65535,CODE "|065"+F:IF F=L+L THEN PRINT "|020|135|017|140|193|246|019|241|161|005|135|022|140|060|176|209|225|076|015|135|023|140|136|191|000|165|225|012|135|022|140|000|165|043|241|225|012|135|023|136"
10 IF INKEY$ <> "" THEN GO TO CODE "|010"
11 PRINT "|020|140|027|091|075|092|002|000|136";B$;"|020|140|029|091|075|092|002|000|136";A$;"|020|140|023|091|075|092|002|000|136";:GO TO -9910:PRINT "|020|140|027|091|075|092|002|000|136";C$;"|020|140|029|091|075|092|002|000|136";B$;"|020|140|023|091|075|092|002|000|136";:GO TO -9910:PRINT "|020|140|027|091|075|092|002|000|136";D$;"|020|140|029|091|075|092|002|000|136";C$;"|020|140|023|091|075|092|002|000|136";:GO TO -9910:PRINT "|020|140|027|091|075|092|002|000|136|022|000|000";E$;"|020|140|029|091|075|092|002|000|136";D$;"|020|140|023|091|075|092|002|000|136";:GO TO -9910:PRINT "|020|140|027|091|075|092|002|000|136";F$;"|020|140|029|091|075|092|002|000|136";E$;"|020|140|023|091|075|092|002|000|136";:GO TO -9910:PRINT "|020|140|027|091|075|092|002|000|136|022|000|000";G$;"|020|140|029|091|075|092|002|000|136";F$;"|020|140|023|091|075|092|002|000|136";:GO TO -9910:PRINT "|020|147|111|160|128|128|128|128|128|136";
100 PRINT "|020|140|179|146|001|091|018|000|146|140|000|080|001|080|255|007|128|128|135|023|140|000|208|001|208|255|007|128|128|146|140|000|181|001|181|255|007|128|128|146|135|020|130|000|192|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|028|130|066|205|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|020|130|142|218|135|023|140|000|165|000|192|000|016|128|146|135|028|130|087|231|135|029|140|000|165|000|192|000|016|128|146|135|020|130|154|243|135|023|140|000|165|000|192|000|016|128|146|135|025|130|117|204|135|029|140|000|165|000|192|000|016|128|146|135|017|130|176|216|135|023|140|000|165|000|192|000|016|128|146|135|025|130|207|228|135|029|140|000|165|000|192|000|024|128|146|136";:PRINT "|020|135|019|130|000|192|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|027|130|148|198|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|019|130|154|204|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|027|130|087|211|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|135|019|130|121|216|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|027|130|189|220|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|019|130|199|224|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|027|130|240|230|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|136";"|020|135|019|130|000|192|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|027|130|148|198|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|019|130|154|204|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|027|130|087|211|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|135|019|130|121|216|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|027|130|189|220|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|019|130|199|224|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|027|130|240|230|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|136";"|020|135|019|130|000|192|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|027|130|148|198|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|019|130|154|204|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|135|027|130|087|211|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|135|019|130|121|216|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|027|130|189|220|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|019|130|199|224|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|128|146|135|027|130|240|230|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|146|128|136";:PRINT "|020|135|022|130|064|102|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|030|130|100|115|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|022|130|135|128|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|027|130|171|237|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|022|130|000|195|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|030|130|063|210|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|022|130|209|225|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|030|130|043|241|135|029|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|017|130|019|241|135|023|146|140|000|165|000|192|000|016|140|000|189|000|216|000|002|128|128|146|135|024|140|000|165|000|064|000|027|146|136";:LET F=CODE "|073":GO TO -9930:LET F=CODE "|074":LET J=K:GO TO -9940:LET J=R:PRINT "|020|135|017|145|255|191|140|115|147|001|091|018|000|136";
140 FOR Y=K TO 800:PRINT "|020|146|140|000|000|000|000|128|015|136";:IF INKEY$ ="" THEN NEXT Y:GO TO CODE "|100"
142 IF INKEY$ ="|032" THEN PRINT "|020|147|111|160|136";:GO TO CODE "|142"
150 POKE 23606,K:POKE 23607,CODE "|060":PRINT "|020|147|096|160|135|023|144|136";:°251|
151 °239|"|076|079|088|076|069|089":GO TO CODE "|151"
9900 PRINT "|020|135|023|136";:IF INKEY$ <> "" THEN GO TO 9900
9905 POKE 23560,INT CODE INKEY$ :PRINT "|020|140|023|091|075|092|002|000|136";:IF NOT PEEK LK THEN GO TO 9901
9906 LET F=PEEK LK-CODE "|049": RETURN 
9911 PRINT "|020|135|023|140|023|091|075|092|002|000|136";:FOR Y=K TO 418:IF INKEY$ <> "" THEN PRINT "|020|140|023|091|075|092|002|000|136";:LET Y=4000
9915 PRINT "|020|140|023|091|075|092|002|000|135|017|146|128|128|140|000|000|000|000|000|002|136";:NEXT Y:RETURN 
9930 LET N=K:LET J=L+L
9940 PRINT "|020|135|022|136";:POKE 25964,J:POKE 25967,F:PRINT "|020|140|025|091|054|092|002|000|140|027|091|075|092|002|000|136";
9941 PRINT #CODE "|065";A$;:PRINT "|020|140|023|091|075|092|002|000|136";:RETURN 


LISTADO BASIC (SIMBOLICO)
------------------------

LAS ETIQUETAS Y BYTES INSERTADOS ESTÁN PRECEDIDAS POR ° (VER DEFINICION ABAJO EN EL APARTADO DATA BLOCKS)
CODIGO AUTOMODIFICANTE INDICADO POR |  POR EJEMPLO, POKE 5|34 SIGNIFICA DIRECCION DE LA LINEA 5 MAS 34 BYTES=23966
GOTO PRECEDIDO CON _ EQUIVALE A GOSUB

2 BORDER K : CLS : LET F=CODE "A" : GOTO _9930
4 GOTO _9900: POKE 8|15,CODE "°65"+F:  IF F<K OR F>L+L THEN GOTO CODE "°004"
8 PRINT "°LSE°PAG°023°LDI°LXT_SWITCHDW°VARS°002°000°FIN";A$;"°LSE°LDI°LX_VARZONE°VARS°002°000°PAG°017°LDI°LXMUSMEND°LXMUSCNT°018°000°PAG°023°FIN";: POKE °LX_MUS_ON,L:POKE °LX_LANG,CODE "°65"+F: IF F=L+L THEN PRINT "°LSE°PAG°017°LDI°ILX_TITULO_RUS°ILX_TITULO°ILX_TITULO_RUSL°PAG°022°LDI°ILX_CARR_G_RUS°ILX_CARR_G°ILX_CARR_G_RUSL°PAG°023°LDI°ILX_CARR_H_RUS°WORKSCR°ILX_CARR_H_RUSL°PAG°022°LDI°WORKSCR°ILX_CARR_H°ILX_CARR_H_RUSL°PAG°023°FIN"
10 IF INKEY DIF "" THEN GOTO CODE "°10"
11 PRINT "°LSE°LDI°LX_PITEXTW°VARS°002°000°FIN";B$;"°LSE°LDI°LX_SLIDESW°VARS°002°000°FIN";A$;"°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:  GOTO _9910: PRINT "°LSE°LDI°LX_PITEXTW°VARS°002°000°FIN";C$;"°LSE°LDI°LX_SLIDESW°VARS°002°000°FIN";B$;"°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:  GOTO _9910: PRINT "°LSE°LDI°LX_PITEXTW°VARS°002°000°FIN";D$;"°LSE°LDI°LX_SLIDESW°VARS°002°000°FIN";C$;"°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:  GOTO _9910: PRINT "°LSE°LDI°LX_PITEXTW°VARS°002°000°FIN°022°000°000";E$;"°LSE°LDI°LX_SLIDESW°VARS°002°000°FIN";D$;"°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:  GOTO _9910: PRINT "°LSE°LDI°LX_PITEXTW°VARS°002°000°FIN";F$;"°LSE°LDI°LX_SLIDESW°VARS°002°000°FIN";E$;"°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:  GOTO _9910: PRINT "°LSE°LDI°LX_PITEXTW°VARS°002°000°FIN°022°000°000";G$;"°LSE°LDI°LX_SLIDESW°VARS°002°000°FIN";F$;"°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:  GOTO _9910 : PRINT "°LSE°AYS°LX_SFX_FADEOUT°HLT°HLT°HLT°HLT°HLT°FIN";
100 PRINT "°LSE°LDI°LXMUSINB°LXMUSCNT°018°000°MUS°LDI°000°080°001°080°255°007°HLT°HLT°PAG°023°LDI°000°208°001°208°255°007°HLT°HLT°MUS°LDI°000°181°001°181°255°007°HLT°HLT°MUS°PAG°020°RLE°ILX_FARR_A°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°028°RLE°ILX_FARR_B°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°020°RLE°ILX_FARR_C°PAG°023°LDI°000°165°000°192°000°016°HLT°MUS°PAG°028°RLE°ILX_FARR_D°PAG°029°LDI°000°165°000°192°000°016°HLT°MUS°PAG°020°RLE°ILX_FARR_E°PAG°023°LDI°000°165°000°192°000°016°HLT°MUS°PAG°025°RLE°ILX_FARR_F°PAG°029°LDI°000°165°000°192°000°016°HLT°MUS°PAG°017°RLE°ILX_FARR_G°PAG°023°LDI°000°165°000°192°000°016°HLT°MUS°PAG°025°RLE°ILX_FARR_H°PAG°029°LDI°000°165°000°192°000°024°HLT°MUS°FIN";: PRINT "°LSE°PAG°019°RLE°ILX_ARRS_A°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°027°RLE°ILX_ARRS_B°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°019°RLE°ILX_ARRS_C°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°027°RLE°ILX_ARRS_D°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°PAG°019°RLE°ILX_ARRS_E°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°027°RLE°ILX_ARRS_F°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°019°RLE°ILX_ARRS_G°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°027°RLE°ILX_ARRS_H°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°FIN";"°LSE°PAG°019°RLE°ILX_ARRS_A°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°027°RLE°ILX_ARRS_B°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°019°RLE°ILX_ARRS_C°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°027°RLE°ILX_ARRS_D°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°PAG°019°RLE°ILX_ARRS_E°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°027°RLE°ILX_ARRS_F°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°019°RLE°ILX_ARRS_G°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°027°RLE°ILX_ARRS_H°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°FIN";"°LSE°PAG°019°RLE°ILX_ARRS_A°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°027°RLE°ILX_ARRS_B°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°019°RLE°ILX_ARRS_C°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°PAG°027°RLE°ILX_ARRS_D°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°PAG°019°RLE°ILX_ARRS_E°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°027°RLE°ILX_ARRS_F°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°019°RLE°ILX_ARRS_G°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°HLT°MUS°PAG°027°RLE°ILX_ARRS_H°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°MUS°HLT°FIN"; : PRINT "°LSE°PAG°022°RLE°ILX_CARR_A°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°030°RLE°ILX_CARR_B°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°022°RLE°ILX_CARR_C°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°027°RLE°ILX_CARR_D°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°022°RLE°ILX_CARR_E°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°030°RLE°ILX_CARR_F°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°022°RLE°ILX_CARR_G°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°030°RLE°ILX_CARR_H°PAG°029°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°017°RLE°ILX_TITULO°PAG°023°MUS°LDI°000°165°000°192°000°016°LDI°000°189°000°216°000°002°HLT°HLT°MUS°PAG°024°LDI°000°165°000°064°000°027°MUS°FIN";: LET F=CODE "I": GOTO _9930: LET F=CODE "J": LET J=K: GOTO _9940: LET J=R:  PRINT "°LSE°PAG°017°SND°LX_VOZC°LDI°LXMUSINC°LXMUSCNT°018°000°FIN";
140 FOR Y=K TO 800: PRINT "°LSE°MUS°LDI°000°000°000°000°128°015°FIN";: IF INKEY="" THEN NEXT Y: GOTO CODE "°100"
142 IF INKEY=" " THEN PRINT "°LSE°AYS°LX_SFX_FADEOUT°FIN";:GOTO CODE "°142"
150 POKE 23606,K: POKE 23607,CODE "°060": PRINT "°LSE°AYS°LX_SFX_TECLA°PAG°023°LDR°FIN"; : CLS
151 LOAD "LOXLEY": GOTO CODE "°151"
9900 PRINT "°LSE°PAG°023°FIN";: IF INKEY DIF "" THEN GOTO 9900
9905 POKE °LASTK, INT CODE INKEY: PRINT "°LSE°LDI°LX_VARZONE°VARS°002°000°FIN"; :  IF NOT PEEK LK  THEN GOTO 9901
9906 LET F=PEEK LK-CODE "1": RETURN
9911 PRINT "°LSE°PAG°023°LDI°LX_VARZONE°VARS°002°000°FIN";:FOR Y=K TO 418: IF INKEY DIF "" THEN PRINT "°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";: LET Y=4000
9915 PRINT "°LSE°LDI°LX_VARZONE°VARS°002°000°PAG°017°MUS°HLT°HLT°LDI°000°000°000°000°000°002°FIN";:  NEXT Y: RETURN
9930 LET N=K:LET J=L+L 
9940 PRINT "°LSE°PAG°022°FIN"; :POKE 9941|004,J:POKE 9941|7,F: PRINT "°LSE°LDI°LX_FNTLBW°CHARS°002°000°LDI°LX_PITEXTW°VARS°002°000°FIN"; 
9941 PRINT #CODE "A";A$;: PRINT "°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:RETURN 

DATA BLOCKS
-----------

LX_LANG     = 65535
SET_STACK   = #A400

**************************************************************************
 PAGINA CERO
**************************************************************************

$C000
           
DATOS DE LAS DIAPOSITIVAS
		   
MPAGE0_INI 
          
LX_LIONHEART   ARCHIVO "IARTE/LX_LIONHEART.DAT"
LX_LOXLEY_IN   ARCHIVO "IARTE/LX_LOXLEY_IN.DAT"
LX_NOTTINGHAM  ARCHIVO "IARTE/LX_NOTTINGHAM.DAT"
LX_TSCHOOL     ARCHIVO "IARTE/LX_TSCHOOL.DAT"
LX_MARIAN      ARCHIVO "IARTE/LX_MARIAN.DAT"
LX_LOXLEY_PREP ARCHIVO "IARTE/LX_LOXLEY_PREP.DAT"

MPAGE0_END 


**************************************************************************
 PAGINA UNO
**************************************************************************

$C000
           
MPAGE1_INI
LX_VOZC     = $-1
        ARCHIVO "../SOUND/LX_VOZ_8000PPA.BIN" < ARCHIVO DE VOZ LOXLEY

ILX_FARR_F   ARCHIVO "IARTE/ILX_FARR_6.DAT" 
ILX_FARR_G   ARCHIVO "IARTE/ILX_FARR_7.DAT" 
ILX_FARR_H   ARCHIVO "IARTE/ILX_FARR_8.DAT"            
ILX_TITULO         ARCHIVO "IARTE/ILX_TITULO.DAT"
ILX_TITULO_RUS     ARCHIVO "IARTE/ILX_TITULO_RUS.DAT"            
ILX_TITULO_RUSL    = $-ILX_TITULO_RUS

MPAGE1_END           

**************************************************************************
 PAGINA CINCO, DOS Y SIETE
**************************************************************************
            

MPAGE52_INI            
$5B00
LX_MUS_ON   BYTE   000
LXMUSCNT
LX_MUS_INI  WORD   SILENCIO_I
LX_MUS_REP  WORD   SILENCIO_R
LX_MUS_PUA  WORD   SIL_CHA
LX_MUS_PUB  WORD   SIL_CHA
LX_MUS_PUC  WORD   SIL_CHA
LX_TST_FLAG             
LX_MUS_TEM  BYTE   $FF
LX_MUS_CON  BYTE   $FF  
LX_MUS_CNA  BYTE   $00
LX_MUS_CNB  BYTE   $00
LX_MUS_CNC  BYTE   $00
LX_MUS_SAMA BYTE   $00
LX_MUS_SAMB BYTE   $00
LX_MUS_SAMC BYTE   $00
SPRDIMXYC   WORD   $0404
SPRDIMXYP   WORD   $0404
LX_VARZONE  WORD   VARS_MAIN
LX_FNTLBW   WORD   LX_FNTLB
LX_PITEXTW  WORD   LX_PITEXT1
LX_SLIDESW  WORD   LX_SLIDES
LX_UPAGVARS WORD   $C000
LX_PROG     WORD   BASICPRGINI
TABCHANS
            WORD $09F4
            WORD $10A8
            BYTE $4B  
           
            WORD $09F4
            WORD $15C4
            BYTE $53  

            WORD $0F81
            WORD $15C4
            BYTE $52  

            WORD $0C7D
            WORD $15C4
            BYTE $50  
            
            BYTE $80
            
23552
          
KSTATE      BYTE 000,000,000,000,000,000,000

CTRL_SIDE   BYTE 000

CTRL_READ
LASTK       BYTE 000                  
REPDEL      BYTE 035                  
REPPER      BYTE 005                  
DEFADD      WORD $0000                
KDATA       BYTE 000                  
TVDATA      WORD $0000                
STRMS       BYTE 001,000              
            BYTE 006,000
            BYTE 011,000
            BYTE 001,000
            BYTE 001,000
            BYTE 006,000
            BYTE 016,000
            BYTE 000,000
            BYTE 021,000
            BYTE 026,000
            BYTE 031,000
            BYTE 036,000
            BYTE 000,000
            BYTE 001,006
            BYTE 196,021
            BYTE 066,125
            BYTE 012,196
            BYTE 021,067
            BYTE 027,037
            
CHARS       WORD LX_FNTLB             
RASP        BYTE 000                  
PIP         BYTE 000                  
NEW_CHANSE

ERRNR       BYTE 255                  
FLAGS       BYTE %11000000            
TVFLAG      BYTE 001                  
ERRSP       WORD LX_ERRSP             
LISTSP      WORD 0000
MODE        BYTE 008                  
NEWPPC      WORD $0000                
NSPPC       BYTE $00                  
PPC         WORD $0000                
SUBPPC      BYTE 001                  
BORDCR      BYTE 007                  
EPPC        WORD $0000                

VARS        WORD VARS_MAIN
DEST        WORD $0000    
CHANS       WORD TABCHANS 
CURCHL      WORD TABCHANS 
PROG        WORD BASICPRGINI
NXTLIN      WORD BASICPRGINI
DATADD      WORD BASICPRGINI
ELINE       WORD ELINEHELP  
KCUR        WORD BASICPRGINI
CHADD       WORD BASICPRGINI
XPTR        WORD $0000      
WORKSP      WORD BASICPRGFIN
STKBOT      WORD BASICPRGFIN
STKEND      WORD BASICPRGFIN

BREG        BYTE 000        
MEM         WORD $0000      
FLAGS2      BYTE 025        
DFSZ        BYTE 002        
STOP        WORD $0000      
OLDPPC      WORD $0000      
OLDPPCH     = $-1
OSPPC       BYTE 000        
FLAGX       BYTE 000        
STRLEN      WORD $0000      
TADDR       WORD $0000      
SEED        WORD $0000      
FRAMES      BYTE 000,000,000
UDG         WORD $0000      
COORDS      BYTE 000,000    
PPOSN       BYTE 000        
PRCC        WORD $0000      
ECHOE       WORD $0000      
DFCC        WORD $0000      
DFCCL       WORD $0000      
SPOSN       BYTE 000
SPOSNH      BYTE 000
SPOSNL      BYTE 000,000
SCRCT       BYTE 255   
ATTRP       BYTE 007   
MASKP       BYTE 000   
ATTRT       BYTE 000   
MASKT       BYTE 000   
PFLAG       BYTE 000   
MEMBOT      ESPACIO BYTES 30   
NMIADD      WORD 0000  
RAMTOP      WORD SET_STACK-1
PRAMT       WORD $FFFF      
BASICPRGINI 

	< AQUI SE INSERTA EL PROGRAMA BASIC>
            
VARS_MAIN
VAR         =   $/256

VARL_F      = $+3            
            BYTE   "f",000,000,066,000,000 
VARL_N      = $+3            
            BYTE   "n",000,000,008,000,000 
            
            BYTE   "j",000,000,002,000,000 
            BYTE   "z",000,000,010,000,000 

            BYTE   'x'+$80                 
            BYTE    000,000,000,000,000    
            BYTE    000,000,000,000,000    
            BYTE    000,000,000,000,000    
            BYTE    000,000,000            
            
            BYTE   'y'+$80                 
            BYTE    000,000,000,000,000    
            BYTE    000,000,000,000,000    
            BYTE    000,000,000,000,000    
            BYTE    000,000,000            
            
            
            
TABSPRAEND  
LX_CERO     = $+1
            BYTE   "k",000,000,000,000,000 
            BYTE   "l",000,000,001,000,000 
            
            
            BYTE   'L'+$A0-64,'K'+$E0-64: WORD $0000,23560: BYTE 000 
            BYTE   'P'+$A0-64,'Z'+$E0-64: WORD $FF00,$D954: BYTE 000 

         
            BYTE   $80           
VARS_END 
ELINEHELP           
            ESPACIO BYTES 50
BASICPRGFIN   
            ESPACIO BYTES 50
ILX_CARR_A  ARCHIVO "IARTE/ILX_CARR_1.DAT"	<CAMARROW: CAMARA FLECHA HACIA ARBOL
            
ILX_CARR_B  ARCHIVO "IARTE/ILX_CARR_2.DAT" 

ILX_CARR_C  ARCHIVO "IARTE/ILX_CARR_3.DAT" 
LXMUSMEND
            WORD   HOOD_I
            WORD   HOOD_R
            WORD   LXM_CHA
            WORD   LXM_CHB
            WORD   LXM_CHC
            BYTE   $FC
            BYTE   $FC               
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
     
            WORD  HOOD_I,HOOD_R
HOOD_I
        WORD  LXM_CHA,LXM_CHB,LXM_CHC
HOOD_R
        WORD  LXM_RPA,LXM_RPB,LXM_RPC
        
LXM_CHA

LXM_RPA            
					 BYTE 96
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 134
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 96
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 134
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 96
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 92
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 130
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 88
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 82
			BYTE 75
			BYTE 106
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 106
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 106
			BYTE 75
			BYTE 126
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 90
			BYTE 75
			BYTE 114
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 114
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 114
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 114
			BYTE 75
			BYTE 94
			BYTE 75
			BYTE 118
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 114
			BYTE 75
			BYTE 118
			BYTE 75
			BYTE 1
			BYTE 253
			BYTE 86
			BYTE 75
			BYTE 075
			BYTE 96
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 92
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 130
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 88
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 82
			BYTE 75
			BYTE 106
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 106
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 106
			BYTE 75
			BYTE 126
			BYTE 75
			BYTE 112
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 116
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 90
			BYTE 75
			BYTE 114
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 114
			BYTE 75
			BYTE 94
			BYTE 75
			BYTE 118
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 110
			BYTE 75
			BYTE 96
			BYTE 75
			BYTE 130
			BYTE 75
			BYTE 126
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 128
			BYTE 75
			BYTE 1
			BYTE 253
			BYTE 86
			BYTE 75
			BYTE 075
			BYTE 72
			BYTE 75
			BYTE 116
			BYTE 72
			BYTE 75
			BYTE 114
			BYTE 72
			BYTE 75
			BYTE 110
			BYTE 72
			BYTE 75
			BYTE 106
			BYTE 72
			BYTE 75
			BYTE 96
			BYTE 92
			BYTE 88
			BYTE 75
			BYTE 88
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 82
			BYTE 75
			BYTE 82
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 62
			BYTE 68
			BYTE 72
			BYTE 75
			BYTE 116
			BYTE 72
			BYTE 75
			BYTE 114
			BYTE 72
			BYTE 75
			BYTE 110
			BYTE 72
			BYTE 75
			BYTE 106
			BYTE 72
			BYTE 75
			BYTE 96
			BYTE 92
			BYTE 88
			BYTE 75
			BYTE 88
			BYTE 75
			BYTE 92
			BYTE 75
			BYTE 92
			BYTE 75
			BYTE 96
			BYTE 75
			BYTE 96
			BYTE 75
			BYTE 96
			BYTE 75
			BYTE 62
			BYTE 68
			BYTE 72
			BYTE 75
			BYTE 116
			BYTE 72
			BYTE 75
			BYTE 114
			BYTE 72
			BYTE 75
			BYTE 110
			BYTE 72
			BYTE 75
			BYTE 106
			BYTE 72
			BYTE 75
			BYTE 96
			BYTE 92
			BYTE 88
			BYTE 75
			BYTE 88
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 82
			BYTE 75
			BYTE 82
			BYTE 75
			BYTE 86
			BYTE 75
			BYTE 62
			BYTE 68
			BYTE 72
			BYTE 75
			BYTE 116
			BYTE 72
			BYTE 75
			BYTE 114
			BYTE 72
			BYTE 75
			BYTE 110
			BYTE 72
			BYTE 75
			BYTE 106
			BYTE 72
			BYTE 75
			BYTE 96
			BYTE 92
			BYTE 88
			BYTE 75
			BYTE 88
			BYTE 75
			BYTE 92
			BYTE 75
			BYTE 92
			BYTE 75
			BYTE 1
			BYTE 248



			BYTE $FD

LXM_CHB
           
LXM_RPB
				 BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 1
		BYTE 253
		BYTE 82
		BYTE 75
		BYTE 075
		BYTE 94
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 96
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 134
		BYTE 75
		BYTE 134
		BYTE 75
		BYTE 134
		BYTE 75
		BYTE 134
		BYTE 75
		BYTE 1
		BYTE 253
		BYTE 82
		BYTE 75
		BYTE 075
		BYTE 94
		BYTE 86
		BYTE 75
		BYTE 126
		BYTE 86
		BYTE 75
		BYTE 124
		BYTE 86
		BYTE 75
		BYTE 120
		BYTE 86
		BYTE 75
		BYTE 116
		BYTE 86
		BYTE 75
		BYTE 110
		BYTE 106
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 114
		BYTE 75
		BYTE 114
		BYTE 75
		BYTE 118
		BYTE 75
		BYTE 76
		BYTE 82
		BYTE 86
		BYTE 75
		BYTE 126
		BYTE 86
		BYTE 75
		BYTE 124
		BYTE 86
		BYTE 75
		BYTE 120
		BYTE 86
		BYTE 75
		BYTE 116
		BYTE 86
		BYTE 75
		BYTE 110
		BYTE 106
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 110
		BYTE 75
		BYTE 76
		BYTE 82
		BYTE 86
		BYTE 75
		BYTE 126
		BYTE 86
		BYTE 75
		BYTE 124
		BYTE 86
		BYTE 75
		BYTE 120
		BYTE 86
		BYTE 75
		BYTE 116
		BYTE 86
		BYTE 75
		BYTE 110
		BYTE 106
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 100
		BYTE 75
		BYTE 114
		BYTE 75
		BYTE 114
		BYTE 75
		BYTE 118
		BYTE 75
		BYTE 76
		BYTE 82
		BYTE 86
		BYTE 75
		BYTE 126
		BYTE 86
		BYTE 75
		BYTE 124
		BYTE 86
		BYTE 75
		BYTE 120
		BYTE 86
		BYTE 75
		BYTE 116
		BYTE 86
		BYTE 75
		BYTE 110
		BYTE 106
		BYTE 102
		BYTE 75
		BYTE 102
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 106
		BYTE 75
		BYTE 1
		BYTE 248
LXM_CHC
LXM_RPC
					   BYTE 75
			BYTE 075
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 120
			BYTE 75
			BYTE 124
			BYTE 75
			BYTE 120
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 144
			BYTE 148
			BYTE 150
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 154
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 140
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 144
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 136
			BYTE 140
			BYTE 144
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 148
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 134
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 136
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 130
			BYTE 134
			BYTE 136
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 140
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 150
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 144
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 138
			BYTE 140
			BYTE 144
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 148
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 148
			BYTE 144
			BYTE 148
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 90
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 144
			BYTE 148
			BYTE 150
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 154
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 140
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 144
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 136
			BYTE 140
			BYTE 144
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 148
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 134
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 136
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 130
			BYTE 134
			BYTE 136
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 140
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 150
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 144
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 138
			BYTE 144
			BYTE 150
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 148
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 1
			BYTE 244
			BYTE 90
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 134
			BYTE 75
			BYTE 075
			BYTE 130
			BYTE 75
			BYTE 075
			BYTE 126
			BYTE 75
			BYTE 075
			BYTE 124
			BYTE 75
			BYTE 075
			BYTE 144
			BYTE 148
			BYTE 150
			BYTE 75
			BYTE 148
			BYTE 140
			BYTE 134
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 1
			BYTE 248
			BYTE 134
			BYTE 75
			BYTE 075
			BYTE 130
			BYTE 75
			BYTE 075
			BYTE 126
			BYTE 75
			BYTE 075
			BYTE 124
			BYTE 75
			BYTE 075
			BYTE 144
			BYTE 148
			BYTE 150
			BYTE 75
			BYTE 148
			BYTE 140
			BYTE 134
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 126
			BYTE 124
			BYTE 120
			BYTE 116
			BYTE 120
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 075
			BYTE 130
			BYTE 75
			BYTE 075
			BYTE 126
			BYTE 75
			BYTE 075
			BYTE 124
			BYTE 75
			BYTE 075
			BYTE 168
			BYTE 172
			BYTE 174
			BYTE 75
			BYTE 172
			BYTE 164
			BYTE 158
			BYTE 75
			BYTE 164
			BYTE 75
			BYTE 168
			BYTE 75
			BYTE 1
			BYTE 248
			BYTE 134
			BYTE 75
			BYTE 075
			BYTE 130
			BYTE 75
			BYTE 075
			BYTE 126
			BYTE 75
			BYTE 075
			BYTE 124
			BYTE 75
			BYTE 075
			BYTE 168
			BYTE 172
			BYTE 174
			BYTE 75
			BYTE 172
			BYTE 164
			BYTE 158
			BYTE 75
			BYTE 164
			BYTE 75
			BYTE 168
			BYTE 75
			BYTE 1
			BYTE 250

LXMUSINB
            WORD   HOOD_I2
            WORD   HOOD_R2
            WORD   LXM_CHA2
            WORD   LXM_CHB2
            WORD   LXM_CHC2
            BYTE   $FD
            BYTE   $FD               
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
     
            WORD  HOOD_I2,HOOD_R2
HOOD_I2
        WORD  LXM_CHA2,LXM_CHB2,LXM_CHC2
HOOD_R2
        WORD  LXM_RPC2,LXM_RPC2,LXM_RPC2
        
LXM_CHA2
			BYTE 120
			BYTE 75
			BYTE 1
			BYTE 249
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 112
			BYTE 75
			BYTE 1
			BYTE 249
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 82
			BYTE 75
			BYTE 1
			BYTE 249
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 98
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 82
			BYTE 75
			BYTE 075
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 75

LXM_RPA2
			BYTE 75
			BYTE $FD

LXM_CHB2
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 106
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 102
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 74
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 68
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 75
      
LXM_RPB2      
			BYTE 75

LXM_CHC2
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 116
			BYTE 75
			BYTE 1
			BYTE 249
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 108
			BYTE 75
			BYTE 1
			BYTE 249
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 78
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 88
			BYTE 75
			BYTE 075
			BYTE 148
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 148
			BYTE 92
			BYTE 75
			BYTE 1
			BYTE 249
LXM_RPC2
			BYTE 75

LXMUSINC
            WORD   HOOD_I3
            WORD   HOOD_R3
            WORD   LXM_CHA3
            WORD   LXM_CHB3
            WORD   LXM_CHC3
            BYTE   $FC
            BYTE   $FC   
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
     
            WORD  HOOD_I3,HOOD_R3
HOOD_I3
        WORD  LXM_CHA3,LXM_CHB3,LXM_CHC3
HOOD_R3
        WORD  LXM_RPA3,LXM_RPB3,LXM_RPC3
        
LXM_CHA3

LXM_RPA3            
BYTE 150
			BYTE 75
			BYTE 140
			BYTE 150
			BYTE 154
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 160
			BYTE 158
			BYTE 154
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 146
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 144
			BYTE 75
			BYTE 146
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 150
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 172
			BYTE 75
			BYTE 168
			BYTE 75
			BYTE 164
			BYTE 75
			BYTE 160
			BYTE 75
			BYTE 164
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 150
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 158
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 154
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 154
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 150
			BYTE 75
			BYTE 140
			BYTE 150
			BYTE 154
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 160
			BYTE 158
			BYTE 154
			BYTE 75
			BYTE 150
			BYTE 75
			BYTE 146
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 144
			BYTE 75
			BYTE 146
			BYTE 75
			BYTE 140
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 150
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 172
			BYTE 75
			BYTE 168
			BYTE 75
			BYTE 164
			BYTE 75
			BYTE 160
			BYTE 75
			BYTE 164
			BYTE 75
			BYTE 168
			BYTE 172
			BYTE 174
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 128
			BYTE 75
			BYTE 1
			BYTE 242
			BYTE 124
			BYTE 75
			BYTE 1
			BYTE 242
			BYTE 120
			BYTE 75
			BYTE 1
			BYTE 242
			BYTE 116
			BYTE 75
			BYTE 1
			BYTE 246
			BYTE 138
			BYTE 75
			BYTE 1
			BYTE 194
			BYTE $FD

LXM_CHB3
           
LXM_RPB3
			BYTE 78
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 78
			BYTE 075
			BYTE 075
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 78
			BYTE 075
			BYTE 075
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 78
			BYTE 075
			BYTE 075
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 82
			BYTE 86
			BYTE 88
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 88
			BYTE 75
			BYTE 88
			BYTE 075
			BYTE 86
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 96
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 74
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 74
			BYTE 75
			BYTE 74
			BYTE 075
			BYTE 92
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 92
			BYTE 75
			BYTE 92
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 78
			BYTE 075
			BYTE 075
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 78
			BYTE 075
			BYTE 075
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 78
			BYTE 075
			BYTE 075
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 78
			BYTE 75
			BYTE 82
			BYTE 86
			BYTE 88
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 88
			BYTE 75
			BYTE 88
			BYTE 075
			BYTE 86
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 84
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 110
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 120
			BYTE 75
			BYTE 1
			BYTE 248
			BYTE 106
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 116
			BYTE 75
			BYTE 1
			BYTE 248
			BYTE 102
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 112
			BYTE 75
			BYTE 1
			BYTE 248
			BYTE 98
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 108
			BYTE 75
			BYTE 1
			BYTE 248
			BYTE 82
			BYTE 75
			BYTE 1
			BYTE 194

LXM_CHC3
          
LXM_RPC3
			BYTE 134
			BYTE 75
			BYTE 126
			BYTE 134
			BYTE 136
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 130
			BYTE 134
			BYTE 136
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 136
			BYTE 75
			BYTE 134
			BYTE 130
			BYTE 136
			BYTE 75
			BYTE 130
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 164
			BYTE 75
			BYTE 160
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 154
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 144
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 130
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 136
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 148
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 134
			BYTE 75
			BYTE 126
			BYTE 134
			BYTE 136
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 130
			BYTE 134
			BYTE 136
			BYTE 75
			BYTE 144
			BYTE 75
			BYTE 136
			BYTE 75
			BYTE 134
			BYTE 130
			BYTE 136
			BYTE 75
			BYTE 130
			BYTE 75
			BYTE 134
			BYTE 75
			BYTE 1
			BYTE 250
			BYTE 164
			BYTE 75
			BYTE 160
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 154
			BYTE 75
			BYTE 158
			BYTE 75
			BYTE 075
			BYTE 075
			BYTE 164
			BYTE 75
			BYTE 1
			BYTE 252
			BYTE 114
			BYTE 75
			BYTE 1
			BYTE 242
			BYTE 110
			BYTE 75
			BYTE 1
			BYTE 242
			BYTE 106
			BYTE 75
			BYTE 1
			BYTE 242
			BYTE 102
			BYTE 75
			BYTE 1
			BYTE 244
			BYTE 168
			BYTE 75
			BYTE 1
			BYTE 194


LXMUSSILD  
            WORD   SILENCIO_I
            WORD   SILENCIO_R
            WORD   SIL_CHA
            WORD   SIL_CHA
            WORD   SIL_CHA
            BYTE   $FE
            BYTE   $FE         
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00
            BYTE   $00

SILENCIO_I
            WORD   SIL_CHA,SIL_CHA,SIL_CHA
SILENCIO_R
            WORD   SIL_CHA,SIL_CHA,SIL_CHA
SIL_CHA
			BYTE   075
            BYTE   $FD          
            
LX_SLIDES  
LXT_SLA      
            BYTE   "A"
            WORD   LXT_SL2-($+2)
            BYTE   LSE
            BYTE   MUS
            BYTE   PAG,%00011000
            BYTE   RLE
            WORD   LX_LIONHEART
            BYTE   PAG,%00011101
            BYTE   LDI
            WORD   WORKSCR,$4000,6912
            BYTE   FIN
LXT_SL2 
LXT_SLB
            BYTE   "B"
            WORD   LXT_SL3-($+2)
            BYTE   LSE
            BYTE   MUS
            BYTE   PAG,%00011000
            BYTE   RLE
            WORD   LX_LOXLEY_IN
            BYTE   MUS
            BYTE   PAG,%00011101
            BYTE   LDI
            WORD   WORKSCR+$0000,$4000,$0800
            BYTE   LDI
            WORD   WORKSCR+$0800,$4800,$0800
            BYTE   LDI
            WORD   WORKSCR+$1000,$5000,$0800
            BYTE   LDI
            WORD   WORKSCR+$1800,$5800,$0300
            BYTE   FIN
LXT_SL3
LXT_SLC     
            BYTE   "C"
            WORD   LXT_SL4-($+2)   
            BYTE   LSE
            BYTE   MUS
            BYTE   PAG,%00011000
            BYTE   RLE
            WORD   LX_NOTTINGHAM
            BYTE   MUS
            BYTE   PAG,%00011101
            BYTE   LDI
            WORD   WORKSCR+$0000,$4000,$0800
            BYTE   LDI
            WORD   WORKSCR+$0800,$4800,$0800
            BYTE   LDI
            WORD   WORKSCR+$1000,$5000,$0800
            BYTE   LDI
            WORD   WORKSCR+$1800,$5800,$0300
            BYTE   FIN
LXT_SL4
LXT_SLD   
            BYTE   "D"
            WORD   LXT_SL5-($+2)
            BYTE   LSE
            BYTE   MUS
            BYTE   PAG,%00011000
            BYTE   RLE
            WORD   LX_TSCHOOL
            BYTE   MUS
            BYTE   PAG,%00011101
            BYTE   LDI
            WORD   WORKSCR+$0000,$4000,$0800
            BYTE   LDI
            WORD   WORKSCR+$0800,$4800,$0800
            BYTE   LDI
            WORD   WORKSCR+$1000,$5000,$0800
            BYTE   LDI
            WORD   WORKSCR+$1800,$5800,$0300
            BYTE   FIN
LXT_SL5
LXT_SLE     
            BYTE   "E"
            WORD   LXT_SL6-($+2)
            BYTE   LSE
            BYTE   MUS
            BYTE   PAG,%00011000
            BYTE   RLE
            WORD   LX_MARIAN
            BYTE   MUS
            BYTE   PAG,%00011101
            BYTE   LDI
            WORD   WORKSCR+$0000,$4000,$0800
            BYTE   LDI
            WORD   WORKSCR+$0800,$4800,$0800
            BYTE   LDI
            WORD   WORKSCR+$1000,$5000,$0800
            BYTE   LDI
            WORD   WORKSCR+$1800,$5800,$0300
            BYTE   FIN
          
LXT_SL6
LXT_SLF 
            BYTE   "F"
            WORD   LXT_SL7-($+2)
            BYTE   LSE
            BYTE   MUS
            BYTE   PAG,%00011000
            BYTE   RLE
            WORD   LX_LOXLEY_PREP
            BYTE   MUS
            BYTE   PAG,%00011101
            BYTE   LDI
            WORD   WORKSCR+$0000,$4000,$0800
            BYTE   LDI
            WORD   WORKSCR+$0800,$4800,$0800
            BYTE   LDI
            WORD   WORKSCR+$1000,$5000,$0800
            BYTE   LDI
            WORD   WORKSCR+$1800,$5800,$0300
            BYTE   FIN
LXT_SL7 

LX_PITEXT1
LXT_ES1
            BYTE   "A"
            WORD   LXT_ES2-($+2)
            BYTE   022,010,002
            BYTE   "1 - ENGLISH"
            BYTE   022,012,002
            BYTE   "2 - ESPA;OL"
            BYTE   022,014,002
            BYTE   "3 - knllecd"
            BYTE   022,019,001
            BYTE   016,001
            BYTE   "V1.0.",__DATE__ 
     
 # = ¡
 ) = ¿
 & = Á
 ( = É
 < = Í
 = = Ó
 > = Ú
 ; = Ñ                            
LXT_ES2
            BYTE   "B"
            WORD   LXT_ES3-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   "HACE 830 A;OS, RICARDO 'CORAZ=N"
            BYTE   "  DE LE=N', REY DE INGLATERRA,",006
            BYTE   "ACUDI= A LA TERCERA CRUZADA PARA"
            BYTE   "   RECUPERAR LA TIERRA SANTA.",006
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN

LXT_ES3
            BYTE   "C"
            WORD   LXT_ES4-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN 
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS,FIN
            BYTE   " UNO DE LOS J=VENES NOBLES QUE",006
            BYTE   "  ACUDIERON, ROBIN DE LOXLEY,",006
            BYTE   LSE,MUS,FIN
            BYTE   "  SOBREVIVI= Y REGRES= A CASA.",006
            BYTE   006,006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS 
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002
            BYTE   FIN
LXT_ES4
            BYTE   "D"
            WORD   LXT_ES5-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   "ENCONTR= A SU PADRE ASESINADO Y"
            BYTE   LSE,MUS,FIN
            BYTE   " SUS TIERRAS CONFISCADAS POR EL "
            BYTE   " MALVADO SHERIFF DE NOTTINGHAM, "
            BYTE   LSE,MUS,FIN
            BYTE   " QUE APROVECH= LA AUSENCIA DEL "
            BYTE   023,005,005,"REY PARA GANAR PODER.", 006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS  
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN

LXT_ES5
            BYTE   "E"
            WORD   LXT_ES6-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   006,006
            BYTE   "  ROBIN ENTENDI= QUE LA >NICA",006
            BYTE   LSE,MUS,FIN
            BYTE   "  FORMA DE ENFRENTAR AL TIRANO",006
            BYTE   "ERA INFRINGIR LA LEY, POR LO QUE"
            BYTE   LSE,MUS,FIN
            BYTE   "  FUND= LA ESCUELA DE LADRONES",006
            BYTE   "  PARA ENTRENAR FORAJIDOS DEL",006
            BYTE   LSE,MUS,FIN
            BYTE   "BOSQUE DE SHERWOOD EN CONTRA DE"
            BYTE   023,011,011,"NOTTINGHAM.",006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_ES6
            BYTE   "F"
            WORD   LXT_ES7-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS,FIN
            BYTE   " CUANDO EL SHERIFF SE ENTER= DE "
            BYTE   "  ESTOS PLANES, SE ENFURECI= Y",006
            BYTE   LSE,MUS,FIN
            BYTE   "SECUESTR= A MARIAN, EL GRAN AMOR"
            BYTE   023,012,012,"DE ROBIN.",006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
            
            
            
            
LXT_ES7
            BYTE   "G"
            WORD   LXT_ES8-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   006,006
            BYTE   " EL SHERIFF PRETENDE DESPOSARLA "
            BYTE   LSE,MUS,FIN
            BYTE   "PRONTO, POR LO QUE ROBIN DEBER& "
            BYTE   " PREPARARSE E INFILTRARSE EN EL "
            BYTE   LSE,MUS,FIN
            BYTE   "  CASTILLO DE NOTTINGHAM PARA",006
            BYTE   "RESCATARLA Y COMBATIR CONTRA EL "
            BYTE   LSE,MUS,FIN
            BYTE   " SHERIFF Y AS< VENGAR LA MUERTE "
            BYTE   023,010,010,"DE SU PADRE.",006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
            
LXT_ES8
            BYTE   "H"
            WORD   LXT_ES9-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
            BYTE   022,016,000
            BYTE   016,000,017,000,019,000
            BYTE   " "
            BYTE   LSE,LDI,000,090,001,090,255,000
            BYTE   LDI,000,064,000,165,000,027
            BYTE   PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
LXT_ES9     
            BYTE   "I"
            WORD   LXT_ES10-($+2)
            BYTE   022,001,004
            BYTE   "WORLD XXI SOFT PRESENTA"
            BYTE   022,016,005
            BYTE   "UN JUEGO DE ARIEL RUIZ"
            BYTE   022,017,002
            BYTE   "CON M>SICA DE RICHARD ARMIJO"
            BYTE   022,018,000
            BYTE   "TEXTOS EN RUSO: MIKHAIL SUDAKOV"
            BYTE   022,019,004
            BYTE   "Y MARIA KRASHENINNIKOVA"
            
LXT_ES10    
            BYTE   "J"
            WORD   LXT_ES11-($+2)
            
            BYTE   022,000,006
            BYTE   "PULSA UNA TECLA PARA"
            BYTE   022,001,008
            BYTE   "CARGAR EL JUEGO"
            

LXT_ES11


		STACKS LLAMADAS A ROM

MSTACKSINI           
            WORD   0000
LX_ERRSP
            WORD   $1C46 
            WORD   $096E 
            WORD   ERRNR
            
            WORD   $0C51 
            
            WORD   $0CF6 
            WORD   $00D2 
            WORD   $1986 
            WORD   $10A6 
            WORD   LX_K_SPRT 
            WORD   $102E 
          
            
            WORD   $0CF6
            WORD   $00C7
            WORD   $1986
            WORD   $10A6
            WORD   LX_9_CBUCLE
            WORD   $102E
            
            
            WORD   $0CF6
            WORD   $00C9
            WORD   $1986
            WORD   $10A6
            WORD   LX_B_GOSUB
            WORD   $102E
            
            
            WORD   $0CF6
            WORD   $00C5
            WORD   $1986
            WORD   $10A6
            WORD   LX_7_RETURN
            WORD   $102E
     
            
            WORD   $0CF6
            WORD   $00D3
            WORD   $1986
            WORD   $10A6
            WORD   LX_L_ANTIBREAK
            WORD   $102E

            
            WORD   $102F

 
            
LX_K_SPRT   
            WORD   $15FF,$168D,$2BEF,$168D,$0F8D,$15FF
            WORD   $10A6,LX_K_SPRT2,$102F
            
LX_K_SPRTBUK1            
            WORD   $15FF,$0F8C,$0BD0,$15FF
LX_K_SPRT2            
            WORD   $0F9C,$007B
            
            WORD   $10A6,LX_K_TABLAJP-256
            
            WORD   $340A
            WORD   $340D
            
            WORD   $2AF0
            WORD   $168D
            
            WORD   $102F
            
LX_K_TABLAJP
            WORD   ILX_HALT
            WORD   0000
            WORD   LX_SCRLE
            WORD   0000
            WORD   LX_CHRABS
            WORD   0000
            WORD   LX_ATREL
            WORD   LX_SPAG
            WORD   LX_SPEXIT
            WORD   0000
            WORD   0000
            WORD   0000
            WORD   LX_LDIR
            WORD   0000
            WORD   0000
            WORD   0000
            WORD   LX_LOADER
            WORD   LX_SOUND
            WORD   LX_MUSIC
            WORD   LX_AYSOUND
               
            
            
LSE         =  $14
HLT         =  $80
SPR         =  $81
RLE         =  $82
CLD         =  $83
DIR         =  $84
DXY         =  $85
LOC         =  $86
PAG         =  $87
FIN         =  $88
ESC         =  $89
FLE         =  $8A 
SPO         =  $8B
LDI         =  $8C
SPD         =  $8D
CLE         =  $8E
GAB         =  $8F
LDR         =  $90
SND         =  $91
MUS         =  $92         
AYS         =  $93    
 
            
            
LX_SPEXIT            
            WORD   $15FF,$0F8C,$15FF
            WORD   $10A6, SET_STACK-16
            WORD   $102F
            
            
LX_SOUND    
            WORD   $1A45,LISTSP,LX_SNBYTEUK
            WORD   $1118                   
            
            WORD   $0F9C              
            WORD   $0BD1              
            WORD   $2AF0              
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0
             
            WORD   $0AF0              
              
            WORD   $0554              
            WORD   $0707
            WORD   $0CF6,AYCTRL       
            WORD   $1E7D              
            WORD   $15FF              
            WORD   $0554              
            WORD   $FFFF
            WORD   $0CF6,AYDATA       
            WORD   $1E7D              
            
            WORD   $10A6,LX_SNBYTEUK,$102F
LX_SND_EXIT
            WORD   $15FF              
            WORD   $0B15              
            WORD   $15FF              
            WORD   $10A6,LX_K_SPRTBUK1,$102F

AYCTRL      = $FFFD
AYDATA      = $BFFD

LX_MUSIC
           
LX_MUS_CNT           
            
            WORD   $1E92,$0808  
            WORD   $0CF6,AYCTRL 
            WORD   $1E7D        
            
            WORD   $10A6,LX_MUS_SAMA
            WORD   $007B            
            WORD   $370A            
            
            WORD   $10A6              
            WORD   LX_MUS_SAMBX       
            WORD   $102E              
            
            WORD   $10A6,LX_MUS_SAMA  
            WORD   $2994              
            WORD   $370A              
            
            WORD   $1F5E              
            WORD   $0CF6,AYDATA       
            WORD   $1E7D              
            
            
LX_MUS_SAMBX            
            WORD   $1E92,$0909        
            WORD   $0CF6,AYCTRL       
            WORD   $1E7D              
            
            WORD   $10A6,LX_MUS_SAMB  
            WORD   $007B              
            WORD   $370A              
            
            WORD   $10A6             
            WORD   LX_MUS_SAMCX      
            WORD   $102E             
            
            WORD   $10A6,LX_MUS_SAMB 
            WORD   $2994             
            WORD   $370A             
            
             WORD   $1F5E            
            
            WORD   $0CF6,AYDATA      
            WORD   $1E7D             
            
            
LX_MUS_SAMCX           
            
            WORD   $1E92,$0A0A       
            WORD   $0CF6,AYCTRL      
            WORD   $1E7D             
            
            WORD   $10A6,LX_MUS_SAMC 
            WORD   $007B             
            WORD   $370A             
            
            WORD   $10A6          
            WORD   LX_MUS_SAMXIT  
            WORD   $102E          
            
            WORD   $10A6,LX_MUS_SAMC
            WORD   $2994            
            WORD   $370A            
            
             WORD   $1F5E           
            
            WORD   $0CF6,AYDATA     
            WORD   $1E7D            

LX_MUS_SAMXIT         
      
            WORD   $10A6,LX_MUS_CON
            WORD   $007B           
            WORD   $2994           
            WORD   $0D69           
            
            WORD   $10A6           
            WORD   LX_MUS_TEMPO    
            WORD   $102E           
            
            WORD   $10A6,LX_MUS_EXIT,$102F
            
LX_MUS_TEMPO
            WORD   $10A6,LX_MUS_TEM 
            WORD   $007B            
            WORD   $16AE            
            WORD   $0D69            
            
            WORD   $10A6,LX_MUS_CNA 
            WORD   $007B            
            WORD   $1996            
            WORD   $10A6            
            WORD   LX_MUS_NORUNA    
            WORD   $102E            
            
            WORD   $10A6,LX_MUS_RUNAX,$102F

LX_MUS_NORUNA_CONT            
LX_MUS_NORUNA       

    
            WORD   $1E92,$0808        
            WORD   $0CF6,AYCTRL       
            WORD   $1E7D              
            
            WORD   $10A6,LX_MUS_PUA   
            WORD   $2AF0              
            WORD   $168D              
            WORD   $007B              
            WORD   $168D              
             
            WORD   $1986          
            WORD   $10A6          
            WORD   LX_MUS_LOOP    
            WORD   $102E          
             
            WORD   $05E0      
            
            WORD   $10A6      
            WORD   LX_MUS_RUNA
            WORD   $102E      
            
            WORD   $1996     
            
            WORD   $10A6         
            WORD   LX_MUS_RLA    
            WORD   $102E         
            
            WORD   $21DE         
            
            WORD   $10A6         
            WORD   LX_MUS_SOSTA  
            WORD   $102E         
            
            WORD   $1E92,$0F0F   
            
            
            WORD   $0CF6,AYDATA  
            WORD   $1E7D         
            
            WORD   $168D         
            WORD   $096E,TANOTA  
            
            WORD   $169C         
            WORD   $16AE         
            WORD   $3447         
           
            WORD   $1E92,$0000    
            WORD   $0CF6,AYCTRL   
            WORD   $1E7D          
            WORD   $0CF6,AYDATA   
            WORD   $007B          
            WORD   $1E7D          
            
            WORD   $1E92,$0101    
            WORD   $0CF6,AYCTRL   
            WORD   $1E7D          
            WORD   $0CF6,AYDATA   
            WORD   $18BE          
            WORD   $1E7D          
            
            WORD   $2FDA
            WORD   $1F00
            WORD   LX_MUS_SAMA
            WORD   $0D69
            
            
LX_MUS_RLA_RET
LX_MUS_RUNA_RET 
             
            WORD   $10A6,LX_MUS_PUA  
            WORD   $1118             
            
LX_MUS_RUNAX_RET            
            WORD   $10A6,LX_MUS_CNB  
            WORD   $007B             
            WORD   $1996             
            WORD   $10A6             
            WORD   LX_MUS_NORUNB     
            WORD   $102E             
            
            WORD   $10A6,LX_MUS_RUNBX,$102F

LX_MUS_NORUNB_CONT            
LX_MUS_NORUNB       

            WORD   $1E92,$0909      
            WORD   $0CF6,AYCTRL     
            WORD   $1E7D            
                       
            WORD   $10A6,LX_MUS_PUB 
            WORD   $2AF0            
            WORD   $168D            
            WORD   $007B            
            WORD   $168D            
            
            WORD   $05E0     
            
            WORD   $10A6     
            WORD   LX_MUS_RUNB
            WORD   $102E      
            
            WORD   $1996     
            
            WORD   $10A6     
            WORD   LX_MUS_RLB
            WORD   $102E     
            
            WORD   $21DE     
            
            WORD   $10A6        
            WORD   LX_MUS_SOSTB 
            WORD   $102E        
           
            WORD   $1E92,$0F0F  
            
            
            WORD   $0CF6,AYDATA 
            WORD   $1E7D        
            
            
            WORD   $168D        
            WORD   $096E,TANOTA 
            
            WORD   $169C        
            WORD   $16AE        
            WORD   $3447        

    
            WORD   $1E92,$0202  
            WORD   $0CF6,AYCTRL 
            WORD   $1E7D        
            WORD   $0CF6,AYDATA 
            WORD   $007B        
            WORD   $1E7D        
            
            WORD   $1E92,$0303  
            WORD   $0CF6,AYCTRL 
            WORD   $1E7D        
            WORD   $0CF6,AYDATA 
            WORD   $18BE        
            WORD   $1E7D        
            
            WORD   $2FDA
            WORD   $1F00
            WORD   LX_MUS_SAMB
            WORD   $0D69
LX_MUS_RLB_RET
LX_MUS_RUNB_RET  
             
            WORD   $10A6,LX_MUS_PUB 
            WORD   $1118            

LX_MUS_RUNBX_RET          

            WORD   $10A6,LX_MUS_CNC  
            WORD   $007B             
            WORD   $1996             
            WORD   $10A6             
            WORD   LX_MUS_NORUNC     
            WORD   $102E             
            
            WORD   $10A6,LX_MUS_RUNCX,$102F

LX_MUS_NORUNC_CONT            
LX_MUS_NORUNC       

            WORD   $1E92,$0A0A      
            WORD   $0CF6,AYCTRL     
            WORD   $1E7D            
            
            
            WORD   $10A6,LX_MUS_PUC 
            WORD   $2AF0            
            WORD   $168D            
            WORD   $007B            
            WORD   $168D            
            
                
            WORD   $05E0         
            
            WORD   $10A6         
            WORD   LX_MUS_RUNC   
            WORD   $102E         
            
            
            WORD   $1996         
            
            WORD   $10A6         
            WORD   LX_MUS_RLC    
            WORD   $102E         
            
            WORD   $21DE         
            
            WORD   $10A6         
            WORD   LX_MUS_SOSTC  
            WORD   $102E         
            
            WORD   $1E92,$0F0F   
            
            
            WORD   $0CF6,AYDATA  
            WORD   $1E7D         
            
            
            WORD   $168D         
            WORD   $096E,TANOTA  
            
            WORD   $169C         
            WORD   $16AE         
            WORD   $3447         
            
            
            
            WORD   $1E92,$0404   
            WORD   $0CF6,AYCTRL  
            WORD   $1E7D         
            WORD   $0CF6,AYDATA  
            WORD   $007B         
            WORD   $1E7D         
            
            WORD   $1E92,$0505   
            WORD   $0CF6,AYCTRL  
            WORD   $1E7D         
            WORD   $0CF6,AYDATA  
            WORD   $18BE         
            WORD   $1E7D         
            
            WORD   $2FDA
            WORD   $1F00
            WORD   LX_MUS_SAMC
            WORD   $0D69
LX_MUS_RLC_RET           
LX_MUS_RUNC_RET

            WORD   $10A6,LX_MUS_PUC  
            WORD   $1118             

LX_MUS_RUNCX_RET            
            
            WORD   $1E92,$0707       
            WORD   $0CF6,AYCTRL      
            WORD   $1E7D             
            WORD   $0CF6,AYDATA      
            WORD   $1E92,%1111100011111000 
            WORD   $1E7D             

            WORD   $10A6,LX_MUS_EXIT,$102F

LX_MUS_LOOP 
           
            WORD   $10A6,LX_MUS_REP       
            WORD   $2AF0                  
            WORD   $168D                  
            WORD   $096E                  
            WORD   LX_MUS_PUA  
            WORD   $0CF6,$0006            
            WORD   $33C3                  
           
            WORD   $10A6,LX_MUS_CNT,$102F   


LX_MUS_RLA

            WORD   $2FDA
            WORD   $0000
            WORD   LX_MUS_SAMA
            WORD   $0D69
            WORD   $0CF6,AYDATA  
            WORD   $1E7D         
LX_MUS_SOSTA
            WORD   $0F8C
            WORD   $10A6,LX_MUS_RLA_RET,$102F

LX_MUS_RLB
            WORD   $2FDA
            WORD   $0000
            WORD   LX_MUS_SAMB
            WORD   $0D69
            
            WORD   $0CF6,AYDATA   
            WORD   $1E7D          
LX_MUS_SOSTB            
            WORD   $0F8C
            WORD   $10A6,LX_MUS_RLB_RET,$102F
LX_MUS_RLC

            WORD   $2FDA
            WORD   $0000
            WORD   LX_MUS_SAMC
            WORD   $0D69
            
            WORD   $0CF6,AYDATA  
            WORD   $1E7D         
LX_MUS_SOSTC           
            WORD   $0F8C
            WORD   $10A6,LX_MUS_RLC_RET,$102F
            
LX_MUS_RUNA           
            
            WORD   $16AD           
            WORD   $007B           
            WORD   $16AE           
            WORD   $3439           
            WORD   LX_MUS_CNA          
            WORD   $0D69           
            
            WORD   $10A6,LX_MUS_RUNA_RET,$102F
            
            
LX_MUS_RUNAX       
           
            WORD   $10A6,LX_MUS_CNA  
            WORD   $007B             
            WORD   $2994             
            WORD   $0D69             

            WORD   $10A6             
            WORD   LX_MUS_NORUNA_CONT
            WORD   $102E             

            WORD   $10A6,LX_MUS_RUNAX_RET,$102F
            
    

LX_MUS_RUNB           
            
            WORD   $16AD            
            WORD   $007B            
            WORD   $16AE            
            WORD   $3439            
            WORD   LX_MUS_CNB          
            WORD   $0D69            
            
            WORD   $10A6,LX_MUS_RUNB_RET,$102F
            
            
LX_MUS_RUNBX       
            
            WORD   $10A6,LX_MUS_CNB  
            WORD   $007B             
            WORD   $2994             
            WORD   $0D69             

            WORD   $10A6             
            WORD   LX_MUS_NORUNB_CONT
            WORD   $102E             

            

            WORD   $10A6,LX_MUS_RUNBX_RET,$102F
            

LX_MUS_RUNC           
            
            WORD   $16AD              
            WORD   $007B              
            WORD   $16AE              
            WORD   $3439              
            WORD   LX_MUS_CNC          
            WORD   $0D69              
            
            WORD   $10A6,LX_MUS_RUNC_RET,$102F
            
            
LX_MUS_RUNCX       
            
            WORD   $10A6,LX_MUS_CNC  
            WORD   $007B             
            WORD   $2994             
            WORD   $0D69             

            WORD   $10A6             
            WORD   LX_MUS_NORUNC_CONT
            WORD   $102E             

            WORD   $10A6,LX_MUS_RUNCX_RET,$102F

LX_MUS_EXIT

            WORD   $10A6
LX_MUS_RETW WORD   LX_K_SPRTBUK1,$102F

LX_AYSOUND  
            WORD   $0F9C             
            WORD   $2AEF             
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF
            
LX_AYSOUND_BUK
            WORD   $168D 
            WORD   $21DC 
            
            WORD   $3439   
            
            
            WORD   LX_K_SPRTBUK1  
            WORD   $102E          
            
            WORD   $0CF6,AYCTRL   
            WORD   $1E7D          
            WORD   $168D          
            WORD   $18BE          
            WORD   $168D          
            WORD   $0CF6,AYDATA   
            WORD   $1E7D          
            
            WORD   $10A6,LX_AYSOUND_BUK,$102F

LX_SFX_TECLA = $-1
            BYTE   002,040
            BYTE   003,000
            BYTE   011,000
            BYTE   012,025
            BYTE   007,%11111101
            BYTE   009,031
            BYTE   013,000
            BYTE   $4B

LX_SFX_FADEOUT = $-1
            BYTE   011,000
            BYTE   012,015
            BYTE   007,%11111111
            BYTE   013,000
            BYTE   $4B
            
LX_SNBYTEUK   
            WORD   $168D              
            WORD   $21DC              
            WORD   $3439              

            WORD   LX_SND_RLE        
            WORD   $102E             
            
            WORD   $168D       
            WORD   $15FF       
            WORD   $0554       
            WORD   $0800
            WORD   $1E7D       
            WORD   $15FF       
            WORD   $0554       
            WORD   $F000
            WORD   $0C84       
            WORD   $1F5E       
            WORD   $1F5E       
            WORD   $1F5E       
            WORD   $1F5E       
            WORD   $1E7D       
            WORD   $0380       
            
            WORD   $15FF    
            WORD   $0554    
            WORD   $0900
            WORD   $1E7D    
            WORD   $15FF    
            WORD   $0380    
            WORD   $1E7D    
            WORD   $0380    
            
            WORD   $15FF     
            WORD   $0554     
            WORD   $0A00
            WORD   $1E7D     
            WORD   $15FF     
            WORD   $0380     
            WORD   $1E7D     
            
            WORD   $15FF   
            WORD   $0554   
            WORD   $0800
            WORD   $1E7D   
            WORD   $15FF   
            WORD   $0554   
            WORD   $0F00
            WORD   $0C84   
            WORD   $1E7D   
            WORD   $0380   
            
            WORD   $15FF    
            WORD   $0554    
            WORD   $0900
            WORD   $1E7D    
            WORD   $15FF    
            WORD   $0380    
            WORD   $1E7D    
            WORD   $0380    
            
            WORD   $15FF   
            WORD   $0554   
            WORD   $0A00
            WORD   $1E7D   
            WORD   $15FF   
            WORD   $0380   
            WORD   $1E7D   
            
            WORD   $3439            
            WORD   LX_SNBYTEUK,$102F

            
LX_SND_RLE
            
            WORD   $168D       
            WORD   $18BE       
            WORD   $168D       

            WORD   $1996     
            WORD   $10A6
LX_SND_RETD WORD   LX_SND_EXIT,$102E  

LX_SND_RLEB
            WORD   $2994              

            WORD   $10A6              
            WORD   LX_SNBYTEUK        
            WORD   $102E              
        
        
            WORD   $0308,$0308
            WORD   $0308,$0308
            WORD   $0308,$0308
            WORD   $0308,$0308
            WORD   $0308,$0308
             
            WORD   $10A6,LX_SND_RLEB,$102F


LX_SPAG     
            WORD   $15FF,$0F8C,$0BD0,$15FF
            WORD   $0F9C,$007B
            WORD   $0CF6,$7FFD
            WORD   $1E7D
            WORD   $10A6,LX_K_SPRTBUK1,$102F

LX_CHRABS
            WORD   $0F9C
            WORD   $0BD1
            WORD   $096E, CHARS
            WORD   $16F9
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF
            WORD   $10A6,LX_K_SPRTBUK1,$102F
            
LX_ATREL      
            WORD   $0F9C 
            WORD   $2AEF 
            WORD   $0B09 
            WORD   $168D 
            WORD   $340D 
            WORD   $0E98 
            WORD   $0E9B 
            WORD   $0DF4 
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF
            WORD   $10A6,LX_K_SPRTBUK1,$102F
            
LX_B_GOSUB

            WORD   $10A6  
            WORD   STRLEN
            WORD   $1731  
          
            WORD   $1A45 
            WORD   23618
            WORD   00000
            WORD   $16FD 
            WORD   $1E76 
            
            WORD   $1A45 
            WORD   23621
            WORD   23625
            WORD   $16F9 
            
            WORD   $10A6 
            WORD   23623
            WORD   $007B 
            WORD   $2994 
            WORD   $10A6 
            WORD   23608
            WORD   $0D69 
    
            WORD   $10A6 
            WORD   SET_STACK-6
            WORD   $102F

LX_9_CBUCLE
         
            WORD   $1A45 
            WORD   ROM_CEROS
            WORD   23618 
            WORD   $16F9 

            WORD   $3000 
            WORD   $1E76 

            WORD   $10A6
            WORD   SET_STACK-6; 
            WORD   $102F
          
LX_7_RETURN          
            WORD   $1A45
            WORD   23625
            WORD   23618
            WORD   $16F9
            
            WORD   $1A45
            WORD   23608
            WORD   23620
            WORD   $16F9
LX_L_ANTIBREAK            
            WORD   $10A6
            WORD   SET_STACK-6
            WORD   $0CF6
            WORD   $1B7D
            WORD   $16FD
            WORD   $1734
            WORD   $102F
    
LX_SCRLE    
            WORD   $1A45,LISTSP,LX_SCRLE_BUK  
            WORD   $1118                      
            
            WORD   $0F9C                      
            WORD   $2AEF                      
     
            
            WORD   $206E                    
            WORD   $15FF,$168D,$18BD,$168D  
            WORD   $203E,$203E,$15FF        
                          
            WORD   $168D                    
            WORD   $096E                    
            WORD   WORKSCR

            WORD   $15FF                    
            
             WORD   $10A6                   
             WORD   $0C7D                   
             
            
            
LX_SCRLE_BUK    
            WORD   $15FF          
            WORD   $0CF6,$0001    
            WORD   $33C3          
            WORD   $18BF          
            WORD   $15FF          
             WORD   $05E0         
             WORD   $1FC7         
ILX_RLE_CNT           
            WORD   $15FF          
            
            WORD   $18BE          
            
            WORD   $15FF          
             
             WORD   $1996         
             WORD   $10A6         
             WORD   ILX_MUS_INT   
             WORD   $102E         
             
             WORD   $05E0         
             WORD   $10A6         
             WORD   ILX_RLEATT    
             WORD   $102E         
            
            WORD   $15FF          
            
            WORD   $168D         
            WORD   $2BEF         
            WORD   $1F20         
            WORD   $168D         
            
            WORD   $1010         
            
            WORD   $1A45         
            WORD   ILX_RLE_HL
            WORD   ILX_RLE_DE
            WORD   $16FD         
            WORD   $168D         
            WORD   $16FD         
            
            WORD   $0CF6         
            WORD   $0000         
            WORD   $2312         
            
            
            WORD   $1A45         
ILX_RLE_DE  WORD   ILX_RLE_DE             
ILX_RLE_HL  WORD   ILX_RLE_HL
            WORD   $0BD1         
            WORD   $168D         
           
            WORD   $33C3      
            
            WORD   $0F9C          
            WORD   $18BF          
            WORD   $15FF          
           
             WORD   $10A6         
             WORD   $0C7D         
             WORD   $05E0       
             WORD   $1FC7       
             
             WORD   $10A6       
             WORD   ILX_RLE_CNT,$102F
            
ILX_RLEATT
            WORD   $15FF             
            WORD   $1010             
            
            WORD   $1A45,LISTSP,LX_SCRLE_BUK2
            WORD   $1118              
            
            WORD   $0F9C              
            WORD   $096E              
            WORD   WORKSCR+$1800
            
            WORD   $15FF              
LX_SCRLE_RLD            
             WORD   $10A6             
             WORD   $0C7D             
            
LX_SCRLE_BUK2        
                
            WORD   $15FF              
            WORD   $0CF6,$0001        
            WORD   $33C3              
            WORD   $18BF              
            WORD   $15FF              
                                                      
             WORD   $05E0             
             WORD   $1FC7             
            
            WORD   $15FF              
            
            WORD   $18BE             
            
            WORD   $05E0             
            WORD   $15FF             
             WORD   $10A6            
             WORD   ILX_EXXIT        
             WORD   $102E            
            WORD   $15FF             
            
            WORD   $168D       
            WORD   $2BEF       
            WORD   $1F20       
            WORD   $168D       
            WORD   $0BD1       
            
            WORD   $1011            
            
            WORD   $1A45            
            WORD   ILX_RLE_HL2
            WORD   ILX_RLE_DE2
            WORD   $16FD            
            WORD   $168D            
            WORD   $16FD            
            
            WORD   $0CF6            
            WORD   $0000            
            WORD   $2312            
            
            
            WORD   $1A45            
ILX_RLE_DE2 WORD   ILX_RLE_DE2            
ILX_RLE_HL2 WORD   ILX_RLE_HL2
            WORD   $0BD1            
            WORD   $168D            
            
            WORD   $33C3        
            
            WORD   $0F9C        
            WORD   $15FF        
           
             WORD   $10A6       
             WORD   $0C7D       
             WORD   $0C7D       
            
ILX_EXXIT   
            
            WORD   $15FF              
            WORD   $10A6              
            WORD   LX_K_SPRTBUK1,$102F
            
ILX_MUS_INT
            
            WORD   $15FF          
            WORD   $1010          
            
            WORD   $15FF          
            
             WORD   $168D         
             WORD   $0AFC         
            

            WORD   $1A45,LX_MUS_RETW,ILX_MUS_INT_RET
            WORD   $1118           
            
            WORD   $10A6           
            WORD   LX_MUSIC,$102F  
            
ILX_MUS_INT_RET

            WORD   $1A45,LX_MUS_RETW,LX_K_SPRTBUK1
            WORD   $1118              

            WORD   $0CF6,$0000        
            
            WORD   $0B1D              
            WORD   $168D              
            
            WORD   $10A6              
            WORD   LX_SCRLE_RLD,$102F 
LX_LDIR        
            WORD   $0F9C 
            WORD   $0BD1 
            WORD   $096E, LX_LDIRORI
            WORD   $16F9
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF
            
            WORD   $0F9C 
            WORD   $0BD1 
            WORD   $096E, LX_LDIRDES 
            WORD   $16F9 
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF
            
            WORD   $0F9C 
            WORD   $0BD1 
            WORD   $096E, LX_LDIRNBY 
            WORD   $16F9 
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF
           
            WORD   $1A45 
LX_LDIRORI  WORD   $0000
LX_LDIRDES  WORD   $0000
            WORD   $0CF6 
LX_LDIRNBY  WORD   $0000
            
            WORD   $19F7
            WORD    LX_K_SPRTBUK1,$102F
ILX_HALT                      
            WORD   $1A45
            WORD   ILX_INT1,$0051
            WORD   $1118
            
            WORD   $1A45
            WORD   ILX_INT2,$1F3D
            WORD   $1118
            
            WORD   $0CF6,$0001
            
            WORD   $10A6
            WORD   ILX_INT1
            WORD   $102F
            
            WORD   0000,0000,0000
ILX_INT1    WORD   $0051
ILX_INT2    WORD   $1F3D
            WORD   $0CF6,$00FF
            WORD   $05F9
            
            WORD   $10A6,LX_K_SPRTBUK1,$102F
            
LX_LOADER      
            WORD   $10A6,LX_K_SPRTBUK1
LX_LDR_ALLW WORD   $102F
LX_LDR_INSERT
            
MSTACKEND           
            ESPACIO BYTES 256
			
SET_STACK-16

            WORD    $0052
            WORD    $0052
            WORD    $0052
            WORD    $0052
            
            WORD    $0052
            WORD    $1B7D
            WORD    $1303
            WORD    $3E00

SET_STACK
TANOTA      
			WORD  $34F5,$31FC,$2F2E,$2C88
			WORD  $2A08,$27AC,$2572,$2358
			WORD  $215C,$1F7D,$1DB9,$1C0E
			WORD  $1A7A,$18FE,$1797,$1644

			WORD  $1504,$13D6,$12B9,$11AC
			WORD  $10AE,$0FBE,$0EDC,$0E07
			WORD  $0D3D,$0C7F,$0BCB,$0B22
			WORD  $0A82,$09EB,$095D,$08D6

			WORD  $0857,$07DF,$076E,$0703
			WORD  $069F,$0640,$05E5,$0590
			WORD  $0541,$04F6,$04AE,$046B
			WORD  $042C,$03F0,$03B7,$0382

			WORD  $034F,$0320,$02F3,$02C8
			WORD  $02A0,$027B,$0257,$0235
			WORD  $0216,$01F7,$01DC,$01C1
			WORD  $01A7,$0190,$0179,$0164

			WORD  $0150,$013D,$012C,$011B
			WORD  $010B,$00FC,$00EE,$00E0
			WORD  $00D4,$00C8,$00BD,$00B2
			WORD  $00A8,$009F,$0096,$008D
			WORD  $0085,$007E,$0077,$0070
			WORD  $006A,$0064,$005E,$0059
			WORD  $0054,$004F,$004B,$0047
			WORD  $0043,$003F,$003B,$0038
			WORD  $0035,$0032,$002F,$002D
			WORD  $002A,$0028,$0025,$0023
			WORD  $0021,$001F,$001E,$001C
			WORD  $001A,$0019,$0018,$0016
			WORD  $0015,$0014,$0013,$0012
			WORD  $0011,$0010,$000F,$000E
                        
WORKSCR     = $A500
       
LXT_EN1
LXT_EN2

            BYTE   "B"
            WORD   LXT_EN3-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   "  830 YEARS AGO, RICHARD 'THE",006
            BYTE   "  LIONHEART', KING OF ENGLAND,",006
            BYTE   " WENT TO THE THIRD GREAT CRUSADE"
            BYTE   "   TO RECLAIM THE HOLY LAND.",006
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_EN3
            BYTE   "C"
            WORD   LXT_EN4-($+2)  
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS,FIN
            BYTE   "  ROBIN OF LOXLEY, ONE OF THE",006
            BYTE   " LOYAL NOBLEMEN MARCHING UNDER "
            BYTE   LSE,MUS,FIN
            BYTE   "   THE KING'S BANNER, WAS TO",006
            BYTE   023,010,010,"RETURN HOME.",006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS 
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_EN4
            BYTE   "D"
            WORD   LXT_EN5-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   "UPON ARRIVAL,HE FOUND HIS FATHER"
            BYTE   LSE,MUS,FIN
            BYTE   "MURDERED AND HIS LANDS FORFEITED"
            BYTE   023,004,004,"BY THE WICKED SHERIFF OF",006
            BYTE   LSE,MUS,FIN
            BYTE   "   NOTTINGHAM, WHO HAD TAKEN",006
            BYTE   "  ADVANTAGE OF THE ABSENSE OF",006
            BYTE   LSE,MUS,FIN
            BYTE   "THE KING TO INCREASE HIS POWER. "
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_EN5
            BYTE   "E"
            WORD   LXT_EN6-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   "  AVOWING TO AVENGE HIS FATHER",006
            BYTE   LSE,MUS,FIN
            BYTE   " AND FIGHT THE TYRANT SHERIFF,  "
            BYTE   " ROBIN WAS  FORCED TO BECOME AN "
            BYTE   LSE,MUS,FIN
            BYTE   " OUTLAW. HE FOUNDED THE THIEVES "
            BYTE   " SCHOOL TO TRAIN A REBEL FORCE  "
            BYTE   LSE,MUS,FIN
            BYTE   023,006,006,"IN SHERWOOD FOREST.",006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_EN6
            BYTE   "F"
            WORD   LXT_EN7-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,PAG,030,MUS,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   "  UPON LEARNING OF THE RISING",006
            BYTE   LSE,MUS,FIN
            BYTE   "  REBEL FORCE IN SHERWOOD,THE",006
            BYTE   "   SHERIFF, IN A FIT OF RAGE,",006
            BYTE   LSE,MUS,FIN
            BYTE   " KIDNAPPED LADY MARIAN, ROBIN'S "
            BYTE   023,009,009,"ONE TRUE LOVE.",006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
            
LXT_EN7
            BYTE   "G"
            WORD   LXT_EN8-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   "ROBIN MUST PREPARE TO INFILTRATE"
            BYTE   LSE,MUS,FIN
            BYTE   " NOTTINGHAM CASTLE IN ORDER TO  "
            BYTE   " STOP THE SHERIFF FROM MARRYING "
            BYTE   LSE,MUS,FIN
            BYTE   "HER, AND TO SEEK REVENGE FOR THE"
            BYTE   "  INJUSTICES SERVED UPON HIM.",006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_EN8
            BYTE   "H"
            WORD   LXT_EN9-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
            BYTE   022,016,000
            BYTE   016,000,017,000,019,000
            BYTE   " "
            BYTE   LSE,LDI,000,090,001,090,255,000
            BYTE   LDI,000,064,000,165,000,027
            BYTE   PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
LXT_EN9     
            BYTE   "I"
            WORD   LXT_EN10-($+2)
            BYTE   022,001,004
            BYTE   "WORLD XXI SOFT PRESENTS"
            BYTE   022,016,006
            BYTE   "A GAME BY ARIEL RUIZ"
            BYTE   022,017,004
            BYTE   "MUSIC BY RICHARD ARMIJO"
            BYTE   022,018,000
            BYTE   "RUSSIAN VERSION: MIKHAIL SUDAKOV"
            BYTE   022,019,003
            BYTE   "AND MARIA KRASHENINNIKOVA"
            
LXT_EN10    
            BYTE   "J"
            WORD   LXT_EN11-($+2)
            
            BYTE   022,001,004
            BYTE   "PRESS A KEY TO LOAD GAME"

            
LXT_EN11
LXT_EN_END

LXT_RS1

LXT_RS2
            

            BYTE   "B"
            WORD   LXT_RS3-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   "  830 f`m h[b[_ kcr[k_ fw]chi`",006
            BYTE   "   l`k_q` imjk[]cflz ] mk`mcd",006
            BYTE   023,005,005,"ek`lmi]vd jipi_, rmi\\v",006
            BYTE   023,005,005,"]`khnmw l]zmny b`gfy.",006
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_RS3
            BYTE   "C"
            WORD   LXT_RS4-($+2)  
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS,FIN
            BYTE   023,008,008,"ki\\ch cb fielfc,",006
            BYTE   "  gifi_id [h^fcdlecd _]ikzhch,",006
            BYTE   LSE,MUS,FIN
            BYTE   "  lm[]scd ji_ bh[g{h[ eikifz,",006
            BYTE   023,007,007,"]ib]k[t[flz _igid.",006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_RS4
            BYTE   "D"
            WORD   LXT_RS5-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   023,004,004,"ji jkc`b_n ih nbh[f, rmi",006
            BYTE   LSE,MUS,FIN
            BYTE   023,004,004,"`^i imq[ n\\cfc, [ b`gfy",006
            BYTE   023,003,003,"b[\\k[f bfieibh`hhvd s`kco",006
            BYTE   LSE,MUS,FIN
            BYTE   023,005,005,"himmch^`glecd, eimikvd",006
            BYTE   023,006,006,"] imlnmlm]c` eikifz",006
            BYTE   LSE,MUS,FIN
            BYTE   023,005,005,"nek`jfzf l]iy ]f[lmw.",006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_RS5
            BYTE   "E"
            WORD   LXT_RS6-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000                 
            BYTE   006,006
            BYTE   "  ki\\ch, jiefz]sclw imiglmcmw",006
            BYTE   LSE,MUS,FIN
            BYTE   023,006,006,"b[ imq[ c _[mw imjik",006
            BYTE   023,004,004,"_`ljimcrhign s`kcon, \\vf",006
            BYTE   LSE,MUS,FIN
            BYTE   "  ]vhna_`h lm[mw jk`lmnjhceig.",006
            BYTE   "  ] s`k]n_leig f`ln ih ilhi][f",006
            BYTE   LSE,MUS,FIN
            BYTE   "  seifn ]iki], rmi\\v h[\\ck[mw",006
            BYTE   023,005,005,"c i\\nr[mw gzm`ahcei].",006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_RS6
            BYTE   "F"
            WORD   LXT_RS7-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS,FIN
            BYTE   023,006,006,"nbh[] i\\ xmid seif`,",006
            BYTE   023,007,007,"s`kco k[b^h`][flz",006
            BYTE   LSE,MUS,FIN
            BYTE   023,005,005,"c jipcmcf f`_c g[kc[h,",006
            BYTE   023,004,004,"clmchhny fy\\i]w ki\\ch[.",006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
            
            
LXT_RS7
            BYTE   "G"
            WORD   LXT_RS8-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,MUS,PAG,030,FIN
            BYTE   022,000,000
            BYTE   006,006
            BYTE   023,007,007,"rmi\\v ]illm[hi]cmw",006
            BYTE   LSE,MUS,FIN
            BYTE               "ljk[]`_fc]ilmw c h` _[mw s`kcon "
            BYTE   023,005,005,"i\\]`hr[mwlz l g[kc[h,",006
            BYTE   LSE,MUS,FIN
            BYTE   023,004,004,"ki\\ch _ifa`h jki\\k[mwlz",006
            BYTE   023,005,005,"] himmch^`glecd b[gie.",006
            BYTE   LSE,MUS,FIN
            BYTE   006,006
            BYTE   006,006
            BYTE   LSE,MUS
            BYTE   LDI,000,088,000,088+101,000,003
            BYTE   LDI,000,064,000,080+101,000,008,LDI,032,088+101,033,088+101,255-32,002,FIN
LXT_RS8
            BYTE   "H"
            WORD   LXT_RS9-($+2)
            BYTE   LSE,PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
            BYTE   022,016,000
            BYTE   016,000,017,000,019,000
            BYTE   " "
            BYTE   LSE,LDI,000,090,001,090,255,000
            BYTE   LDI,000,064,000,165,000,027
            BYTE   PAG,023,LDI,000,064,000,192,000,027,PAG,030,FIN
LXT_RS9     
            BYTE   "I"
            WORD   LXT_RS10-($+2)
            BYTE   022,001,002
            BYTE   "WORLD XXI SOFT jk`_lm[]fz`m"  
            BYTE   022,016,004
            BYTE   "[]mik c^kv: [kcxfw kncl"
            BYTE   022,017,004
            BYTE   "gnbve[hmv: kcr[k_ [kgcpi"
            BYTE   022,018,001
            BYTE   "knlle[z ]`klcz: gcp[cf ln_[ei]"
            BYTE   022,019,005
            BYTE   "c g[kcz ek[s`hchhcei]["
            
LXT_RS10    
            BYTE   "J"
            WORD   LXT_RS11-($+2)
            
            BYTE   022,000,005
            BYTE   "h[agcm` fy\\ny ef[]csn,"
            BYTE   022,001,006
            BYTE   "rmi\\v b[^knbcmw c^kn"
            
LXT_RS11
LXT_RS_END

            
LXT_SWITCHWORD WORD LXT_SWITCH
LXT_SWITCH
            BYTE   "A"
            WORD   LXT_SW_ES-($+2)
            
            BYTE   LSE,LDI
            WORD   LXT_EN1,LX_PITEXT1,LXT_EN_END-LXT_EN1
            
           
            BYTE   FIN
LXT_SW_ES
            BYTE   "B"
            WORD   LXT_SW_RS-($+2)
            
            BYTE   LSE,LDI
            WORD   LXT_ES1,LX_PITEXT1,LXT_ES_END-LXT_ES1
            
         
            BYTE   FIN
          
LXT_SW_RS    
            BYTE   "C"
            WORD   LXT_SW_END-($+2)
            
            BYTE   LSE,LDI
            WORD   LXT_RS1,LX_PITEXT1,LXT_RS_END-LXT_RS1

             
            BYTE   FIN
LXT_SW_END           
            BYTE   128
            
LXT_ESZ     
       
            BYTE   128
            

LXT_ES_END
          

ILX_CARR_G_RUS  ARCHIVO "IARTE/ILX_CARR_7_RUS.DAT"
ILX_CARR_G_RUSL = $-ILX_CARR_G_RUS
ILX_CARR_H_RUS  ARCHIVO "IARTE/ILX_CARR_8_RUS.DAT" 
ILX_CARR_H_RUSL = $-ILX_CARR_H_RUS


MPAGE52_END
;--------------------------------------------------------------------------
;--------------------------------------------------------------------------
;--------------------------------------------------------------------------
;--------------------------------------------------------------------------

**************************************************************************
 PAGINA TRES
**************************************************************************

$C000                          
MPAGE3_INI
ILX_ARRS_A   ARCHIVO "IARTE/ILX_ARRS_8.DAT" < FMV FLECHA GIRANDO
ILX_ARRS_B   ARCHIVO "IARTE/ILX_ARRS_9.DAT" 
ILX_ARRS_C   ARCHIVO "IARTE/ILX_ARRS_10.DAT" 
ILX_ARRS_D   ARCHIVO "IARTE/ILX_ARRS_11.DAT" 
ILX_ARRS_E   ARCHIVO "IARTE/ILX_ARRS_12.DAT" 
ILX_ARRS_F   ARCHIVO "IARTE/ILX_ARRS_13.DAT" 
ILX_ARRS_G   ARCHIVO "IARTE/ILX_ARRS_14.DAT" 
ILX_ARRS_H   ARCHIVO "IARTE/ILX_ARRS_15.DAT" 
ILX_CARR_D   ARCHIVO "IARTE/ILX_CARR_4.DAT"
MPAGE3_END  

**************************************************************************
 PAGINA CUATRO
**************************************************************************

$C000   
MPAGE4_INI 
ILX_FARR_A  ARCHIVO "IARTE/ILX_FARR_1.DAT" 
ILX_FARR_B  ARCHIVO "IARTE/ILX_FARR_2.DAT" 
ILX_FARR_C  ARCHIVO "IARTE/ILX_FARR_3.DAT" 
ILX_FARR_D  ARCHIVO "IARTE/ILX_FARR_4.DAT" 
ILX_FARR_E  ARCHIVO "IARTE/ILX_FARR_5.DAT" 
MPAGE4_END 

**************************************************************************
 PAGINA SEIS
**************************************************************************

$C000
MPAGE6_INI
LX_FNTL     ARCHIVO "../ARTE/LXFONT.BIN"
LX_FNTLB    = LX_FNTL-256

ILX_CARR_E  ARCHIVO "IARTE/ILX_CARR_5.DAT" 
ILX_CARR_F  ARCHIVO "IARTE/ILX_CARR_6.DAT" 
ILX_CARR_G  ARCHIVO "IARTE/ILX_CARR_7.DAT"
            ESPACIO BYTES 10
ILX_CARR_H  ARCHIVO "IARTE/ILX_CARR_8.DAT" 
MPAGE6_END

LABELS LIST
-----------

GBLOCK527END: EQU 0x0000F97D
GBLOCK527INI: EQU 0x00005B00
GBLOCK6END: EQU 0x0000FFFD
GBLOCK6INI: EQU 0x0000C000
GBLOCK4END: EQU 0x0000FF00
GBLOCK4INI: EQU 0x0000C000
GBLOCK3END: EQU 0x0000FF31
GBLOCK3INI: EQU 0x0000C000
GBLOCK1END: EQU 0x0000FFF4
GBLOCK1INI: EQU 0x0000C000
GBLOCK0END: EQU 0x0000FFFE
GBLOCK0INI: EQU 0x0000C000
GBASICLOAD2END: EQU 0x000081E2
GBASICLOAD2INI: EQU 0x00005C10
GBASICLOAD1END: EQU 0x00008032
GBASICLOAD1INI: EQU 0x00008000
BLOCK527END: EQU 0x0000CC69
BLOCK527INI: EQU 0x00005B00
BLOCK6END: EQU 0x0000FE11
BLOCK6INI: EQU 0x0000C000
BLOCK4END: EQU 0x0000FFC1
BLOCK4INI: EQU 0x0000C000
BLOCK3END: EQU 0x0000FC38
BLOCK3INI: EQU 0x0000C000
BLOCK1END: EQU 0x0000FC62
BLOCK1INI: EQU 0x0000C000
BLOCK0END: EQU 0x0000F6F0
BLOCK0INI: EQU 0x0000C000
BASICLOAD2END: EQU 0x00007AB1
BASICLOAD2INI: EQU 0x00005C10
BASICLOAD1END: EQU 0x00008033
BASICLOAD1INI: EQU 0x00008000
PSLNG: EQU 0x00000000
MPAGE7_END: EQU 0x0000C000
MPAGE7_INI: EQU 0x0000C000
MPAGE6_END: EQU 0x0000FE11
ILX_CARR_H: EQU 0x0000F12B
ILX_CARR_G: EQU 0x0000E1D1
ILX_CARR_F: EQU 0x0000D23F
ILX_CARR_E: EQU 0x0000C300
LX_FNTL: EQU 0x0000C000
MPAGE6_INI: EQU 0x0000C000
MPAGE4_END: EQU 0x0000FFC1
ILX_FARR_E: EQU 0x0000F39A
ILX_FARR_D: EQU 0x0000E757
ILX_FARR_C: EQU 0x0000DA8E
ILX_FARR_B: EQU 0x0000CD42
ILX_FARR_A: EQU 0x0000C000
MPAGE4_INI: EQU 0x0000C000
MPAGE3_END: EQU 0x0000FC38
ILX_CARR_D: EQU 0x0000EDAB
ILX_ARRS_H: EQU 0x0000E6F0
ILX_ARRS_G: EQU 0x0000E0C7
ILX_ARRS_F: EQU 0x0000DCBD
ILX_ARRS_E: EQU 0x0000D879
ILX_ARRS_D: EQU 0x0000D357
ILX_ARRS_C: EQU 0x0000CC9A
ILX_ARRS_B: EQU 0x0000C694
ILX_ARRS_A: EQU 0x0000C000
MPAGE3_INI: EQU 0x0000C000
MPAGE52_END: EQU 0x0000CC69
ILX_CARR_H_RUSL: EQU 0x00000CE1
ILX_CARR_H_RUS: EQU 0x0000BF88
ILX_CARR_G_RUSL: EQU 0x00000F4C
ILX_CARR_G_RUS: EQU 0x0000B03C
LXT_ESZ: EQU 0x0000B03B
LXT_SW_END: EQU 0x0000B03A
LXT_ES_END: EQU 0x0000B03C
LXT_SW_RS: EQU 0x0000B02E
LXT_SW_ES: EQU 0x0000B022
LXT_SWITCH: EQU 0x0000B016
LXT_SWITCHDW: EQU 0x0000B014
LXT_RS_END: EQU 0x0000B013
LXT_RS11: EQU 0x0000B013
LXT_RS10: EQU 0x0000AFE0
LXT_RS9: EQU 0x0000AF50
LXT_RS8: EQU 0x0000AF1B
LXT_RS7: EQU 0x0000AE5C
LXT_RS6: EQU 0x0000ADBD
LXT_RS5: EQU 0x0000ACBF
LXT_RS4: EQU 0x0000ABE8
LXT_RS3: EQU 0x0000AB44
LXT_RS2: EQU 0x0000AAA2
LXT_RS1: EQU 0x0000AAA2
LXT_EN_END: EQU 0x0000AAA2
LXT_EN11: EQU 0x0000AAA2
LXT_EN10: EQU 0x0000AA84
LXT_EN9: EQU 0x0000A9F7
LXT_EN8: EQU 0x0000A9C2
LXT_EN7: EQU 0x0000A8E9
LXT_EN6: EQU 0x0000A822
LXT_EN5: EQU 0x0000A733
LXT_EN4: EQU 0x0000A643
LXT_EN3: EQU 0x0000A59C
LXT_EN2: EQU 0x0000A4F0
LXT_EN1: EQU 0x0000A4F0
MSTACKEND: EQU 0x0000A38F
LX_LDR_INSERT: EQU 0x0000A38F
LX_LDR_ALLW: EQU 0x0000A38D
ILX_INT2: EQU 0x0000A37B
ILX_INT1: EQU 0x0000A379
LX_LDIRNBY: EQU 0x0000A351
LX_LDIRDES: EQU 0x0000A34D
LX_LDIRORI: EQU 0x0000A34B
ILX_MUS_INT_RET: EQU 0x0000A2F1
ILX_RLE_DE2: EQU 0x0000A2BD
ILX_RLE_HL2: EQU 0x0000A2BF
ILX_EXXIT: EQU 0x0000A2D1
LX_SCRLE_RLD: EQU 0x0000A279
LX_SCRLE_BUK2: EQU 0x0000A27D
ILX_RLE_DE: EQU 0x0000A247
ILX_RLE_HL: EQU 0x0000A249
ILX_RLEATT: EQU 0x0000A265
ILX_MUS_INT: EQU 0x0000A2D9
ILX_RLE_CNT: EQU 0x0000A211
LX_SCRLE_BUK: EQU 0x0000A201
LX_SND_RLEB: EQU 0x0000A105
LX_SND_RETD: EQU 0x0000A101
LX_SND_RLE: EQU 0x0000A0F7
LX_SFX_FADEOUT: EQU 0x0000A06F
LX_SFX_TECLA: EQU 0x0000A060
LX_AYSOUND_BUK: EQU 0x0000A03F
LX_MUS_RETW: EQU 0x0000A02B
LX_MUS_RUNCX_RET: EQU 0x00009F3D
LX_MUS_RUNC_RET: EQU 0x00009F37
LX_MUS_RLC_RET: EQU 0x00009F37
LX_MUS_SOSTC: EQU 0x00009FA9
LX_MUS_RLC: EQU 0x00009F9B
LX_MUS_RUNC: EQU 0x0000A001
LX_MUS_NORUNC_CONT: EQU 0x00009EC7
LX_MUS_RUNCX: EQU 0x0000A013
LX_MUS_NORUNC: EQU 0x00009EC7
LX_MUS_RUNBX_RET: EQU 0x00009EB3
LX_MUS_RUNB_RET: EQU 0x00009EAD
LX_MUS_RLB_RET: EQU 0x00009EAD
LX_MUS_SOSTB: EQU 0x00009F93
LX_MUS_RLB: EQU 0x00009F85
LX_MUS_RUNB: EQU 0x00009FD9
LX_MUS_NORUNB_CONT: EQU 0x00009E3D
LX_MUS_RUNBX: EQU 0x00009FEB
LX_MUS_NORUNB: EQU 0x00009E3D
LX_MUS_RUNAX_RET: EQU 0x00009E29
LX_MUS_RUNA_RET: EQU 0x00009E23
LX_MUS_RLA_RET: EQU 0x00009E23
LX_MUS_SOSTA: EQU 0x00009F7D
LX_MUS_RLA: EQU 0x00009F6F
LX_MUS_RUNA: EQU 0x00009FB1
LX_MUS_LOOP: EQU 0x00009F57
LX_MUS_NORUNA_CONT: EQU 0x00009DAB
LX_MUS_RUNAX: EQU 0x00009FC3
LX_MUS_NORUNA: EQU 0x00009DAB
LX_MUS_EXIT: EQU 0x0000A029
LX_MUS_TEMPO: EQU 0x00009D8D
LX_MUS_SAMXIT: EQU 0x00009D77
LX_MUS_SAMCX: EQU 0x00009D4F
LX_MUS_SAMBX: EQU 0x00009D27
LX_MUS_CNT: EQU 0x00009CFF
LX_SND_EXIT: EQU 0x00009CF3
AYDATA: EQU 0x0000BFFD
AYCTRL: EQU 0x0000FFFD
LX_SNDBUK: EQU 0x0000A079
AYS: EQU 0x00000093
SND: EQU 0x00000091
LDR: EQU 0x00000090
GAB: EQU 0x0000008F
CLE: EQU 0x0000008E
SPD: EQU 0x0000008D
SPO: EQU 0x0000008B
FLE: EQU 0x0000008A
ESC: EQU 0x00000089
LOC: EQU 0x00000086
DXY: EQU 0x00000085
DIR: EQU 0x00000084
CLD: EQU 0x00000083
SPR: EQU 0x00000081
HLT: EQU 0x00000080
LX_AYSOUND: EQU 0x0000A02F
LX_MUSIC: EQU 0x00009CFF
LX_SOUND: EQU 0x00009CBD
LX_LOADER: EQU 0x0000A389
LX_LDIR: EQU 0x0000A307
LX_SPEXIT: EQU 0x00009CB1
LX_SPAG: EQU 0x0000A127
LX_ATREL: EQU 0x0000A15B
LX_CHRABS: EQU 0x0000A13F
LX_SCRLE: EQU 0x0000A1D9
ILX_HALT: EQU 0x0000A359
LX_K_TABLAJP: EQU 0x00009C89
LX_K_SPRTBUK1: EQU 0x00009C6F
LX_K_SPRT2: EQU 0x00009C77
LX_L_ANTIBREAK: EQU 0x0000A1CB
LX_7_RETURN: EQU 0x0000A1BB
LX_B_GOSUB: EQU 0x0000A17D
LX_9_CBUCLE: EQU 0x0000A1A9
LX_K_SPRT: EQU 0x00009C5D
MSTACKSINI: EQU 0x00009C15
LXT_ES11: EQU 0x00009C15
LXT_ES10: EQU 0x00009BE9
LXT_ES9: EQU 0x00009B58
LXT_ES8: EQU 0x00009B23
LXT_ES7: EQU 0x00009A21
LXT_ES6: EQU 0x00009978
LXT_ES5: EQU 0x0000987C
LXT_ES4: EQU 0x000097AA
LXT_ES3: EQU 0x0000970F
LXT_ES2: EQU 0x00009661
LXT_ES1: EQU 0x00009620
LXT_SL7: EQU 0x00009620
LXT_SLF: EQU 0x000095F6
LXT_SL6: EQU 0x000095F6
LXT_SLE: EQU 0x000095CC
LXT_SL5: EQU 0x000095CC
LXT_SLD: EQU 0x000095A2
LXT_SL4: EQU 0x000095A2
LXT_SLC: EQU 0x00009578
LXT_SL3: EQU 0x00009578
LXT_SLB: EQU 0x0000954E
FIN: EQU 0x00000088
WORKSCR: EQU 0x0000A500
LDI: EQU 0x0000008C
RLE: EQU 0x00000082
PAG: EQU 0x00000087
MUS: EQU 0x00000092
LSE: EQU 0x00000014
LXT_SL2: EQU 0x0000954E
LXT_SLA: EQU 0x0000953A
LXMUSSILD: EQU 0x0000951A
LXM_RPC3: EQU 0x000094A6
LXM_RPB3: EQU 0x00009412
LXM_RPA3: EQU 0x00009395
LXM_CHC3: EQU 0x000094A6
LXM_CHB3: EQU 0x00009412
LXM_CHA3: EQU 0x00009395
HOOD_R3: EQU 0x0000938F
HOOD_I3: EQU 0x00009389
LXMUSINC: EQU 0x00009373
LXM_RPB2: EQU 0x00009343
LXM_RPA2: EQU 0x00009302
LXM_RPC2: EQU 0x00009372
LXM_CHC2: EQU 0x00009344
LXM_CHB2: EQU 0x00009304
LXM_CHA2: EQU 0x000092D5
HOOD_R2: EQU 0x000092CF
HOOD_I2: EQU 0x000092C9
LXMUSINB: EQU 0x000092B3
LXM_RPC: EQU 0x00009171
LXM_RPB: EQU 0x00008FD9
LXM_RPA: EQU 0x00008E50
LXM_CHC: EQU 0x00009171
LXM_CHB: EQU 0x00008FD9
LXM_CHA: EQU 0x00008E50
HOOD_R: EQU 0x00008E4A
HOOD_I: EQU 0x00008E44
LXMUSMEND: EQU 0x00008E2E
ILX_CARR_C: EQU 0x00008087
ILX_CARR_B: EQU 0x00007364
ILX_CARR_A: EQU 0x00006640
VARS_END: EQU 0x000065DC
LX_CERO: EQU 0x000065C2
TABSPRAEND: EQU 0x000065C1
VARL_N: EQU 0x0000658C
VARL_F: EQU 0x00006586
VAR: EQU 0x00000065
PRAMT: EQU 0x00005CB4
RAMTOP: EQU 0x00005CB2
NMIADD: EQU 0x00005CB0
MEMBOT: EQU 0x00005C92
PFLAG: EQU 0x00005C91
MASKT: EQU 0x00005C90
ATTRT: EQU 0x00005C8F
MASKP: EQU 0x00005C8E
ATTRP: EQU 0x00005C8D
SCRCT: EQU 0x00005C8C
SPOSNL: EQU 0x00005C8A
SPOSNH: EQU 0x00005C89
TANOTA: EQU 0x0000A400
SPOSN: EQU 0x00005C88
DFCCL: EQU 0x00005C86
DFCC: EQU 0x00005C84
ECHOE: EQU 0x00005C82
PRCC: EQU 0x00005C80
PPOSN: EQU 0x00005C7F
COORDS: EQU 0x00005C7D
UDG: EQU 0x00005C7B
FRAMES: EQU 0x00005C78
SEED: EQU 0x00005C76
TADDR: EQU 0x00005C74
STRLEN: EQU 0x00005C72
FLAGX: EQU 0x00005C71
OSPPC: EQU 0x00005C70
OLDPPCH: EQU 0x00005C6F
OLDPPC: EQU 0x00005C6E
STOP: EQU 0x00005C6C
DFSZ: EQU 0x00005C6B
FLAGS2: EQU 0x00005C6A
MEM: EQU 0x00005C68
BREG: EQU 0x00005C67
STKEND: EQU 0x00005C65
STKBOT: EQU 0x00005C63
BASICPRGFIN: EQU 0x0000660E
WORKSP: EQU 0x00005C61
XPTR: EQU 0x00005C5F
CHADD: EQU 0x00005C5D
KCUR: EQU 0x00005C5B
ELINEHELP: EQU 0x000065DC
ELINE: EQU 0x00005C59
DATADD: EQU 0x00005C57
NXTLIN: EQU 0x00005C55
PROG: EQU 0x00005C53
CURCHL: EQU 0x00005C51
CHANS: EQU 0x00005C4F
DEST: EQU 0x00005C4D
VARS: EQU 0x00005C4B
EPPC: EQU 0x00005C49
BORDCR: EQU 0x00005C48
SUBPPC: EQU 0x00005C47
PPC: EQU 0x00005C45
NSPPC: EQU 0x00005C44
NEWPPC: EQU 0x00005C42
MODE: EQU 0x00005C41
LISTSP: EQU 0x00005C3F
LX_ERRSP: EQU 0x00009C17
ERRSP: EQU 0x00005C3D
TVFLAG: EQU 0x00005C3C
FLAGS: EQU 0x00005C3B
ERRNR: EQU 0x00005C3A
NEW_CHANSE: EQU 0x00005C3A
PIP: EQU 0x00005C39
RASP: EQU 0x00005C38
CHARS: EQU 0x00005C36
STRMS: EQU 0x00005C10
TVDATA: EQU 0x00005C0E
KDATA: EQU 0x00005C0D
DEFADD: EQU 0x00005C0B
REPPER: EQU 0x00005C0A
REPDEL: EQU 0x00005C09
LASTK: EQU 0x00005C08
CTRL_READ: EQU 0x00005C08
CTRL_SIDE: EQU 0x00005C07
KSTATE: EQU 0x00005C00
TABCHANS: EQU 0x00005B23
BASICPRGINI: EQU 0x00005CB6
LX_PROG: EQU 0x00005B21
LX_UPAGVARS: EQU 0x00005B1F
LX_SLIDES: EQU 0x0000953A
LX_SLIDESW: EQU 0x00005B1D
LX_PITEXT1: EQU 0x00009620
LX_PITEXTW: EQU 0x00005B1B
LX_FNTLB: EQU 0x0000BF00
LX_FNTLBW: EQU 0x00005B19
VARS_MAIN: EQU 0x00006583
LX_VARZONE: EQU 0x00005B17
SPRDIMXYP: EQU 0x00005B15
SPRDIMXYC: EQU 0x00005B13
LX_MUS_SAMC: EQU 0x00005B12
LX_MUS_SAMB: EQU 0x00005B11
LX_MUS_SAMA: EQU 0x00005B10
LX_MUS_CNC: EQU 0x00005B0F
LX_MUS_CNB: EQU 0x00005B0E
LX_MUS_CNA: EQU 0x00005B0D
LX_MUS_CON: EQU 0x00005B0C
LX_MUS_TEM: EQU 0x00005B0B
LX_TST_FLAG: EQU 0x00005B0B
LX_MUS_PUC: EQU 0x00005B09
LX_MUS_PUB: EQU 0x00005B07
SIL_CHA: EQU 0x00009538
LX_MUS_PUA: EQU 0x00005B05
SILENCIO_R: EQU 0x00009532
LX_MUS_REP: EQU 0x00005B03
SILENCIO_I: EQU 0x0000952C
LX_MUS_INI: EQU 0x00005B01
LXMUSCNT: EQU 0x00005B01
LX_MUS_ON: EQU 0x00005B00
MPAGE52_INI: EQU 0x00004000
MPAGE1_END: EQU 0x0000FC62
ILX_TITULO_RUSL: EQU 0x000005A1
ILX_TITULO_RUS: EQU 0x0000F6C1
ILX_TITULO: EQU 0x0000F113
ILX_FARR_H: EQU 0x0000E4CF
ILX_FARR_G: EQU 0x0000D8B0
ILX_FARR_F: EQU 0x0000CC75
LX_VOZC: EQU 0x0000BFFF
MPAGE1_INI: EQU 0x0000C000
MPAGE0_END: EQU 0x0000F6F0
LX_LOXLEY_PREP: EQU 0x0000EC38
LX_MARIAN: EQU 0x0000E50E
LX_TSCHOOL: EQU 0x0000D5BD
LX_NOTTINGHAM: EQU 0x0000CD38
LX_LOXLEY_IN: EQU 0x0000C79A
LX_LIONHEART: EQU 0x0000C000
MPAGE0_INI: EQU 0x0000C000
BL9941_20: EQU 0x00006568
BL9940_19: EQU 0x00006530
BL9930_18: EQU 0x00006520
BL9915_17: EQU 0x000064FD
BL9911_16: EQU 0x000064BD
BL9908_15: EQU 0x000064B7
BL9906_14: EQU 0x00006491
BL9905_13: EQU 0x00006463
BL9900_12: EQU 0x00006447
BL9000_11: EQU 0x00006433
BL151_10: EQU 0x0000641F
BL150_9: EQU 0x000063F3
BL142_8: EQU 0x000063D8
BL140_7: EQU 0x000063A9
BL100_6: EQU 0x00005F44
BL11_5: EQU 0x00005DED
BL10_4: EQU 0x00005DDD
BL8_3: EQU 0x00005D61
BL4_2: EQU 0x00005D38
BL2_1: EQU 0x00005D1E
DOSOFFMOTOR: EQU 0x0000019C
DOSSET: EQU 0x0000013F
DOSREAD: EQU 0x00000112
DOSREFHEAD: EQU 0x0000010F
DOSCLOSE: EQU 0x00000109
DOSOPEN: EQU 0x00000106
TRD_LOAD: EQU 0x00003D13
ROM_CEROS: EQU 0x00003CE0
SET_STACK: EQU 0x0000A400
LX_LANG: EQU 0x0000FFFF


******************************************************************************************************
**FIN DE LA INTRO*************************************************************************************
******************************************************************************************************
******************************************************************************************************





*******
 JUEGO
*******


MAPA MEMORIA 
-------------

PAGE 0=SPRITES BLOCK 1 + STACKS + DATA
PAGE 1=SFX + MUSIC + MAP BLOCK 3
PAGE 2=BASIC + BACKGROUND SCREEN + GAME VARS + STACKS
PAGE 3=MAP BLOCK 1 
PAGE 4=MAP BLOCK 2 
PAGE 5=SCREEN 1 + SYSVARS + BASIC
PAGE 6=SPRITES BLOCK 2 + STACKS + DATA
PAGE 7=SCREEN 2 + TEXT + ROOMS DATA

VARIABLES BASIC
---------------

DIM C(5)
DIM D(5)
DIM K(7)
DIM O(5)
FOR Y=0
LET A=56832
LET B=0
LET BD=0
LET C=254
LET D=23305
LET DB=0
LET DF=0
LET DS=0
LET E=0
LET F=66
LET G=0
LET H=0
LET I=0
LET J=2
LET JF=0
LET K=0
LET L=1
LET LK=23560
LET M=-9930
LET MF=0
LET N=8
LET O=-9940
LET OB=254
LET P=0
LET PZ=-9900
LET Q=0
LET R=2
LET S=0
LET SF=0
LET SK=0
LET T=0
LET U=4
LET V=65535
LET W=-9900
LET X=0
LET XB=0
LET XS=0
LET Z=10

            
LISTADO BASIC (CON CODIGOS)
---------------------------

LOS NUMEROS EN CADENAS PRINT QUE ESTAN PRECEDIDOS POR | SON BYTES INSERTADOS, POR EJEMPLO, |006 ES UN SOLO BYTE IGUAL A 6.


1 BORDER K:PRINT "|020|140|202|212|125|249|050|006|136";:LET A=PEEK 65535-CODE "|065":IF A>= K AND A<= R THEN LET F=A:GO TO PI +R
2 GO TO O:LET F=CODE "|065":GO TO M
4 GO TO W:IF F<K OR F>R THEN GO TO PI 
5 POKE D,F:POKE 23966,CODE "|065"+F:PRINT "|020|140|121|212|075|092|002|000|136";A$:IF F=R THEN PRINT "|020|135|017|140|149|254|000|160|095|001|135|023|140|000|160|199|225|243|000|135|019|140|243|160|005|205|072|000|135|020|140|059|161|098|237|036|000|136"
10 PRINT "|020|135|017|140|060|196|042|091|018|000|151|041|091|001|136";:LET F=CODE "|066":LET J=R:LET N=R*U:GO TO -9910:LET F=CODE "|087":LET J=K:LET N=K:GO TO -9940
11 LET F=CODE "|066":GO TO -9930
12 GO TO PZ:IF F<K OR F>PI  THEN GO TO CODE "|012"
13 IF NOT F THEN GO TO CODE "|080"
15 IF F=R THEN GO TO CODE "|030"
16 IF F=INT PI  THEN LET F=CODE "|070":GO TO -9930:GO TO PZ:GO TO CODE "|011"
17 LET F=CODE "|069":GO TO -9930
20 GO TO PZ:IF F<K OR F>R THEN GO TO CODE "|020"
20 LET BD=F:GO TO CODE "|011"
30 LET F=CODE "|067":GO TO -9930
31 GO TO PZ:IF F<K OR F>U THEN GO TO CODE "|031"
32 PRINT "|020|135|023|151|035|235|048|136";:IF F=INT PI  THEN POKE 60195,CODE "|047":GO TO CODE "|011"
32 IF F<INT PI  THEN LET A=60027+CODE "|005"*F:GO TO CODE "|070"
33 LET F=CODE "|068":GO TO -9940:PRINT "|020|140|224|060|000|091|007|000|136":FOR Y=K TO R+U:PRINT AT R+U+Y+Y,CODE "|015";"|018|001|032|008|020|135|023|136";
42 GO TO PZ:LET A=23296:LET F=PEEK LK:POKE 24600,F:LET F=F+(CODE "|031" AND F=CODE "|032"):IF F<CODE "|048" OR (F>CODE "|058" AND F<CODE "|063") OR F>CODE "|090" THEN GO TO CODE "|042"
45 IF F=PEEK A THEN GO TO CODE "|042"
45 LET A=A+L:IF A<23302 THEN GO TO CODE "|045"
50 PRINT "|032":POKE 23296+Y,F:NEXT Y:LET A=60027:PRINT "|020|140|000|091|123|234|005|000|136"
70 PRINT "|020|135|023|136";:FOR Y=K TO U:POKE 23296+Y,PEEK (A+Y):NEXT Y:FOR Y=K TO CODE "|006":LET A=PEEK (23296+Y)-CODE "|048":POKE K(Y+L),PEEK (60047+A):POKE 23308+Y,PEEK (60090+A):NEXT Y:GO TO CODE "|011"
80 DATA K,CODE "|075",K,L,CODE "|015",U+U,L,CODE "|009",K,K,R,R,R,R,CODE "|065",R,CODE "|008":IF V<LK THEN RESTORE :READ SF,DF,MF,W,A,B,M,V,G,H,XB,XS,DB,DS,F,J,N:GO TO -8450:GO TO -9910:GO TO 8000
81 LET V=K:LET F=CODE "|065":LET J=R:LET N=R+R*PEEK 23305:GO TO -9910:LET F=CODE "|067"+BD:GO TO -9940:LET F=CODE "|066":LET J=K:GO TO -9940:GO TO PZ:GO TO CODE "|080"
500 LET P=K:IF M=R THEN LET F=CODE "|073":GO TO -9920:LET P=L:GO TO 515
510 POKE 23553,SF:PRINT "|020|135|017|145|140|211|135|023|140|000|064|000|192|000|027|135|031|140|024|222|075|092|002|000|136";M$;N$ AND PEEK 23553;"|020|140|069|091|075|092|002|000|132|000|218|136";A$;"|020|150|084|243";
515 PRINT "|020|140|000|064|000|160|128|023|140|085|092|083|092|002|000|135|023|136";:LET C=CODE "|007":LET D=CODE "|015"
599 LET O=PEEK (55296+32*C+D):PRINT "|020|135|022|142|134|001|001|133|004|003|132|174|243|129|135|023|136":IF P THEN LPRINT 
600 POKE 25274,CODE "|066"+O:PRINT "|020|135|023|132|000|218|136|022|000|018|020|140|069|091|075|092|002|000|136";M$;"|020|135|023|150|084|243":LPRINT 
610 LET D=D-(D>L):STOP 
620 LET D=D+(D<CODE "|030"):STOP 
630 LET C=C-(C>L):GO TO 641
640 LET C=C+(C<CODE "|017")
641 IF PEEK 23559 THEN GO TO 612-PEEK 23559
641 STOP 
650 IF E THEN STOP 
651 PRINT "|020|135|022|147|226|249|135|023|136";:LET E=L:IF P AND O<CODE "|005" THEN GO TO 700+O
652 IF NOT P AND O<CODE "|011" THEN LET B=PEEK (60925+O):LET M=PEEK (60936+O):GO TO 8001
653 STOP 
699 LET E=K:STOP 
700 IF H<CODE "|091" AND G>= CODE "|008" THEN LET G=G-CODE "|008":LET H=H+CODE "|009":GO TO -8500
700 STOP 
701 IF G>= R THEN GO TO 720
701 STOP 
702 IF DB<CODE "|039" AND G>= INT PI  THEN LET G=G-INT PI :LET DB=DB+L:GO TO -8500:LET F=INT (DB/CODE "|008"):PRINT AT CODE "|021",CODE "|015"+F;"|020|150|108|243";DB-CODE "|008"*F
702 STOP 
703 IF DS<CODE "|039" AND G>= INT PI  THEN LET G=G-INT PI :LET DS=DS+L:GO TO -8500:LET F=INT (DS/CODE "|008"):PRINT #K;AT L,CODE "|015"+F;"|020|150|108|243";DS-CODE "|008"*F
703 STOP 
710 GO TO 8001
720 FOR Y=61249 TO 61261 STEP U:LET F=F AND PEEK Y>5:IF PEEK Y<CODE "|138" THEN NEXT Y
721 IF F THEN FOR Y=61249 TO 61261 STEP U:POKE Y,PEEK Y-CODE "|128":NEXT Y:LET G=G-R:GO TO -8500
725 STOP 
1000 IF SF AND M=CODE "|064" THEN LET SF=K:LET F=64734:GO TO -8700:FOR Y=CODE "|083" TO CODE "|085":LET F=Y:GO TO -9920:GO TO PZ:NEXT Y:LET B=14:GO TO 8001
1001 LET I=(M=CODE "|064")+(INT PI /R)*(M=R):LET N=K:LET J=K:LET W=K:LET O=-(M=R):LET SK=S*(BD+L)/CODE "|060":LET S=S*(BD+L)*CODE "|040":LET Q=K:LET P=K:LET F=CODE "|008" AND A>= CODE "|008":POKE 26297,CODE "|064"+F:POKE 26299,CODE "|192"+F:PRINT "|020|135|023|140|000|064|000|192|000|027|140|085|092|083|092|002|000|140|077|091|110|092|002|000|140|061|091|049|188|001|000|136":GO TO 1080
1008 IF PEEK LK=4 THEN IF H AND V<CODE "|009" THEN LET V=V+L:LET H=H-L:GO TO -8500:PRINT "|020|135|023|140|000|080|000|208|000|008|136";
1009 PRINT AT A,K;"|020|135|023|140|000|064|000|192|128|015|135|030|133|004|000|144|136":IF W THEN GO TO 1080+W
1010 LPRINT 
1020 IF B>D+4 THEN :LET B=B-0,5:PRINT "|020|151|171|185|183|135|030|143|133|004|004|131|128|169|185|129|136":CONTINUE 
1020 GO TO 1031
1030 IF O<2 AND PEEK 23328 THEN LET B=B+0,5:PRINT "|020|151|171|185|181|135|030|143|133|004|004|131|128|169|185|129|136":CONTINUE 
1031 IF O<2 THEN GO TO 1080
1060 LET F=PEEK LK>15:LET W=L+F+F:LET N=PEEK (48070+PEEK LK):POKE 47826,N+10+3*F:PRINT "|020|135|030|143|133|004|003|131|128|210|186|129|136":CONTINUE 
1080 PRINT "|020|151|171|185|183|151|169|185|002|135|030|143|133|004|004|131|128|169|185|129|136":LET B=PEEK 23386:CONTINUE 
1081 LET W=K:GO TO 1010
1082 LET P=P-L:LET W=W AND P>K:GO TO 1080
1083 LET B=PEEK 23386:LET B=B-(B>4-INT -D)*NOT N:POKE 47972,N:PRINT "|020|135|031|145|159|243|135|030|143|133|004|003|131|128|210|186|129|136":LET W=4:CONTINUE 
1084 PRINT "|020|135|031|140|000|192|000|064|128|023|135|030|143|133|004|003|131|128|210|186|129|136";AT A+N,B;"|020|135|030|134|002|000|133|001|002|128|100|187|141|135|023|140|000|064|000|192|128|023|136";AT A,K;"|020|135|030|133|004|000|144|136":LET W=K:IF (O<> L OR J<> N) AND B<6-INT -D-NOT N THEN GO TO 1400
1085 IF O=L AND J=N AND B<6-INT -D-NOT N THEN LET W=R:LET P=U:PRINT "|020|135|025|145|090|208|136"
1085 GO TO 1080
1150 IF O THEN GO TO 1180+O
1155 IF D+4<B THEN IF W<3 AND PEEK LK<16 THEN PRINT "|020|135|030|142|133|004|004|128|016|187|129|136":LET D=D+0,5:STOP 
1158 IF D+5<B THEN GO TO 1180
1160 IF W>2 THEN IF RND <0,8*SK+0,2 THEN GO TO 1190
1163 LET J=PEEK (N+23405+3*INT (RND *8)):POKE 47910,13+J+16*I:LET D=-INT -D:PRINT AT C,D+L;"|020|135|030|133|004|003|128|038|187|129|147|226|255|136":LET O=R:LET Q=U*(L-SK):LET Z=Z+L:STOP 
1179 IF M<> R THEN LET Q=Q-L:LET O=O AND Q>K AND RND >SK
1180 POKE 47888,R+U*I:LET D=-INT -D:PRINT "|020|135|030|142|133|004|004|128|016|187|129|136":STOP 
1181 LET O=W>R:IF O THEN GO TO 1190
1181 CONTINUE 
1182 POKE 47910,13+J+16*I:PRINT AT C,D+L;"|020|135|030|133|004|003|128|038|187|129|136":IF W>R AND RND <0,8*SK+0,2 THEN GO TO 1190
1182 LET Q=Q-L:LET O=R+(Q<L):STOP 
1183 PRINT AT C,D+L;"|020|135|030|133|004|003|128|038|187|129|136":LET D=D+(D+4<PEEK 23386)*NOT J:LET O=4:STOP 
1184 POKE 47972,J+3:PRINT AT C,D+L;"|020|135|030|133|004|003|128|038|187|129|136";AT C+J,D+L;"|020|135|030|134|253|255|133|001|002|128|100|187|141|135|023|140|000|064|000|192|128|023|136":LET O=-L:LET Q=K:IF (W<> L OR J<> N) AND PEEK 23386<D+6-NOT J THEN GO TO 1240
1185 IF W=L AND J=N AND PEEK 23386<D+6-NOT J THEN LET Q=CODE "|007"*(L-SK):PRINT "|020|135|025|145|090|208|136"
1185 STOP 
1190 POKE 47888,3+U*I:LET O=L:LET J=N:POKE 47910,10+J+16*I:PRINT AT C,D+L;"|020|135|030|133|004|003|128|038|187|129|136":STOP 
1240 LET W=K:GO TO -8600:PRINT "|020|135|023|140|000|064|000|192|128|023|136":PRINT AT A,K;"|020|135|025|145|192|022|135|030|133|004|000|144|136":LET D=-INT -D-NOT SGN PEEK 23328:LET B=-INT -B+SGN PEEK 23328:GO TO 1260
1250 LET F=D>L AND ATTR (C+INT PI ,D-L)=CODE "|007":LET B=-INT -B+NOT F:LET D=-INT -D-F
1260 POKE 47888,R+U*I:PRINT "|020|151|171|185|183|151|169|185|002|135|030|142|133|004|004|128|016|187|129|143|131|128|169|185|129|136":LET O=-(M=R):LET Q=K:STOP 
1400 OUT OB,R+U:PRINT "|020|135|025|145|192|022|135|030|136":LET S=S-XS-DS-CODE "|040":IF S>K THEN GO TO 1250
1410 LET W=K:POKE 63892,CODE "|005"+R*(M=CODE "|064")+INT PI *(M=R):PRINT "|020|151|171|185|183|151|169|185|002|135|030|142|134|000|255|133|003|003|128|148|249|129|135|030|143|133|004|004|128|169|185|129|135|031|140|000|064|000|192|000|024|136" AND M<> R;"|020|135|031|136";:LET E=K:LET N=U*PEEK 23554+PEEK (61110+M)+256*PEEK (61174+M):POKE 29216,9:POKE 29217,0:POKE 28784,CODE "|224":POKE N,PEEK N+CODE "|128":LET XS=XS+(XS<CODE "|039"):LET F=INT (XS/CODE "|008"):LET D=D-(D>L AND ATTR (C+INT PI ,D-L)=CODE "|007"):PRINT "|020|135|030|143|133|004|004|128|169|185|129|142|134|000|255|133|001|004|132|136|236|129|134|000|255|133|002|004|128|148|249|129|134|000|001|139|140|071|091|110|092|002|000|140|060|091|049|188|001|000|135|031|140|000|064|000|192|000|024|135|031|136";#K;AT K,CODE "|015"+F;"|020|150|094|243";XS-CODE "|008"*F:LET C=CODE "|100":IF M<> CODE "|064" THEN GO TO -8450:GO TO 3999
1450 PRINT "|020|135|025|140|075|202|042|091|018|000|151|041|091|001|136";:LET J=R:LET N=K:LET F=CODE "|077"+(BD>L):GO TO -9910:PRINT ,"|020|135|017|130|139|237|136" AND BD>L;:GO TO 1505
1500 GO TO -9920:PRINT "|020|135|017|140|255|201|042|091|018|000|151|041|091|001|136"
1505 BORDER K:GO TO PZ:PRINT "|020|135|023|136";:FOR Y=L TO CODE "|064":LET B=PEEK (61110+Y)+256*PEEK (61174+Y)
1515 LET D=PEEK B:IF D>193 THEN NEXT Y:PRINT "|020|140|067|091|083|092|002|000|136";:GO TO CODE "|010"
1520 IF D>127 THEN POKE B,D-128
1525 LET B=B+4:GO TO 1515
3999 PRINT "|020|140|085|092|083|092|002|000|140|085|092|007|091|002|000|136"
4010 LPRINT :GO TO Z
4020 IF PEEK 23327 THEN LET B=B+-0,5:PRINT "|020|135|016|143|133|004|004|131|128|192|185|129|136";:CONTINUE 
4020 GO TO 6999
4030 IF PEEK 23328 THEN LET B=B+0,5:PRINT "|020|135|016|143|133|004|004|131|128|223|185|129|136";:CONTINUE 
4030 GO TO 7049
4040 PRINT "|020|135|016|143|137|136";:IF PEEK 23325 THEN GO TO 5200
4041 IF PEEK 23559 THEN PRINT "|020|140|088|091|001|184|005|000|151|192|185|000|151|223|185|000|135|017|145|102|211|136";:LET Z=5500+100*W:POKE 28784,CODE "|032":LET T=L:GO TO Z
4050 GO TO 4800
4060 LET B=PEEK 23386:LET Z=7800:POKE 28784,CODE "|032":GO TO 7860
4200 PRINT "|020|151|192|185|000|151|223|185|000|140|027|184|202|186|001|000|135|016|143|131|137|133|004|004|128|202|186|129|140|088|091|001|184|005|000|136";:IF PEEK 23325 OR ATTR (A+4,B+1+W)<> 7 THEN CONTINUE 
4201 IF NOT PEEK 23329 THEN GO TO 6402+50*W
4210 GO TO 6490
4302 LET D=D+-0,5:PRINT "|020|135|016|133|001|003|142|128|116|187|129|136";:IF PEEK 23319 THEN STOP 
4303 IF PEEK 23321 THEN IF B<D+3 THEN GO TO 8629
4306 PRINT "|020|151|110|092|214|136";:LET D=-INT -D:POKE 47988,2+S:STOP 
4310 PRINT "|020|135|016|133|001|003|142|128|116|187|129|136";:LET D=D+0,5:IF PEEK 23320 THEN STOP 
4311 IF PEEK 23321 THEN IF D<B+4 THEN GO TO 8629
4314 PRINT "|020|151|110|092|204|136";:LET D=-INT -D:POKE 47988,S:STOP 
4400 PRINT "|020|135|016|133|001|002|132|198|254|140|100|091|136|092|002|000|140|098|091|132|092|002|000|129|134|000|000|135|022|149|134|255|255|148|134|001|000|140|132|092|098|091|002|000|140|136|092|100|091|002|000|136";:IF PEEK 23333 THEN PRINT "|020|140|100|091|104|091|002|000|140|098|091|102|091|002|000|135|022|128|116|187|129|140|085|091|110|092|002|000|136";:STOP 
4401 PRINT "|020|140|100|091|136|092|002|000|140|098|091|132|092|002|000|135|022|136";:IF PEEK 23333 THEN PRINT "|020|133|001|002|128|116|187|129|140|083|091|110|092|002|000|136";:STOP 
4402 IF PEEK 23336 THEN FOR Y=K TO BD:GO TO -8600:NEXT Y:PRINT "|020|135|017|145|192|022|140|071|091|110|092|002|000|136";:CONTINUE 
4404 PRINT "|020|140|102|091|098|091|002|000|140|104|091|100|091|002|000|140|100|091|136|092|002|000|140|098|091|132|092|002|000|135|022|133|001|002|128|116|187|129|140|083|091|110|092|002|000|135|016|136";:LET X=PEEK (X+RND *5+65420):POKE 29503,PEEK (65381+X):POKE 29502,PEEK (65389+X):STOP 
4500 PRINT "|020|135|016|133|001|001|132|198|254|140|100|091|136|092|002|000|140|098|091|132|092|002|000|129|134|000|000|135|022|149|140|132|092|098|091|002|000|140|136|092|100|091|002|000|136";:IF PEEK 23333 THEN PRINT "|020|140|100|091|104|091|002|000|140|098|091|102|091|002|000|135|016|128|119|255|135|022|129|136";:STOP 
4501 IF PEEK 23336 THEN LET D=33-PEEK 23396:LET C=24-PEEK 23397:IF D>= B THEN IF D<= B+3 THEN IF C>= A-1 AND C<= A+3 THEN GO TO -8600:PRINT "|020|135|017|145|192|022|136";
4501 PRINT AT C(O),D(O);"|020|135|016|133|004|003|132|088|244|129|134|000|002|132|134|249|133|002|002|129|136" AND X;"|020|135|022|147|205|249|135|016|133|001|001|128|119|255|140|104|091|136|092|002|000|140|102|091|132|092|002|000|135|022|139|134|000|000|129|136" AND PEEK 23335;"|020|151|110|092|150|136";:STOP 
4502 LET O=PEEK (23388+O):IF O(O) THEN PRINT AT C(O),D(O);"|020|135|016|133|004|003|132|042|239|129|134|000|002|132|198|249|133|002|002|129|151|110|092|151|135|017|136";:LET X=PEEK (O(O)+56*PEEK 23383+B):LET S=SK+SK:STOP 
4502 STOP 
4504 LET S=S-1:IF S AND S<> SK THEN STOP 
4504 IF S=SK AND X THEN PRINT AT C(O),D(O);"|020|135|016|140|241|184|144|186|002|000|140|241|184|119|255|002|000|140|144|186|122|186|001|000|133|004|003|128|122|186|129|136";:STOP 
4504 PRINT "|020|151|110|092|153|136";:STOP 
4505 IF X THEN PRINT AT C(O),D(O);"|020|135|022|147|239|255|135|016|133|004|003|128|144|186|129|151|110|092|148|136";AT C(O)+PEEK (65365+X)-2,D(O)+PEEK (65373+X)-2;"|020|140|132|092|098|091|002|000|140|136|092|100|091|002|000|136";:POKE 29854,PEEK (65381+X):POKE 29853,PEEK (65389+X):STOP 
4506 PRINT "|020|151|110|092|150|136";:STOP 
4600 PRINT "|020|135|016|133|001|001|132|198|254|140|100|091|136|092|002|000|140|098|091|132|092|002|000|129|134|000|255|135|022|149|140|132|092|098|091|002|000|140|136|092|100|091|002|000|136";:IF PEEK 23333 THEN PRINT "|020|140|100|091|104|091|002|000|140|098|091|102|091|002|000|132|234|243|135|022|129|136";:STOP 
4600 PRINT "|020|151|110|092|249|136";:STOP 
4601 IF PEEK 23336 THEN LET X=CODE "|033"-PEEK 23396:IF X>= B AND X<= B+3 THEN GO TO -8600:PRINT "|020|135|017|145|192|022|136";
4602 PRINT AT C(L),D(L);"|021|001|019|000|128|128|128|128|020|135|016|134|004|255|136|128|128|128|128|020|134|004|255|136|128|128|128|128|020|134|004|002|133|004|004|132|198|254|129|151|110|092|251|136":LET C=R+INT (RND *8):LET D=R+INT (RND *17):LET C(L)=C:LET D(L)=D:LET O=5:STOP 
4603 LET S=D<B:LET N=D+3*S:POKE 48022,S:POKE 48030,S:PRINT "|020|135|022|147|239|255|135|016|142|136|021|001|128|019|001|128|128|020|134|002|255|136|128|128|020|134|002|255|136|128|128|020|134|003|002|133|004|004|128|150|187|129|136";AT C+L,N-S;"|020|133|001|002|128|158|187|129|136";AT C+L,N;"|020|140|132|092|098|091|002|000|140|136|092|100|091|002|000|151|110|092|252|136":LET X=SGN (B-D) AND ABS (D-B)>6:POKE 30568,PEEK (65394+X):POKE 30569,PEEK (65397+X):STOP 
4605 LET O=O-L:IF O THEN STOP 
4605 PRINT "|020|135|016|142|133|004|004|128|150|187|129|151|110|092|248|136":STOP 
4800 PRINT "|020|135|016|143|137|135|023|136";:IF PEEK 23325 THEN GO TO 5200
4801 IF A>13 THEN LET F=PEEK (60861+M):IF B>= F AND B<= F+4 THEN LET F=PEEK (60798+M):IF F THEN LET M=F:PRINT "|020|135|017|145|000|016|136":GO TO 8001
4805 IF PEEK LK=4 THEN IF H AND V<9 THEN LET V=V+L:LET H=H-L:GO TO -8500
4810 GO TO 4200
5100 LPRINT 
5120 LET W=PEEK 23559=L:LET N=B+R*W-NOT W:LET F=INT (A+0,5):IF ATTR (F,N)+ATTR (F+L,N)+ATTR (F+R,N)+ATTR (F+L+R,N)=28 THEN LET A=F:LET Q=CODE "|010":LET Z=5250+W*CODE "|010":LET T=K
5122 CONTINUE 
5130 IF PEEK 23330 AND A>K THEN LET A=A-0,25:PRINT "|020|151|141|185|161|135|016|143|133|004|002|131|128|139|185|129|134|000|255|133|001|002|132|198|254|129|136";:CONTINUE 
5130 GO TO 5198
5140 IF PEEK 23331 THEN LET A=A+0,25:PRINT "|020|151|141|185|159|135|016|143|134|000|001|133|001|002|132|198|254|129|134|000|255|133|004|002|131|128|139|185|129|136";:CONTINUE 
5198 PRINT "|020|151|141|185|160|135|016|143|133|004|002|131|128|139|185|129|136";:CONTINUE 
5200 LET F=PEEK 23325:PRINT "|020|151|139|185|000|151|141|185|161|136";:LET A=A-0,25:LET B=-INT -B+F-L:POKE 28784,CODE "|032":LET T=L:LET Q=CODE "|010":LET Z=5200+F:GO TO Z
5201 PRINT "|020|135|016|143|133|004|003|132|004|224|129|134|253|002|133|004|001|132|198|254|129|136":LET Q=Q-L:IF Q THEN CONTINUE 
5201 LET Z=5100:PRINT "|020|135|016|143|133|004|002|128|139|185|131|129|134|254|002|133|004|001|132|198|254|129|136":CONTINUE 
5202 PRINT "|020|135|016|143|134|001|000|133|004|001|132|198|254|129|134|255|002|133|004|002|128|139|185|131|129|134|254|002|133|004|001|132|198|254|129|136":LET Z=5100:CONTINUE 
5203 PRINT "|020|135|016|143|134|002|000|133|004|001|132|198|254|129|134|255|002|133|004|003|132|196|224|129|136":LET Q=Q-L:IF Q THEN CONTINUE 
5203 LET Z=5100:PRINT "|020|135|016|143|134|001|000|133|004|001|132|198|254|129|134|255|002|133|004|002|128|139|185|131|129|136":CONTINUE 
5250 PRINT "|020|135|016|143|134|001|000|133|004|003|132|132|225|129|136":LET Q=Q-L:IF Q THEN CONTINUE 
5251 LET B=B-R-L:IF ATTR (A+U,B)=CODE "|007" THEN POKE 47802,W+R:PRINT "|020|135|016|143|133|004|004|128|186|186|131|129|134|252|002|133|004|002|132|198|254|129|136":GO TO 6000
5252 PRINT "|020|135|016|143|133|004|004|131|132|028|204|129|134|252|002|133|004|002|132|198|254|129|136":GO TO 6000
5260 PRINT "|020|135|016|143|133|004|003|132|068|226|129|136":LET Q=Q-L:IF Q THEN CONTINUE 
5261 IF ATTR (A+U,B+R)=CODE "|007" THEN POKE 47802,W+R:PRINT "|020|135|016|143|133|004|001|132|198|254|129|134|255|002|133|004|004|128|186|186|131|129|136":LET B=B+L:GO TO 6000
5262 PRINT "|020|135|016|143|133|004|001|132|198|254|129|134|255|002|133|004|004|131|132|204|211|129|136":LET B=B+L:GO TO 6000
5500 PRINT "|020|135|016|143|134|001|001|131|136";:LET Q=(A>L) AND PEEK 23324:POKE 47605,Q*8:PRINT "|020|143|133|004|004|128|245|185|131|129|136";:LPRINT 
5501 LET A=A-L:PRINT "|020|135|016|143|133|004|004|128|245|185|131|129|134|000|255|133|001|004|132|198|254|129|136";:LPRINT 
5502 IF Q THEN GO TO 5501
5505 PRINT "|020|135|016|143|133|004|004|128|245|185|131|129|136";:LPRINT 
5506 IF NOT Q THEN GO TO 5505
5507 IF PEEK 23329 OR A<1 THEN PRINT "|020|135|016|143|133|001|004|132|198|254|129|134|000|255|133|004|004|128|245|185|131|129|136";:LET A=A+L:LPRINT 
5508 GO TO 5608
5592 LET Z=Z+1:IF PEEK 23559<> 2 THEN CONTINUE 
5593 IF PEEK 23327 THEN LET B=B-1:PRINT "|020|135|016|143|131|136";:CONTINUE 
5595 GO TO 7000
5600 PRINT "|020|135|016|143|134|255|000|131|136";:LET Q=(A>L) AND PEEK 23324:POKE 47660,Q*8:PRINT "|020|143|133|004|004|128|044|186|131|129|136";:LPRINT 
5601 LET A=A-L:PRINT "|020|135|016|143|133|004|004|128|044|186|131|129|134|000|255|133|001|004|132|198|254|129|136";:LPRINT 
5602 IF Q THEN GO TO 5601
5605 PRINT "|020|135|016|143|133|004|004|128|044|186|131|129|136";:LPRINT 
5606 IF NOT Q THEN GO TO 5605
5607 IF PEEK 23329 OR A<1 THEN PRINT "|020|135|016|143|133|001|004|132|198|254|129|134|000|255|133|004|004|128|044|186|131|129|136";:LET A=A+1:LPRINT 
5608 PRINT "|020|135|016|143|131|136";:LET T=K:GO TO 6000
5692 LET Z=Z+1:IF PEEK 23559<> 1 THEN CONTINUE 
5693 IF PEEK 23328 THEN LET B=B+1:PRINT "|020|135|016|143|131|136";:CONTINUE 
5695 GO TO 7050
6000 LET A=-INT -A:POKE 28793,250-16*W:POKE 28853,234+16*W:POKE 28784,224:IF PEEK 23329 THEN GO TO 6490
6010 IF E=3 THEN IF C=A AND B>D THEN GO TO 8999
6025 GO TO 4200
6400 PRINT "|020|135|016|143|137|136":IF PEEK 23325 THEN PRINT "|020|151|031|091|001|151|033|091|000|136";:GO TO 4020
6400 IF ATTR (A+4,B+3)=7 THEN GO TO 6490
6402 LET A=A+L:LET B=B-L:PRINT "|020|135|016|143|133|004|004|128|192|185|128|192|185|131|129|133|001|004|134|255|003|132|198|254|129|133|004|001|134|253|255|129|136":GO TO 6480
6450 PRINT "|020|135|016|143|137|136":IF PEEK 23325 THEN PRINT "|020|151|032|091|001|151|033|091|000|136";:GO TO 4030
6450 IF ATTR (A+4,B)=7 THEN GO TO 6490
6452 LET A=A+L:LET B=B+L:PRINT "|020|135|016|143|133|004|004|128|223|185|128|223|185|131|129|133|001|004|134|001|004|132|198|254|129|133|004|001|134|000|255|129|136"
6480 IF NOT PEEK 23329 THEN CONTINUE 
6490 LET Z=6500:POKE 28784,CODE "|032":LET B=-INT -B+NOT INT B:PRINT "|020|135|016|143|137|136";:IF PEEK 23325 THEN GO TO 5200
6504 IF PEEK 23329 THEN PRINT "|020|140|027|184|186|186|001|000|135|016|143|133|005|004|128|186|186|129|134|000|003|131|136";:LET A=A+L:CONTINUE 
6505 IF ATTR (A+U,B+L)=66 THEN IF A=PEEK 23451 THEN IF B>= PEEK 23452 AND B<= PEEK 23453 THEN FOR Y=K TO BD:GO TO -8600:NEXT Y
6506 PRINT "|020|135|017|145|000|016|136":GO TO 6000
6999 IF PEEK 23329 THEN GO TO 6400
6999 IF W THEN LET W=K:POKE 28793,250:POKE 28853,234:GO TO 4200
7000 PRINT "|020|135|023|136";:IF B<1 THEN LET M=PEEK (60672+M):LET B=CODE "|028":GO TO 8000
7000 IF ATTR (A+1,B-1)=112 THEN LET P=ATTR (A+R,B-L)-CODE "|066":LET N=-INT -B-R:GO TO 7400
7010 IF NOT PEEK (60672+M) THEN IF A>13 AND B<11 THEN GO TO 7100
7020 IF PEEK 23324 THEN IF NOT (T AND Q) AND A>1 THEN LET A=A-1:LET B=B-1:PRINT "|020|135|016|143|133|004|004|128|192|185|128|192|185|131|129|133|001|004|134|255|254|132|198|254|129|133|004|001|134|253|003|129|136":LET T=K:POKE 28784,224:CONTINUE 
7020 IF T THEN CONTINUE 
7020 GO TO 4200
7049 IF PEEK 23329 THEN GO TO 6450
7049 IF NOT W THEN LET W=L:POKE 28793,234:POKE 28853,250:GO TO 4200
7050 PRINT "|020|135|023|136";:IF B>27 THEN LET M=PEEK (60735+M):LET B=K:GO TO 8000
7050 IF ATTR (A+1,B+4)=112 THEN LET P=ATTR (A+R,B+U)-CODE "|066":LET N=U-INT -B:GO TO 7400
7060 IF NOT PEEK (60735+M) THEN GO TO 7070
7063 IF PEEK 23324 THEN IF NOT (T AND Q) AND A>1 THEN LET A=A-1:LET B=B+1:PRINT "|020|135|016|143|133|004|004|128|223|185|128|223|185|131|129|133|001|004|134|001|255|132|198|254|129|133|004|001|134|000|003|129|136":LET T=K:POKE 28784,224:CONTINUE 
7063 IF T THEN CONTINUE 
7065 GO TO 4200
7070 IF M=63 AND A<8 THEN LET M=M+L:LET F=63986:GO TO -8700:GO TO 8000
7070 IF A>13 AND M<> 63 THEN GO TO 7100
7070 GO TO 7063
7101 IF M=CODE "|009" THEN LET F=DF:LET G=G+CODE "|050"*(F=CODE "|075")*(G<950):LET DF=CODE "|076":GO TO 7140
7102 IF M=CODE 0 THEN GO TO 7130
7103 IF M=CODE "|054" THEN IF W THEN LET F=CODE "|086":GO TO 7140
7104 IF M=CODE "|015" THEN IF SF THEN GO TO 7200
7104 IF M=CODE "|015" THEN GO TO 7020
7109 GO TO -9000:GO TO 500
7130 IF SF THEN LET F=CODE "|081":GO TO 7140
7130 IF G>CODE "|099" THEN LET SF=L:LET G=G-CODE "|100":LET F=CODE "|080":GO TO 7140
7130 LET F=CODE "|079"
7140 GO TO -8500:GO TO -9920:GO TO PZ:PRINT "|020|135|031|140|000|192|000|064|000|027|136";:GO TO 7020
7200 LET F=CODE "|072":GO TO -9920:LET C=PEEK 23358:LET S=62136+C*CODE "|006":PRINT "|020|140|085|092|083|092|002|000|136";
7201 FOR Y=PEEK (61110+PEEK S)+256*PEEK (61174+PEEK S) TO 61909 STEP U:LET F=F AND PEEK Y>5:IF PEEK Y<138 THEN NEXT Y
7201 LET S=S+L:IF PEEK S THEN STOP 
7202 IF NOT F THEN GO TO 7210
7203 LET C=PEEK (62129+C):POKE 23358,C:LET S=62136+C*CODE "|006"
7204 FOR Y=PEEK (61110+PEEK S)+256*PEEK (61174+PEEK S) TO 61909 STEP U:LET D=PEEK Y:IF D<138 THEN POKE Y,D-128*(D>128):NEXT Y
7204 LET S=S+L:IF PEEK S THEN GO TO 7204
7210 POKE 35226,CODE "|068"+C:PRINT "|020|135|023|132|000|218|140|069|091|075|092|002|000|136";M$;"|020|135|023|150|084|243":GO TO PZ:PRINT "|020|135|031|140|000|192|000|064|000|027|140|007|091|083|092|002|000|136";:GO TO 7020
7400 LET G=G+CODE "|010"*(G<990):PRINT AT A+L,N;"|020|135|023|150|064|243";"|020|135|016|133|002|002|134|002|001|132|198|254|129|135|022|147|178|249|135|023|136";:LET N=U*P+PEEK (61110+M)+256*PEEK (61174+M):POKE N,CODE "|128"+PEEK N:LET O(P+L)=K:GO TO -8500:STOP 
7510 PRINT AT A+PEEK (65334+P),B+PEEK (65342+P);"|020|135|023|140|000|160|000|192|128|023|140|000|064|000|160|128|023|140|085|092|083|092|002|000|135|016|140|217|184|166|186|001|000|134|001|000|133|003|003|128|166|186|136";:POKE 35629,PEEK (65358+P):POKE 35630,PEEK (65350+P):LET Z=22528+B+32*A+PEEK (65326+P):LET J=PEEK (65302+P)-33
7520 LET Z=Z+J:IF PEEK Z<8 THEN PRINT "|020|134|001|002|128|166|186|138|136";:STOP 
7530 PRINT "|020|140|007|091|083|092|002|000|136";:LET J=Z-J:LET Q=INT ((Z-22528)/32):LET N=Z-(22528+32*Q):LET I=INT ((J-22528)/32):LET J=J-(22528+32*I)-(P>4):IF Z>22527 THEN IF NOT P OR (P>3 AND J>B) OR (P<4 AND B>= J) THEN IF (J<30) AND J THEN GO TO 7605
7601 PRINT "|020|135|023|140|000|160|000|064|128|023|140|000|192|000|160|128|023|136";:GO TO 7700
7605 FOR Y=1 TO 5:IF Q>= C(Y) THEN IF N>= D(Y) THEN IF Q<= C(Y)+3 THEN IF (N<= D(Y)+2) AND C(Y) THEN PRINT "|020|135|017|145|192|022|135|023|140|000|160|000|064|128|023|140|000|192|000|160|128|023|136";:GO TO 7620
7610 NEXT Y:PRINT "|020|135|022|147|205|249|135|023|136";:IF PEEK 23450>252 THEN IF ATTR (Q,N)=CODE "|070" THEN GO TO 7920
7611 IF PEEK 23450=254 THEN IF PEEK Z=CODE "|104" THEN PRINT "|020|135|023|140|000|192|000|160|128|023|135|016|134|000|002|139|134|000|001|136|016|007|021|001|128|128":GO TO 7700
7611 PRINT "|020|135|023|140|000|192|000|160|128|023|135|016|134|000|002|139|136";:IF PEEK Z=CODE "|120" THEN POKE Z,CODE "|080":LET F=PEEK 23450:POKE 23450,K:IF Q=PEEK (23451+F) AND N=PEEK (23455+F) THEN POKE 23450,F+L:IF F=INT PI  THEN GO TO 7910
7611 IF PEEK 23450=253 THEN GO TO 7900
7612 GO TO 7700
7620 BORDER R+U:LET N=PEEK (23450+Y)+BD-3-(XB+DB)/(5*(BD+L)):BORDER K:IF N>K THEN POKE 23450+Y,N:GO TO 7700
7621 LET N=U*(Y-L)+PEEK (61110+M)+256*PEEK (61174+M):IF M=59 THEN GO TO 7730
7630 IF O(Y) OR M=R THEN PRINT AT C(Y),D(Y);"|020|135|016|133|004|002|132|198|254|129|135|023|150|028|243" AND M=R;"|020|135|022|133|004|003|132|254|235|129|134|000|003|139|135|023|150|028|243" AND M<> R:POKE N,PEEK N+CODE "|128":LET O(Y)=K:LET X=K:IF XB<CODE "|039" THEN LET XB=XB+L/R:IF XB=INT XB THEN LET F=INT (XB/U/R):PRINT AT CODE "|020",CODE "|015"+F;"|020|150|094|243";XB-F*R*U
7700 PRINT AT A-L,B;"|020|151|192|185|000|151|223|185|000|140|027|184|202|186|001|000|135|016|133|001|004|132|198|254|129|134|000|255|131|137|133|004|004|128|202|186|129|136":CONTINUE 
7730 LET O(Y)=O(Y)-XB-DB:IF O(Y)>K THEN GO TO 7700
7731 POKE N,PEEK N+CODE "|128":PRINT "|020|135|016|142|133|004|004|132|198|254|129|140|000|064|000|160|128|023|135|017|145|192|022|136";:FOR Y=C TO 14:PRINT AT Y,D;"|021|001|019|000|128|128|128|128|020|135|016|134|004|000|133|001|004|132|198|254|129|134|000|255|133|004|004|128|150|187|129|135|022|147|196|255|136";:OUT 65533,PI +PI :OUT 49149,RND *CODE "|032":NEXT Y:PRINT "|020|135|017|145|192|022|135|016|140|198|254|000|088|001|000|140|000|088|001|088|127|002|135|017|145|192|022|136";:GO TO 8001
7810 LPRINT 
7850 PRINT "|020|135|016|140|217|184|102|186|001|000|143|134|000|001|133|004|004|128|102|186|129|135|017|145|250|205|135|016|136";:POKE 28784,CODE "|224":GO TO 7500
7860 PRINT "|020|135|016|136";:LET P=PEEK (65294+PEEK 23560):IF P=8 THEN LET P=R+U*W
7860 PRINT "|020|135|016|140|217|184|082|186|001|000|143|134|000|001|133|005|004|128|082|186|129|136";:CONTINUE 
7870 GO TO 7850
7900 IF ABS (C-Q)>U OR ABS (D-N)>U THEN GO TO 7700
7901 PRINT "|020|135|022|151|130|249|000|136";:LET S=SGN (D-N):LET O=K:IF NOT S OR ATTR (C,D+S+(S>K))<> CODE "|007" THEN LET S=K:LET O=SGN (C-Q):PRINT "|020|151|130|249|002|136";
7902 FOR Y=K TO CODE "|030":IF ATTR (C+O+(O>K),D+S+(S>K))=CODE "|007" THEN LET C=C+O:LET D=D+S:PRINT "|020|135|016|142|135|022|134|001|001|133|004|004|128|130|249|129|136":NEXT Y
7903 IF ATTR (C,D-L)=CODE "|120" THEN PRINT "|020|135|016|142|133|002|002|132|198|254|129|136":LET Q=C:LET N=D-R:GO TO 7910
7905 GO TO 7700
7910 LET Q=PEEK 23459:PRINT "|020|135|017|145|000|016|136";:IF Q<14 THEN FOR Y=Q TO Q+U*R:PRINT AT Y,PEEK 23460;"|016|007|017|000|019|000|128|128|008|008|020|135|016|133|001|002|132|230|254|139|134|000|000|129|136":NEXT Y:GO TO 7700
7911 IF PEEK 23450>CODE "|252" THEN FOR Y=Q TO Q+U:PRINT AT Y,PEEK 23460;"|016|007|017|000|019|000|128|008|020|135|016|133|001|001|132|006|255|139|134|000|000|129|136":NEXT Y:GO TO 7700
7912 PRINT "|020|135|023|136":LET F=PEEK (61110+M)+256*PEEK (61174+M):PRINT AT Q,PEEK 23460;"|020|150|226|242";"|020|135|022|132|188|239|134|003|005|133|006|001|141|134|000|005|139|134|255|004|141|134|000|005|139|132|028|240|134|255|004|141|134|000|005|139|135|023|136" AND PEEK F<> CODE "|192":POKE F,CODE "|192":GO TO 7700
7920 PRINT AT Q,N;"|020|135|023|140|000|160|000|064|128|023|140|000|192|000|160|128|023|136|016|007|019|000|128|020|135|016|133|001|001|132|006|255|134|001|000|141|134|000|000|139|136":LET F=PEEK 23451:LET F=F-L+R*(ATTR (Q,N-CODE "|015")=CODE "|006"):POKE 23451,F:IF NOT F THEN GO TO 7910
7920 GO TO 7700
8000 IF M>54 THEN PRINT "|020|135|023|136":LET A=PEEK (60891+9*W+M)
8005 LET C=100:LET O=K:LET E=K:POKE 28947,CODE "|250":PRINT "|020|135|023|140|037|238|134|184|056|000|140|000|064|000|192|000|027|151|002|092|000|140|060|091|049|188|001|000|135|023|136|022|000|000";:LET N=PEEK (61110+M)+256*PEEK (61174+M):POKE 38024,PEEK (60544+M):POKE 38025,PEEK (60608+M):POKE 38022,PEEK (60480+M)
8010 PRINT "|020|135|020|130|000|000|140|000|064|000|160|128|023|140|085|092|083|092|002|000|135|031|136";:GO TO PEEK N
1 LET O=O+1:LET C(O)=PEEK (N+L):LET D(O)=PEEK (N+R):PRINT AT C(O),D(O);"|020|135|031|132|093|236|136|019|001|017|006|016|000|064|065";INK O+L;"|020|134|002|255|136|017|000|066|067|020|135|031|136";:LET N=N+4:GO TO PEEK N
2 LET O=O+1:LET C(O)=PEEK (N+L):LET D(O)=PEEK (N+R):PRINT AT C(O),D(O);"|020|135|030|132|142|241|136|019|001|016|007|064|065|020|134|002|255|136|066|067|020|135|031|136";:LET N=N+4:GO TO PEEK N
3 LET O=O+1:LET C=PEEK (N+1):LET D=PEEK (N+2):LET C(O)=C:LET D(O)=D:LET O(O)=64304-56*C-D:PRINT "|020|135|024|133|004|003|132|042|239|142|129|135|031|134|255|001|136|021|001|019|001|128|020|134|002|255|136|128|128|128|020|134|002|255|136|128";:LET N=N+4:LET E=2:GO TO PEEK N
4 LET O=O+L:IF NOT E THEN LET C=PEEK (N+L):LET D=PEEK (N+R):LET S=PEEK (N+INT PI ):POKE 23554,O-L:POKE 47888,R+U*(M=CODE "|064")+CODE "|006"*(M=R):PRINT "|020|135|030|142|133|004|004|128|016|187|129|135|031|136":LET E=INT PI :IF M=CODE "|064" THEN IF SF THEN PRINT "|020|135|030|140|220|252|075|092|002|000|136";A$;"|020|135|031|150|084|243"
4 LET N=N+U:GO TO PEEK N
5 LET C(L)=CODE "|009":LET D(L)=CODE "|018":LET O(L)=1000+1000*BD:PRINT AT C(L),D(L);"|021|001|128|019|001|128|128|020|151|150|187|000|151|158|187|000|134|002|255|136|128|128|020|135|024|134|002|001|133|004|004|128|150|187|129|136";AT 14,K;"|020|135|030|132|226|241|136|016|006|017|003|019|001|064|020|134|001|255|136|064|020|134|001|255|136|064|020|134|001|255|136|064|020|134|001|255|136|064";AT 14,CODE "|024";"|064|020|134|001|255|136|064|020|134|001|255|136|064|020|134|001|255|136|064|020|134|001|255|136|064|020|135|031|136":LET B=L:LET N=N+U:LET E=U:GO TO PEEK N
6 IF NOT E THEN LET C=PEEK (N+L):LET D=PEEK (N+R):LET S=4 AND ATTR (C+L,D)=CODE "|007":POKE 47988,3+S:PRINT "|020|135|024|142|133|001|003|128|116|187|129|135|031|136";:LET E=L
6 LET N=N+U:GO TO PEEK N
7 IF NOT E THEN LET C=PEEK (N+L):LET D=PEEK (N+R):LET S=22528+C*CODE "|032"+D:PRINT "|020|151|116|187|009|135|030|142|140|132|092|098|091|002|000|140|136|092|100|091|002|000|140|100|091|104|091|002|000|140|098|091|102|091|002|000|135|031|136";:LET X=L+INT (RND *U*R):LET E=CODE "|005"
7 LET N=N+U:GO TO PEEK N
8 LET C=PEEK (N+L):LET D=PEEK (N+R):PRINT "|020|135|030|133|004|004|142|134|001|001|132|006|242|129|135|031|136":LET N=N+U:GO TO PEEK N
9 PRINT AT PEEK (N+L),PEEK (N+R);"|020|135|030|133|005|005|132|188|240|129|135|031|136":LET N=N+U:GO TO PEEK N
10 PRINT "|020|150|122|243" AND NOT E AND SF
191 LET O=O+L:LET N=N+U:GO TO PEEK N
192 LET O=O+L:PRINT AT PEEK (N+L),PEEK (N+R);"|020|150|226|242";"|020|135|030|132|188|239|134|003|005|133|006|001|141|134|000|005|139|134|255|004|141|134|000|005|139|132|028|240|134|255|004|141|134|000|005|139|135|031|136":LET N=N+U:GO TO PEEK N
255 POKE 39328,PEEK N:POKE 39327,PEEK (N+1):PRINT "|020|135|028|140|000|000|154|091|011|000|135|024|143|131|151|192|185|000|151|223|185|000|140|088|091|001|184|005|000|135|031|136";:LET O=L:GO TO 256+E
256 PRINT "|020|140|071|091|110|092|002|000|140|067|091|083|092|002|000|136";:POKE 29216,9:POKE 29217,0:GO TO 3999
257 PRINT "|020|140|073|091|110|092|002|000|140|067|091|083|092|002|000|136";:POKE 29216,9:POKE 29217,0:GO TO 3999
258 PRINT "|020|140|075|091|110|092|002|000|140|067|091|083|092|002|000|136";:POKE 29216,92:POKE 29217,2:LET SK=(INT PI -BD)*U*R-U:GO TO 3999
259 IF C=A AND B>D THEN GO TO 8999
259 GO TO 256
260 GO TO 8400
261 PRINT "|020|140|081|091|110|092|002|000|140|067|091|083|092|002|000|136";:POKE 29216,253:POKE 29217,0:GO TO 3999
8400 IF MF THEN PRINT "|020|140|079|091|110|092|002|000|140|067|091|083|092|002|000|136";:POKE 29216,39:POKE 29217,5:POKE 28947,CODE "|234":GO TO 3999
8401 GO TO -8450:PRINT "|020|135|016|133|004|004|128|202|186|129|136":LET MF=L:LET F=CODE "|082":GO TO -9920:GO TO -9000:GO TO PZ:GO TO 8001
8450 POKE 28793,250-16*W:POKE 28853,234+16*W:POKE 28784,224:PRINT "|020|151|192|185|000|151|223|185|000|140|027|184|202|186|001|000|135|016|143|131|137|140|088|091|001|184|005|000|136";:RETURN 
8500 PRINT "|020|135|023|132|000|218|136";AT 21,7;"|048" AND G<100;"|048" AND G<10;G;#K;AT 1,3;V;AT 1,7;"|048" AND (H<10);H;:RETURN 
8600 LET V=V-L:OUT OB,R:IF V THEN GO TO 8500
8601 IF E=INT PI  THEN PRINT "|020|135|030|136";:POKE 47888,R+U*I:LET D=-INT -D:PRINT "|020|135|030|142|133|004|004|128|016|187|129|136";
8602 IF NOT T THEN LET W=L+W+W:PRINT "|020|135|022|143|134|000|001|133|005|004|140|027|184|148|249|001|000|128|148|249|129|136";"|020|143|128|148|249|129|135|023|140|000|064|000|192|128|023|136" AND  ACS K* ACS K* ACS K;
8620 PRINT "|020|140|067|091|083|092|002|000|140|063|091|075|092|002|000|136";:LET F=CODE "|071":GO TO 1500
8629 FOR Y=K TO BD:GO TO -8600:NEXT Y:PRINT "|020|135|017|145|192|022|135|016|133|001|003|132|198|254|142|129|140|071|091|110|092|002|000|136";:CONTINUE 
8710 PRINT AT K,K;"|020|135|023|140|000|064|000|192|000|027|135|030|133|006|000|144|136":FOR Y=CODE "|065" TO CODE "|079":POKE 40444,Y:PRINT AT L,K;"|020|135|030|140|051|184|075|092|002|000|133|016|000|144|136"
8720 PRINT A$;Z$;"|020|135|023|140|000|064|000|192|000|027|150|084|243":NEXT Y:RETURN 
8999 GO TO -9000:GO TO 1000
9000 PRINT "|020|140|067|091|083|092|002|000|136";:RETURN 
9900 IF INKEY$ <> "" THEN GO TO 9900
9905 POKE 23560,INT CODE INKEY$ :PRINT "|020|140|063|091|075|092|002|000|135|017|146|136";:IF NOT INT PEEK LK THEN GO TO 9901
9906 PRINT "|020|135|017|140|223|201|042|091|018|000|146|146|151|041|091|000|135|022|147|226|249|135|023|136";:LET F=PEEK LK-CODE "|049":IF F=-CODE "|036" THEN POKE LK,CODE "|064"
9908 RETURN 
9910 PRINT "|020|135|023|140|000|064|000|192|000|027|135|031|136";:GO TO 9940
9920 PRINT "|020|135|022|147|226|249|135|023|140|000|064|000|192|000|027|135|031|136";
9930 LET N=K:LET J=R
9940 PRINT "|020|140|022|222|054|092|002|000|136";:POKE 40829,J:POKE 40832,F:POKE 40822,PEEK (N+56833):POKE 23627,PEEK (N+56832)
9941 POKE 23628,CODE "|065":PRINT #CODE "|065";A$;:PRINT "|020|140|063|091|075|092|002|000|136";:RETURN 
9984 STOP 

LISTADO BASIC (SIMBOLICO)
------------------------

LAS ETIQUETAS Y BYTES INSERTADOS ESTÁN PRECEDIDAS POR ° (VER DEFINICION ABAJO EN EL APARTADO DATA BLOCKS)
CODIGO AUTOMODIFICANTE INDICADO POR |  POR EJEMPLO, POKE 5|34 SIGNIFICA DIRECCION DE LA LINEA 5 MAS 34 BYTES=23966
GOTO PRECEDIDO CON _ EQUIVALE A GOSUB

1 BORDER K: PRINT "°LSE°LDI°LXT_DEPLOY_INI°LXT_DEPLOY_DES°LXT_DEPLOY_LNG°FIN";: LET A=PEEK 65535 - CODE "°65": IF A GRQ K AND A LEQ R THEN LET F=A: GOTO PI+R   
2 GOTO O: LET F=CODE "A": GOTO M 
4 GOTO W: IF F<K OR F>R THEN GOTO PI
5 POKE D,F: POKE 5|34,CODE "°65"+F: PRINT "°LSE°LDI°LXT_SWITCHDW°VARS°002°000°FIN";A$: IF F=R THEN PRINT "°LSE°PAG°017°LDI°LX_RUSS_GFX°PANTFONDO°LX_RUSS_GFXL°PAG°023°LDI°LX_RUSS_OA°LX_RUSS_DA°LX_RUSS_LA°PAG°019°LDI°LX_RUSS_OB°LX_RUSS_DB°LX_RUSS_LB°PAG°020°LDI°LX_RUSS_OC°LX_RUSS_DC°LX_RUSS_LC°FIN"
10 PRINT "°LSE°PAG°017°LDI°LXMUSMEND°LXMUSCNT°018°000°POK°LX_MUS_ON°001°FIN";: LET F=CODE "B":LET J=R:LET N=R*U:GOTO _9910:LET F=CODE  "W":LET J=K:LET N=K:GOTO _9940
11 LET F=CODE "B":GOTO _9930
12 GOTO PZ: IF F<K OR F>PI THEN GOTO CODE  "°12"
13 IF NOT F THEN GOTO CODE "°80"
15 IF F=R THEN GOTO CODE "°30"
16 IF F=INT PI THEN LET F=CODE "F":GOTO _9930: GOTO PZ: GOTO CODE "°11"
17 LET F=CODE "E":GOTO _9930
20 GOTO PZ:IF F<K OR F>R THEN GOTO CODE "°20"
20 LET BD=F:GOTO CODE "°11"
30 LET F=CODE "C":GOTO _9930
31 GOTO PZ:IF F<K OR F>U THEN GOTO CODE "°31"
32 PRINT "°LSE°PAG°023°POK°LX_KEMPSWI°048°FIN";: IF F=INT PI THEN POKE °LX_KEMPSWI,CODE "°047": GOTO CODE "°11"
32 IF F<INT PI THEN LET A=°LX_CTDFLT+CODE "°5"*F: GOTO CODE "°70"
33 LET F=CODE "D":GOTO _9940: PRINT "°LSE°LDI°ROM_CEROS°CTRL_IZQ°007°000°FIN": FOR Y=K TO R+U: PRINT AT R+U+Y+Y,CODE "°15"; "°018°001 °008°LSE°PAG°023°FIN";
42 GOTO PZ: LET A=23296: LET F=PEEK LK: POKE 50|02,F: LET F=F+(CODE "°31" AND F=CODE "°32"): IF F<CODE "°48" OR (F>CODE "°58" AND F<CODE "°63") OR F>CODE "°90" THEN GOTO CODE "°42"
45 IF F=PEEK A THEN GOTO CODE "°42"
45 LET A=A+L: IF A<23302 THEN GOTO CODE "°45"
50 PRINT " ":POKE 23296+Y,F: NEXT Y: LET A=°LX_CTDFLT: PRINT "°LSE°LDI°CTRL_IZQ°LX_CTDFLT°005°000°FIN"
70 PRINT "°LSE°PAG°023°FIN";: FOR Y=K TO U: POKE 23296+Y,PEEK (A+Y): NEXT Y: FOR Y=K TO CODE "°006": LET A=PEEK (23296+Y)-CODE "°48":POKE K(Y+L),PEEK (°LX_KEYB+A):POKE °LX_KEYMSK+Y,PEEK (°LX_KEYBM+A): NEXT Y: GOTO CODE "°11"
80 DATA K,CODE "K",K,L,CODE "°15",U+U,L,CODE "°009",K,K,R,R,R,R,CODE "A",R,CODE "°008": IF V < LK THEN  RESTORE: READ SF,DF,MF,W,A,B,M,V,G,H,XB,XS,DB,DS,F,J,N: GOTO _8450: GOTO _9910: GOTO 8000
81 LET V=K: LET F=CODE "A": LET J=R: LET N=R+R*PEEK °LXLANG: GOTO _9910: LET F=CODE "C"+BD: GOTO _9940: LET F=CODE "B": LET J=K:  GOTO _9940: GOTO PZ: GOTO CODE "°80"
500 LET P=K: IF M=R THEN LET F=CODE "I" : GOTO _9920: LET P=L : GOTO 515 
510 POKE 23553,SF: PRINT "°LSE°PAG°017°SND°LX_SFX_HORS°PAG°023°LDI°000°064°000°192°000°027°PAG°031°LDI°LX_GRFADW°VARS°002°000°FIN"; M$;N$ AND PEEK 23553; "°LSE°LDI°LXT_MAP_PLW°VARS°002°000°DIR°LX_FNTLB°FIN";A$;"°LSE°PJP°LX_PJP_VARZONE"; 
515 PRINT "°LSE°LDI°000°064°000°160°128°023°LDI°NXTLIN°PROG°002°000°PAG°023°FIN";: LET C=CODE "°007": LET D=CODE "°15"
599 LET O=PEEK (55296+32*C+D): PRINT "°LSE°PAG°022°CLE°LOC°001°001°DXY°004°003°DIR°LXSPCUR°SPR°PAG°023°FIN": IF P THEN LPRINT
600 POKE 600|39,CODE "B"+O: PRINT "°LSE°PAG°023°DIR°LX_FNTLB°FIN°022°000°018°LSE°LDI°LXT_MAP_PLW°VARS°002°000°FIN";M$;"°LSE°PAG°023°PJP°LX_PJP_VARZONE": LPRINT 
610 LET D=D-(D>L)          : STOP
620 LET D=D+(D<CODE "°30") : STOP
630 LET C=C-(C>L)          : GOTO 641
640 LET C=C+(C<CODE "°17") 
641 IF PEEK °CTRL_SIDE THEN GOTO 612 - PEEK °CTRL_SIDE
641 STOP
650 IF E THEN STOP
651 PRINT "°LSE°PAG°022°AYS°LX_SFX_TECLA°PAG°023°FIN";: LET E=L: IF     P AND O < CODE "°005" THEN GOTO 700+O
652 IF NOT P AND O < CODE "°011" THEN LET B=PEEK (°ROOMHORSE+O): LET M=PEEK (°ROOMMAP+O): GOTO 8001
653 STOP
699 LET E=K: STOP
700 IF H  < CODE "°91" AND G GRQ CODE "°008" THEN LET G=G-CODE "°008":LET  H =  H + CODE "°9":GOTO _8500
700 STOP
701 IF G GRQ R THEN GOTO 720 
701 STOP
702 IF DB < CODE "°39" AND G GRQ INT PI THEN LET G=G-INT PI:LET DB = DB + L : GOTO _8500: LET F=INT (DB/CODE "°008"): PRINT AT CODE "°021",CODE "°015"+F;"°LSE°PJP°LX_PJP_BARDWN";DB-CODE "°008"*F
702 STOP
703 IF DS < CODE "°39" AND G GRQ INT PI THEN LET G=G-INT PI:LET DS = DS + L : GOTO _8500: LET F=INT (DS/CODE "°008"): PRINT #K;AT L,CODE "°015"+F;"°LSE°PJP°LX_PJP_BARDWN";DS-CODE "°008"*F
703 STOP
710 GOTO 8001
720 FOR Y=°LX_TO_TRAIN TO °LX_TO_TRAINE STEP U: LET F=F AND PEEK Y> °TO_RESPAWNTOP : IF PEEK Y<CODE "°138" THEN NEXT Y
721 IF F THEN FOR Y=°LX_TO_TRAIN TO °LX_TO_TRAINE STEP U:  POKE Y , PEEK Y - CODE "°128" : NEXT Y: LET G=G-R: GOTO _8500
725 STOP
1000 IF SF AND M= CODE "°64" THEN LET SF=K: LET F=°LX_IRRUPVENT: GOTO _8700: FOR Y=CODE "S" TO CODE "U": LET F=Y: GOTO _9920:GOTO PZ: NEXT Y: LET B=14:GOTO 8001
1001 LET I=(M=CODE "°064")+ (INT PI /R)*(M=R):  LET N=K: LET J=K: LET W=K: LET O=-(M=R): LET SK=S*(BD+L)/CODE "°60": LET S=S * (BD+L) * CODE "°040": LET Q=K: LET P=K: LET F=CODE "°008" AND A GRQ CODE "°008": POKE 1009|12,CODE "°64"+F: POKE 1009|14,CODE "°192"+F: PRINT "°LSE°PAG°23°LDI°000°064°000°192°000°027°LDI°NXTLIN°PROG°002°000°LDI°LX_CONT_SWO°OLDPPC°002°000°LDI°PAGKEY_SW°MSTK_CTRL_P°001°000°FIN": GOTO 1080
1008 IF PEEK LK = 4 THEN IF H AND V<CODE "°009" THEN LET V=V+L:LET H=H-L: GOTO _8500: PRINT "°LSE°PAG°023°LDI°000°080°000°208°000°008°FIN";
1009 PRINT AT A,K; "°LSE°PAG°023°LDI°000°064°000°192°128°015°PAG°030°DXY°004°000°COP°FIN": IF W THEN GOTO 1080+W
1010 LPRINT 
1020 IF B>D+4 THEN : LET B=B-°046°014°127°127°255°255°255: PRINT "°LSE°POK°LX_PSWWTABA°SWL°PAG°030°GAB°DXY°004°004°CLD°ANI°LX_PSWWTAB°SPR°FIN":  CONTINUE
1020 GOTO 1031
1030 IF O<2 AND PEEK °LX_COLDERR THEN LET B=B+°046°014°127°127°255°255°255: PRINT  "°LSE°POK°LX_PSWWTABA°SWR°PAG°030°GAB°DXY°004°004°CLD°ANI°LX_PSWWTAB°SPR°FIN": CONTINUE 
1031 IF O<2 THEN GOTO 1080
1060 LET F=PEEK LK>15: LET W=L+F+F: LET N=PEEK (°LX_SWGEST+PEEK LK): POKE °LX_PSWHBTAB,N+10+3*F: PRINT "°LSE°PAG°030°GAB°DXY°004°003°CLD°ANI°LX_PSWHBTAB°SPR°FIN": CONTINUE
1080 PRINT "°LSE°POK°LX_PSWWTABA°SWL°POK°LX_PSWWTAB°002°PAG°030°GAB°DXY°004°004°CLD°ANI°LX_PSWWTAB°SPR°FIN":LET B=PEEK °LX_VAR_B: CONTINUE 
1081 LET W=K: GOTO 1010
1082 LET P=P-L:LET W=W AND P>K: GOTO 1080
1083 LET B=PEEK °LX_VAR_B:  LET B=B-(B > 4 -INT -D) * NOT N : POKE °LX_SWORDTAB,N: PRINT  "°LSE°PAG°031°SND°LX_SFX_DIS°PAG°030°GAB°DXY°004°003°CLD°ANI°LX_PSWHBTAB°SPR°FIN": LET W=4: CONTINUE
1084 PRINT  "°LSE°PAG°031°LDI°000°192°000°064°128°023°PAG°030°GAB°DXY°004°003°CLD°ANI°LX_PSWHBTAB°SPR°FIN"; AT A+N,B;"°LSE°PAG°030°LOC°002°000°DXY°001°002°ANI°LX_SWORDTAB°SPD°PAG°023°LDI°000°064°000°192°128°023°FIN"; AT A,K; "°LSE°PAG°030°DXY°004°000°COP°FIN": LET W=K: IF (O DIF L OR J DIF N) AND B < 6 -INT -D - NOT N THEN GOTO 1400
1085 IF O=L AND J=N AND B < 6 -INT -D -NOT N THEN LET W=R: LET P=U: PRINT "°LSE°PAG°25°SND°LX_SFX_CHIT°FIN"
1085 GOTO 1080
1150 IF O THEN GOTO 1180+O
1155 IF D+4<B THEN IF W<3 AND PEEK LK<16 THEN PRINT "°LSE°PAG°030°CLE°DXY°004°004°ANI°LX_ESWWTAB°SPR°FIN": LET D=D+°046°014°127°127°255°255°255: STOP 
1158 IF D+5<B THEN GOTO 1180
1160 IF W>2 THEN IF RND < °046°014°128°076°204°204°204 * SK + °046°014°126°076°204°204°204 THEN GOTO 1190
1163 LET J=PEEK ( N + °ESWBESTM + 3 * INT (RND *8)): POKE °LX_ESWHBTAB, 13+J+16*I: LET D=-INT -D: PRINT AT C,D+L; "°LSE°PAG°030°DXY°004°003°ANI°LX_ESWHBTAB°SPR°AYS°LX_AYS_SWORDA°FIN": LET O=R: LET Q=U*(L-SK): LET Z=Z+L: STOP
1179 IF M DIF R THEN LET Q=Q-L: LET O=O AND Q>K AND RND>SK
1180  POKE °LX_ESWWTAB, R+U*I: LET D=-INT -D: PRINT "°LSE°PAG°030°CLE°DXY°004°004°ANI°LX_ESWWTAB°SPR°FIN": STOP
1181 LET O=W>R: IF O THEN GOTO 1190
1181 CONTINUE
1182 POKE °LX_ESWHBTAB, 13+J+16*I: PRINT AT C,D+L; "°LSE°PAG°030°DXY°004°003°ANI°LX_ESWHBTAB°SPR°FIN":  IF W>R AND RND < °046°014°128°076°204°204°204 * SK + °046°014°126°076°204°204°204 THEN GOTO 1190
1182 LET Q=Q-L:LET O=R+(Q<L): STOP
1183 PRINT AT C,D+L;"°LSE°PAG°030°DXY°004°003°ANI°LX_ESWHBTAB°SPR°FIN": LET D=D+(D+4<PEEK °LX_VAR_B) * NOT J: LET O=4: STOP 
1184 POKE °LX_SWORDTAB, J + 3: PRINT AT C,D+L; "°LSE°PAG°030°DXY°004°003°ANI°LX_ESWHBTAB°SPR°FIN"; AT C+J,D+L;"°LSE°PAG°030°LOC°253°255°DXY°001°002°ANI°LX_SWORDTAB°SPD°PAG°023°LDI°000°064°000°192°128°023°FIN": LET O=-L: LET Q=K: IF (W DIF L OR J DIF N) AND PEEK °LX_VAR_B<D+6-NOT J THEN GOTO 1240
1185 IF W=L AND J=N AND PEEK °LX_VAR_B<D+6-NOT J THEN LET Q=CODE "°007" * (L-SK): PRINT "°LSE°PAG°25°SND°LX_SFX_CHIT°FIN"
1185 STOP
1190 POKE °LX_ESWWTAB, 3+U*I:LET O=L: LET J=N: POKE °LX_ESWHBTAB, 10+J+16*I: PRINT AT C,D+L;"°LSE°PAG°030°DXY°004°003°ANI°LX_ESWHBTAB°SPR°FIN": STOP 
1240 LET W=K: GOTO _8600: PRINT "°LSE°PAG°023°LDI°000°064°000°192°128°023°FIN": PRINT AT A,K; "°LSE°PAG°25°SND°LX_SFX_HIT°PAG°030°DXY°004°000°COP°FIN": LET D=-INT -D-NOT SGN PEEK °LX_COLDERR: LET B=-INT -B+SGN PEEK °LX_COLDERR: GOTO 1260
1250 LET F=D>L AND ATTR (C+INT PI,D-L)=CODE "°007": LET B=-INT -B + NOT F: LET D=-INT -D-F
1260 POKE °LX_ESWWTAB, R+U*I: PRINT  "°LSE°POK°LX_PSWWTABA°SWL°POK°LX_PSWWTAB°002°PAG°030°CLE°DXY°004°004°ANI°LX_ESWWTAB°SPR°GAB°CLD°ANI°LX_PSWWTAB°SPR°FIN": LET O=-(M=R): LET Q=K : STOP 
1400 OUT OB,R+U: PRINT "°LSE°PAG°25°SND°LX_SFX_HIT°PAG°030°FIN": LET S=S-XS-DS-CODE "°040":  IF S>K THEN GOTO 1250
1410 LET W=K: POKE °LX_ENEMSWDEDW, CODE "°005"+R*(M=CODE "°64")+INT PI*(M=R): PRINT "°LSE°POK°LX_PSWWTABA°SWL°POK°LX_PSWWTAB°002°PAG°030°CLE°LOC°000°255°DXY°003°003°ANI°LX_ENEMSWDEDW°SPR°PAG°030°GAB°DXY°004°004°ANI°LX_PSWWTAB°SPR°PAG°031°LDI°000°064°000°192°000°024°FIN" AND M DIF R;"°LSE°PAG°031°FIN";: LET E=K: LET N=U*PEEK 23554+PEEK (°TABOBJ+M)+256*PEEK (°TABOBJH+M): POKE 4210||4220,0:POKE 0,0:  POKE 4010|00,CODE "°224" : POKE N,PEEK N+CODE "°128": LET XS=XS+(XS<CODE "°39"): LET F=INT (XS/CODE "°008"): LET D=D-(D>L AND ATTR (C+INT PI,D-L)=CODE "°007"): PRINT "°LSE°PAG°030°GAB°DXY°004°004°ANI°LX_PSWWTAB°SPR°CLE°LOC°000°255°DXY°001°004°DIR°LX_PROTFALL°SPR°LOC°000°255°DXY°002°004°ANI°LX_ENEMSWDEDW°SPR°LOC°000°001°SPO°LDI°LX_CONT_FRE°OLDPPC°002°000°LDI°PAGKEY_AR°MSTK_CTRL_P°001°000°PAG°031°LDI°000°064°000°192°000°024°PAG°031°FIN"; #K;AT K,CODE "°015"+F;"°LSE°PJP°LX_PJP_BARUP";XS-CODE "°008"*F: LET C=CODE "°100": IF M DIF CODE "°64" THEN GOTO _8450: GOTO 3999
1450 PRINT "°LSE°PAG°025°LDI°LXMUSFIND°LXMUSCNT°018°000°POK°LX_MUS_ON°001°FIN";: LET J=R: LET N=K: LET F=CODE "M"+(BD>L): GOTO _9910: PRINT '"°LSE°PAG°017°RLE°LX_FINAL_DAT°FIN" AND BD>L;: GOTO 1505
1500 GOTO _9920: PRINT "°LSE°PAG°017°LDI°LXMUSGOVERD°LXMUSCNT°018°000°POK°LX_MUS_ON°001°FIN"
1505 BORDER K: GOTO PZ: PRINT "°LSE°PAG°023°FIN";: FOR Y=L TO CODE "°64": LET B=PEEK (°TABOBJ+Y)+256*PEEK (°TABOBJH+Y)
1515 LET D=PEEK B: IF D>193 THEN NEXT Y: PRINT "°LSE°LDI°LX_PROG°PROG°002°000°FIN";: GOTO CODE "°10"
1520 IF D>127 THEN POKE B,D-128
1525 LET B=B+4: GOTO 1515
3999 PRINT "°LSE°LDI°NXTLIN°PROG°002°000°LDI°NXTLIN°LX_MAINBUKL°002°000°FIN"
4010 LPRINT : GOTO Z
4020 IF PEEK °LX_COLIZQR THEN LET B=B+°046°014°127°255°255°255°255:PRINT  "°LSE°PAG°016°GAB°DXY°004°004°CLD°ANI°LX_RITAB°SPR°FIN"; :CONTINUE 
4020 GOTO 6999
4030 IF PEEK °LX_COLDERR THEN LET B=B+°046°014°127°127°255°255°255: PRINT  "°LSE°PAG°016°GAB°DXY°004°004°CLD°ANI°LX_RDTAB°SPR°FIN";: CONTINUE 
4030 GOTO 7049
4040 PRINT "°LSE°PAG°016°GAB°ESC°FIN";: IF PEEK °LX_COLDETER THEN GOTO 5200
4041 IF PEEK °CTRL_SIDE THEN PRINT "°LSE°LDI°LX_VAR_B_F°VARL_B°005°000°POK°LX_RITAB°000°POK°LX_RDTAB°000°PAG°017°SND°LX_SFX_JUMP°FIN";: LET Z=5500+100*W: POKE 4010|00,CODE  " ": LET T=L:  GOTO Z
4050 GOTO 4800
4060 LET B=PEEK °LX_VAR_B : LET Z=7800: POKE 4010|00,CODE " ": GOTO 7860
4200 PRINT "°LSE°POK°LX_RITAB°000°POK°LX_RDTAB°000°LDI°VARL_W°LX_PROTQUIETO°001°000°PAG°016°GAB°CLD°ESC°DXY°004°004°ANI°LX_PROTQUIETO°SPR°LDI°LX_VAR_B_F°VARL_B°005°000°FIN"; : IF PEEK °LX_COLDETER OR ATTR (A+4,B+1+W) DIF 7 THEN CONTINUE 
4201 IF NOT PEEK °LX_COLCAER THEN GOTO 6402+50*W
4210 GOTO 6490
4302 LET D=D+°046°014°127°255°255°255°255: PRINT "°LSE°PAG°016°DXY°001°003°CLE°ANI°LX_ADDSPTAB°SPR°FIN";: IF PEEK °LX_COLENEMI THEN STOP
4303 IF PEEK °LX_COLENEMP THEN IF B<D+3 THEN GOTO 8629
4306 PRINT "°LSE°POK°OLDPPC°214°FIN";: LET D=-INT -D: POKE °LX_ADDSPTAB,2 + S: STOP 
4310 PRINT "°LSE°PAG°016°DXY°001°003°CLE°ANI°LX_ADDSPTAB°SPR°FIN";:LET D=D+°046°014°127°127°255°255°255: IF PEEK °LX_COLENEMD THEN STOP
4311 IF PEEK °LX_COLENEMP THEN IF D<B+4 THEN GOTO 8629
4314 PRINT "°LSE°POK°OLDPPC°204°FIN";: LET D=-INT -D: POKE °LX_ADDSPTAB, S: STOP 
4400 PRINT "°LSE°PAG°016°DXY°001°002°DIR°LXSPBLK°LDI°TMPESPOSN°SPOSN°002°000°LDI°TMPEDFCC°DFCC°002°000°SPR°LOC°000°000°PAG°022°CLI°LOC°255°255°CLX°LOC°001°000°LDI°DFCC°TMPEDFCC°002°000°LDI°SPOSN°TMPESPOSN°002°000°FIN";: IF PEEK °LX_CLX_TRUFLAG THEN PRINT "°LSE°LDI°TMPESPOSN°BTMPESPOSN°002°000°LDI°TMPEDFCC°BTMPEDFCC°002°000°PAG°022°ANI°LX_ADDSPTAB°SPR°LDI°LX_CONT_WAT°OLDPPC°002°000°FIN";: STOP
4401 PRINT "°LSE°LDI°TMPESPOSN°SPOSN°002°000°LDI°TMPEDFCC°DFCC°002°000°PAG°022°FIN";: IF PEEK °LX_CLX_TRUFLAG THEN PRINT "°LSE°DXY°001°002°ANI°LX_ADDSPTAB°SPR°LDI°LX_CONT_WAO°OLDPPC°002°000°FIN";: STOP
4402 IF PEEK °LX_CLX_SPRFLAG THEN FOR Y=K TO BD: GOTO _8600: NEXT Y: PRINT "°LSE°PAG°017°SND°LX_SFX_HIT°LDI°LX_CONT_FRE°OLDPPC°002°000°FIN";:  CONTINUE 
4404 PRINT "°LSE°LDI°BTMPEDFCC°TMPEDFCC°002°000°LDI°BTMPESPOSN°TMPESPOSN°002°000°LDI°TMPESPOSN°SPOSN°002°000°LDI°TMPEDFCC°DFCC°002°000°PAG°022°DXY°001°002°ANI°LX_ADDSPTAB°SPR°LDI°LX_CONT_WAO°OLDPPC°002°000°PAG°016°FIN";: LET X= PEEK ( X + RND*5 + °WASPX): POKE 4400|28, PEEK (°GENFLECHAILE + X) : POKE 4400|27, PEEK( °GENFLECHAICE + X): STOP
4500 PRINT "°LSE°PAG°016°DXY°001°001°DIR°LXSPBLK°LDI°TMPESPOSN°SPOSN°002°000°LDI°TMPEDFCC°DFCC°002°000°SPR°LOC°000°000°PAG°022°CLI°LDI°DFCC°TMPEDFCC°002°000°LDI°SPOSN°TMPESPOSN°002°000°FIN";: IF PEEK °LX_CLX_TRUFLAG THEN PRINT "°LSE°LDI°TMPESPOSN°BTMPESPOSN°002°000°LDI°TMPEDFCC°BTMPEDFCC°002°000°PAG°016°ANI°LX_FLECHATABENEM°PAG°022°SPR°FIN";: STOP
4501 IF PEEK °LX_CLX_SPRFLAG THEN LET D=33-PEEK °TMPESPOSN: LET C=24-PEEK °TMPESPOSNH: IF D GRQ B THEN IF D LEQ B+3 THEN IF C GRQ A-1 AND C LEQ A+3 THEN GOTO _8600 : PRINT "°LSE°PAG°017°SND°LX_SFX_HIT°FIN"; 
4501 PRINT AT C(O),D(O);"°LSE°PAG°016°DXY°004°003°DIR°ENEMBSHT°SPR°LOC°000°002°DIR°ENEMBRLD°DXY°002°002°SPR°FIN" AND X ;"°LSE°PAG°022°AYS°LX_SFX_AHHIT°PAG°016°DXY°001°001°ANI°LX_FLECHATABENEM°LDI°BTMPESPOSN°SPOSN°002°000°LDI°BTMPEDFCC°DFCC°002°000°PAG°022°SPO°LOC°000°000°SPR°FIN" AND PEEK °LX_CLX_BLKFLAG; "°LSE°POK°OLDPPC°150°FIN";: STOP
4502 LET O=PEEK (°QKINC+O):   IF O(O) THEN PRINT AT C(O),D(O);"°LSE°PAG°016°DXY°004°003°DIR°ENEMBAIM°SPR°LOC°000°002°DIR°ENEMBRLDT°DXY°002°002°SPR°POK°OLDPPC°151°PAG°017°FIN"; :LET X = PEEK ( O(O) + 56 * PEEK °LX_VAR_A + B): LET S=SK+SK: STOP
4502 STOP
4504 LET S=S-1: IF S AND S DIF SK THEN STOP
4504 IF S=SK AND X THEN PRINT AT C(O),D(O);"°LSE°PAG°016°LDI°VARL_X°LX_EBSHTTAB°002°000°LDI°VARL_X°LX_FLECHATABENEM°002°000°LDI°LX_EBSHTTAB°LX_EBAIMTAB°001°000°DXY°004°003°ANI°LX_EBAIMTAB°SPR°FIN";: STOP
4504 PRINT "°LSE°POK°OLDPPC°153°FIN";: STOP
4505 IF X THEN PRINT AT C(O),D(O);"°LSE°PAG°022°AYS°LX_AYS_SWORDB°PAG°016°DXY°004°003°ANI°LX_EBSHTTAB°SPR°POK°OLDPPC°148°FIN";AT C(O) + PEEK (°GENFLECHAEL + X) - 2, D(O) + PEEK (°GENFLECHAEC + X) - 2;"°LSE°LDI°DFCC°TMPEDFCC°002°000°LDI°SPOSN°TMPESPOSN°002°000°FIN";: POKE 4500|28, PEEK (°GENFLECHAILE + X) : POKE 4500|27, PEEK( °GENFLECHAICE + X):  STOP
4506 PRINT "°LSE°POK°OLDPPC°150°FIN";: STOP
4600 PRINT "°LSE°PAG°016°DXY°001°001°DIR°LXSPBLK°LDI°TMPESPOSN°SPOSN°002°000°LDI°TMPEDFCC°DFCC°002°000°SPR°LOC°000°255°PAG°022°CLI°LDI°DFCC°TMPEDFCC°002°000°LDI°SPOSN°TMPESPOSN°002°000°FIN";: IF PEEK °LX_CLX_TRUFLAG THEN PRINT "°LSE°LDI°TMPESPOSN°BTMPESPOSN°002°000°LDI°TMPEDFCC°BTMPEDFCC°002°000°DIR°MORTIFIRE°PAG°022°SPR°FIN";: STOP
4600 PRINT "°LSE°POK°OLDPPC°249°FIN";: STOP
4601 IF PEEK °LX_CLX_SPRFLAG THEN LET X=CODE "°33"-PEEK °TMPESPOSN: IF X GRQ B AND X LEQ B+3 THEN GOTO _8600 : PRINT "°LSE°PAG°017°SND°LX_SFX_HIT°FIN";
4602 PRINT AT C(L),D(L);  "°021°001°019°000°128°128°128°128°LSE°PAG°016°LOC°004°255°FIN°128°128°128°128°LSE°LOC°004°255°FIN°128°128°128°128°LSE°LOC°004°002°DXY°004°004°DIR°LXSPBLK°SPR°POK°OLDPPC°251°FIN": LET C=R+INT(RND*8): LET D=R+INT(RND*17): LET C(L)=C: LET D(L)=D: LET O=5: STOP
4603 LET S=D<B: LET N=D+3*S  : POKE °LX_MORTITAB,S: POKE °LX_MORTARMTAB,S: PRINT "°LSE°PAG°022°AYS°LX_AYS_SWORDB°PAG°016°CLE°FIN°021°001°128°019°001°128°128°LSE°LOC°002°255°FIN°128°128°LSE°LOC°002°255°FIN°128°128°LSE°LOC°003°002°DXY°004°004°ANI°LX_MORTITAB°SPR°FIN"; AT C+L,N-S;"°LSE°DXY°001°002°ANI°LX_MORTARMTAB°SPR°FIN";AT C+L,N;"°LSE°LDI°DFCC°TMPEDFCC°002°000°LDI°SPOSN°TMPESPOSN°002°000°POK°OLDPPC°252°FIN": LET X = SGN(B-D) AND ABS(D-B)>6: POKE 4600|27,PEEK( °GENFLECHAICM + X): POKE 4600|28, PEEK (°GENPOWMORT+X): STOP
4605 LET O=O-L: IF O THEN STOP
4605 PRINT "°LSE°PAG°016°CLE°DXY°004°004°ANI°LX_MORTITAB°SPR°POK°OLDPPC°248°FIN": STOP
4800 PRINT "°LSE°PAG°016°GAB°ESC°PAG°023°FIN";: IF PEEK °LX_COLDETER THEN GOTO 5200
4801 IF A>13 THEN LET F=PEEK (°ROOMWARPDP+M): IF B GRQ F AND B LEQ F+4 THEN LET F=PEEK (°ROOMWARP+M) : IF F THEN LET M=F: PRINT "°LSE°PAG°017°SND°LX_SFX_CAID°FIN": GOTO 8001
4805 IF PEEK LK = 4 THEN IF H AND V<9 THEN LET V=V+L:LET H=H-L: GOTO _8500
4810 GOTO 4200
5100 LPRINT 
5120 LET W = PEEK °CTRL_SIDE = L: LET N = B  + R * W - NOT W:  LET F = INT (A+°046°014°127°127°255°255°255) : IF ATTR (F,N) + ATTR (F+L,N) + ATTR (F+R,N) + ATTR (F+L+R,N) = 28 THEN LET A=F:LET Q=CODE "°10":LET Z=5250+W*CODE "°010": LET T=K
5122 CONTINUE
5130 IF PEEK °LX_COLARRR AND A>K THEN LET A=A-°046°014°126°127°255°255°255: PRINT  "°LSE°POK°LX_ESCTABA°ESU°PAG°016°GAB°DXY°004°002°CLD°ANI°LX_ESCTAB°SPR°LOC°000°255°DXY°001°002°DIR°LXSPBLK°SPR°FIN";:CONTINUE 
5130 GOTO 5198
5140 IF PEEK °LX_COLABAR THEN LET A=A+°046°014°126°127°255°255°255: PRINT  "°LSE°POK°LX_ESCTABA°ESD°PAG°016°GAB°LOC°000°001°DXY°001°002°DIR°LXSPBLK°SPR°LOC°000°255°DXY°004°002°CLD°ANI°LX_ESCTAB°SPR°FIN";:CONTINUE
5198 PRINT  "°LSE°POK°LX_ESCTABA°ESQ°PAG°016°GAB°DXY°004°002°CLD°ANI°LX_ESCTAB°SPR°FIN";:CONTINUE 
5200 LET F=PEEK °LX_COLDETER: PRINT "°LSE°POK°LX_ESCTAB°000°POK°LX_ESCTABA°ESU°FIN";: LET A=A-°046°014°126°127°255°255°255 : LET B=-INT-B+F-L: POKE 4010|00,CODE " ":LET T=L:LET Q=CODE "°10": LET Z=5200+F: GOTO Z
5201 PRINT "°LSE°PAG°016°GAB°DXY°004°003°DIR°PROTSIES°SPR°LOC°253°002°DXY°004°001°DIR°LXSPBLK°SPR°FIN": LET Q=Q-L:IF Q THEN CONTINUE 
5201 LET Z=5100:PRINT "°LSE°PAG°016°GAB°DXY°004°002°ANI°LX_ESCTAB°CLD°SPR°LOC°254°002°DXY°004°001°DIR°LXSPBLK°SPR°FIN":CONTINUE 
5202 PRINT "°LSE°PAG°016°GAB°LOC°001°000°DXY°004°001°DIR°LXSPBLK°SPR°LOC°255°002°DXY°004°002°ANI°LX_ESCTAB°CLD°SPR°LOC°254°002°DXY°004°001°DIR°LXSPBLK°SPR°FIN": LET Z=5100: CONTINUE
5203 PRINT "°LSE°PAG°016°GAB°LOC°002°000°DXY°004°001°DIR°LXSPBLK°SPR°LOC°255°002°DXY°004°003°DIR°PROTSDES°SPR°FIN": LET Q=Q-L:IF Q THEN CONTINUE 
5203 LET Z=5100:PRINT "°LSE°PAG°016°GAB°LOC°001°000°DXY°004°001°DIR°LXSPBLK°SPR°LOC°255°002°DXY°004°002°ANI°LX_ESCTAB°CLD°SPR°FIN":CONTINUE 
5250 PRINT "°LSE°PAG°016°GAB°LOC°001°000°DXY°004°003°DIR°PROTBIES°SPR°FIN": LET Q=Q-L:IF Q THEN CONTINUE 
5251 LET B=B-R-L:IF ATTR (A+U,B)=CODE "°007" THEN POKE °LX_PROTCAETAB,W+R: PRINT  "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_PROTCAETAB°CLD°SPR°LOC°252°002°DXY°004°002°DIR°LXSPBLK°SPR°FIN":GOTO 6000
5252 PRINT "°LSE°PAG°016°GAB°DXY°004°004°CLD°DIR°PROTQUII°SPR°LOC°252°002°DXY°004°002°DIR°LXSPBLK°SPR°FIN": GOTO 6000
5260 PRINT "°LSE°PAG°016°GAB°DXY°004°003°DIR°PROTBDES°SPR°FIN":LET Q=Q-L:IF Q THEN CONTINUE 
5261 IF ATTR (A+U,B+R)=CODE "°007" THEN POKE °LX_PROTCAETAB,W+R: PRINT "°LSE°PAG°016°GAB°DXY°004°001°DIR°LXSPBLK°SPR°LOC°255°002°DXY°004°004°ANI°LX_PROTCAETAB°CLD°SPR°FIN":LET B=B+L:GOTO 6000
5262 PRINT  "°LSE°PAG°016°GAB°DXY°004°001°DIR°LXSPBLK°SPR°LOC°255°002°DXY°004°004°CLD°DIR°PROTQUID°SPR°FIN":LET B=B+L:GOTO 6000
5500 PRINT "°LSE°PAG°016°GAB°LOC°001°001°CLD°FIN";: LET Q=(A>L) AND PEEK °LX_COLPELDR: POKE °LX_SITAB,Q*8: PRINT "°LSE°GAB°DXY°004°004°ANI°LX_SITAB°CLD°SPR°FIN";:  LPRINT
5501 LET A=A-L: PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_SITAB°CLD°SPR°LOC°000°255°DXY°001°004°DIR°LXSPBLK°SPR°FIN";: LPRINT
5502 IF Q THEN GOTO 5501
5505 PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_SITAB°CLD°SPR°FIN";: LPRINT
5506 IF NOT Q THEN GOTO 5505
5507 IF PEEK °LX_COLCAER OR A<1 THEN PRINT  "°LSE°PAG°016°GAB°DXY°001°004°DIR°LXSPBLK°SPR°LOC°000°255°DXY°004°004°ANI°LX_SITAB°CLD°SPR°FIN";: LET A=A+L: LPRINT
5508 GOTO 5608
5592 LET Z=Z+1: IF PEEK °CTRL_SIDE DIF 2 THEN CONTINUE 
5593 IF PEEK °LX_COLIZQR THEN LET B=B-1:PRINT "°LSE°PAG°016°GAB°CLD°FIN";:CONTINUE 
5595 GOTO 7000
5600 PRINT "°LSE°PAG°016°GAB°LOC°255°000°CLD°FIN";: LET Q=(A>L) AND PEEK °LX_COLPELDR: POKE °LX_SDTAB,Q*8: PRINT "°LSE°GAB°DXY°004°004°ANI°LX_SDTAB°CLD°SPR°FIN";:  LPRINT
5601 LET A=A-L: PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_SDTAB°CLD°SPR°LOC°000°255°DXY°001°004°DIR°LXSPBLK°SPR°FIN";: LPRINT
5602 IF Q THEN GOTO 5601
5605 PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_SDTAB°CLD°SPR°FIN";: LPRINT
5606 IF NOT Q THEN GOTO 5605
5607 IF PEEK °LX_COLCAER OR A<1 THEN PRINT "°LSE°PAG°016°GAB°DXY°001°004°DIR°LXSPBLK°SPR°LOC°000°255°DXY°004°004°ANI°LX_SDTAB°CLD°SPR°FIN";: LET A=A+1:LPRINT  
5608 PRINT "°LSE°PAG°016°GAB°CLD°FIN";: LET T=K:GOTO 6000 
5692 LET Z=Z+1: IF PEEK °CTRL_SIDE DIF 1 THEN CONTINUE
5693 IF PEEK °LX_COLDERR      THEN LET B=B+1:PRINT "°LSE°PAG°016°GAB°CLD°FIN";:CONTINUE 
5695 GOTO 7050 
6000 LET A=-INT -A: POKE 4020|00,250-16*W : POKE 4030|00,234+16*W : POKE 4010|00,224: IF PEEK °LX_COLCAER THEN GOTO 6490
6010 IF E=3 THEN IF C=A AND B>D THEN GOTO 8999
6025 GOTO 4200
6400 PRINT  "°LSE°PAG°016°GAB°ESC°FIN": IF PEEK °LX_COLDETER THEN PRINT "°LSE°POK°LX_COLIZQR°001°POK°LX_COLCAER°000°FIN";: GOTO 4020
6400 IF ATTR (A+4,B+3)=7 THEN GOTO 6490
6402 LET A=A+L: LET B=B-L: PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_RITAB°ANI°LX_RITAB°CLD°SPR°DXY°001°004°LOC°255°003°DIR°LXSPBLK°SPR°DXY°004°001°LOC°253°255°SPR°FIN":  GOTO 6480
6450 PRINT  "°LSE°PAG°016°GAB°ESC°FIN": IF PEEK °LX_COLDETER THEN PRINT "°LSE°POK°LX_COLDERR°001°POK°LX_COLCAER°000°FIN";: GOTO 4030
6450 IF ATTR (A+4,B)=7 THEN GOTO 6490
6452 LET A=A+L: LET B=B+L:PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_RDTAB°ANI°LX_RDTAB°CLD°SPR°DXY°001°004°LOC°001°004°DIR°LXSPBLK°SPR°DXY°004°001°LOC°000°255°SPR°FIN"
6480 IF NOT PEEK °LX_COLCAER THEN CONTINUE
6490 LET Z=6500: POKE 4010|00,CODE " ": LET B=-INT -B+NOT INT B: PRINT "°LSE°PAG°016°GAB°ESC°FIN";: IF PEEK °LX_COLDETER THEN GOTO 5200
6504 IF PEEK °LX_COLCAER THEN PRINT "°LSE°LDI°VARL_W°LX_PROTCAETAB°001°000°PAG°016°GAB°DXY°005°004°ANI°LX_PROTCAETAB°SPR°LOC°000°003°CLD°FIN";:LET A=A+L:CONTINUE 
6505  IF ATTR (A+U,B+L)=66 THEN IF A=PEEK °SPECRDL_A THEN IF B GRQ PEEK °SPECRDL_B AND B LEQ PEEK °SPECRDL_C THEN FOR Y=K TO BD: GOTO _8600: NEXT Y
6506 PRINT "°LSE°PAG°017°SND°LX_SFX_CAID°FIN":GOTO 6000
6999 IF PEEK °LX_COLCAER THEN GOTO 6400
6999 IF W THEN LET W=K: POKE 4020|00,250: POKE 4030|00,234: GOTO 4200 
7000 PRINT "°LSE°PAG°023°FIN";: IF B<1 THEN LET M=PEEK (°ROOMIZQ+M):LET B=CODE "°028": GOTO 8000
7000 IF ATTR (A+1,B-1)=112 THEN LET P=ATTR (A+R,B-L)-CODE "°66":LET N=-INT -B -R:GOTO 7400
7010 IF NOT PEEK (°ROOMIZQ+M) THEN IF A>13 AND B<11 THEN GOTO 7100
7020 IF PEEK °LX_COLPELDR THEN IF NOT (T AND Q) AND A>1 THEN LET A=A-1: LET B=B-1: PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_RITAB°ANI°LX_RITAB°CLD°SPR°DXY°001°004°LOC°255°254°DIR°LXSPBLK°SPR°DXY°004°001°LOC°253°003°SPR°FIN": LET T=K: POKE 4010|00,224: CONTINUE
7020 IF T THEN CONTINUE
7020 GOTO 4200
7049 IF PEEK °LX_COLCAER THEN GOTO 6450
7049 IF NOT W THEN LET W=L:POKE 4020|00,234:POKE 4030|00,250:GOTO 4200 
7050 PRINT "°LSE°PAG°023°FIN";: IF B>27 THEN LET M=PEEK (°ROOMDER+M):LET B=K:GOTO 8000
7050 IF ATTR (A+1,B+4)=112 THEN LET P=ATTR (A+R,B+U)-CODE "°66":LET N=U-INT -B:GOTO 7400
7060 IF NOT PEEK (°ROOMDER+M) THEN GOTO 7070
7063 IF PEEK °LX_COLPELDR THEN IF NOT (T AND Q) AND A>1 THEN LET A=A-1: LET B=B+1:PRINT "°LSE°PAG°016°GAB°DXY°004°004°ANI°LX_RDTAB°ANI°LX_RDTAB°CLD°SPR°DXY°001°004°LOC°001°255°DIR°LXSPBLK°SPR°DXY°004°001°LOC°000°003°SPR°FIN": LET T=K:  POKE 4010|00,224:CONTINUE
7063 IF T THEN CONTINUE
7065 GOTO 4200
7070 IF M=63 AND A<8 THEN LET M=M+L: LET F=°LX_IRRUPSALTO: GOTO _8700: GOTO 8000
7070 IF A>13 AND M DIF 63 THEN GOTO 7100
7070 GOTO 7063
7101 IF M=CODE "°009" THEN LET F=DF: LET G=G + CODE "°50" * (F = CODE "K") * ( G < 950 ) : LET DF=CODE "L":GOTO 7140
7102 IF M=CODE "°014" THEN IF NOT W THEN GOTO 7130
7103 IF M=CODE "°054" THEN IF     W THEN LET F=CODE  "V": GOTO 7140
7104 IF M=CODE "°015" THEN IF SF THEN GOTO 7200
7104 IF M=CODE "°015" THEN GOTO 7020
7109 GOTO _9000: GOTO 500
7130 IF SF             THEN                                LET F=CODE "Q": GOTO 7140
7130 IF G>CODE "°99"   THEN LET SF=L: LET G=G-CODE "°100": LET F=CODE "P": GOTO 7140
7130                                                       LET F=CODE "O"
7140 GOTO _8500: GOTO _9920: GOTO PZ: PRINT "°LSE°PAG°031°LDI°000°192°000°064°000°027°FIN";:  GOTO 7020
7200 LET F=CODE "H": GOTO _9920: LET C=PEEK °RESPAWN_SCR: LET S = °LX_TAB_RESPAWN + C * CODE "°006": PRINT "°LSE°LDI°NXTLIN°PROG°002°000°FIN";
7201 FOR Y=PEEK (°TABOBJ+PEEK S)+256*PEEK (°TABOBJH+PEEK S) TO °LX_RSPWN_TOP STEP U: LET F=F AND PEEK Y>°TO_RESPAWNTOP : IF PEEK Y<138 THEN NEXT Y
7201 LET S=S+L: IF PEEK S THEN STOP
7202 IF NOT F THEN  GOTO 7210
7203 LET C=PEEK ( °LX_TAB_RND_RSPWN + C ): POKE °RESPAWN_SCR , C :  LET S = °LX_TAB_RESPAWN + C * CODE "°006"
7204 FOR Y=PEEK (°TABOBJ+ PEEK S)+256*PEEK (°TABOBJH+PEEK S) TO °LX_RSPWN_TOP STEP U: LET D = PEEK Y: IF D < 138 THEN POKE Y , D - 128 * ( D > 128 ) : NEXT Y
7204 LET S=S+L: IF PEEK S THEN GOTO 7204
7210 POKE 7210|34,CODE "D"+C: PRINT "°LSE°PAG°023°DIR°LX_FNTLB°LDI°LXT_MAP_PLW°VARS°002°000°FIN";M$;"°LSE°PAG°023°PJP°LX_PJP_VARZONE": GOTO PZ: PRINT "°LSE°PAG°031°LDI°000°192°000°064°000°027°LDI°LX_MAINBUKL°PROG°002°000°FIN";: GOTO 7020
7400 LET G = G + CODE "°10" * (G<990) :PRINT AT A+L,N;"°LSE°PAG°023°PJP°LX_PJP_TESORO";"°LSE°PAG°016°DXY°002°002°LOC°002°001°DIR°LXSPBLK°SPR°PAG°022°AYS°LX_SFX_COIN°PAG°023°FIN";: LET N=U*P+PEEK (°TABOBJ+M)+256*PEEK (°TABOBJH+M):POKE N,CODE "°128"+PEEK N: LET O(P+L)=K: GOTO _8500: STOP 
7510 PRINT AT A + PEEK (°GENFLECHAL + P),B + PEEK (°GENFLECHAC + P); "°LSE°PAG°023°LDI°000°160°000°192°128°023°LDI°000°064°000°160°128°023°LDI°NXTLIN°PROG°002°000°PAG°016°LDI°VARL_P°LX_FLECHATAB°001°000°LOC°001°000°DXY°003°003°ANI°LX_FLECHATAB°FIN"; : POKE 7520|23, PEEK (°GENFLECHAIC + P): POKE 7520|24,PEEK( °GENFLECHAIL + P): LET Z = 22528 + B + 32 * A + PEEK (°GENFLECHA+P) : LET J = PEEK ( °LX_FLCH_ATT + P ) - 33
7520 LET Z=Z+J: IF PEEK Z<8 THEN PRINT "°LSE°LOC°001°002°ANI°LX_FLECHATAB°FLE°FIN"; : STOP
7530 PRINT "°LSE°LDI°LX_MAINBUKL°PROG°002°000°FIN";: LET J=Z-J: LET Q=INT ((Z-22528)/32): LET N=Z-(22528+32*Q): LET I=INT ((J-22528)/32): LET J=J-(22528+32*I)-(P>4): IF Z > 22527 THEN IF NOT P OR (P>3 AND J>B) OR (P<4 AND B GRQ J) THEN IF (J<30) AND J THEN GOTO 7605 
7601 PRINT "°LSE°PAG°023°LDI°000°160°000°064°128°023°LDI°000°192°000°160°128°023°FIN";: GOTO 7700
7605 FOR Y=1 TO 5: IF Q GRQ C(Y) THEN IF N GRQ D(Y) THEN IF Q LEQ C(Y)+3 THEN IF (N LEQ D(Y)+2) AND C(Y) THEN PRINT "°LSE°PAG°017°SND°LX_SFX_HIT°PAG°023°LDI°000°160°000°064°128°023°LDI°000°192°000°160°128°023°FIN";: GOTO 7620
7610 NEXT Y: PRINT "°LSE°PAG°022°AYS°LX_SFX_AHHIT°PAG°023°FIN";: IF PEEK °LX_LSTORD>252 THEN IF ATTR (Q,N)=CODE "°070" THEN GOTO 7920
7611 IF PEEK °LX_LSTORD=254 THEN IF PEEK Z=CODE "°104" THEN PRINT "°LSE°PAG°023°LDI°000°192°000°160°128°023°PAG°016°LOC°000°002°SPO°LOC°000°001°FIN°016°007°021°001°128°128":GOTO 7700
7611 PRINT "°LSE°PAG°023°LDI°000°192°000°160°128°023°PAG°016°LOC°000°002°SPO°FIN";:  IF PEEK Z=CODE "°120" THEN POKE Z,CODE "°80": LET F=PEEK °LX_LSTORD: POKE °LX_LSTORD,K: IF Q= PEEK (°SPECRDL+F) AND N=PEEK (°SPECRDC+F) THEN POKE °LX_LSTORD, F+L: IF F = INT PI THEN  GOTO 7910
7611 IF PEEK °LX_LSTORD = 253 THEN GOTO 7900
7612 GOTO 7700
7620 BORDER R+U: LET N = PEEK (°LX_LSTORD + Y) + BD - 3 - (XB+DB) / ( 5 * ( BD + L ) ) : BORDER K:IF N>K THEN POKE °LX_LSTORD + Y , N : GOTO 7700 
7621  LET N=U*(Y-L)+PEEK (°TABOBJ+M)+256*PEEK (°TABOBJH+M): IF M=59 THEN  GOTO 7730
7630 IF O(Y) OR M=R THEN PRINT AT C(Y),D(Y);"°LSE°PAG°016°DXY°004°002°DIR°LXSPBLK°SPR°PAG°023°PJP°LX_PJP_DIANA" AND M=R; "°LSE°PAG°022°DXY°004°003°DIR°LX_ENEMBOW_DED°SPR°LOC°000°003°SPO°PAG°023°PJP°LX_PJP_ARQUERO" AND M DIF R: POKE N, PEEK N + CODE "°128":  LET O(Y)=K: LET X=K: IF XB<CODE "°039" THEN LET XB = XB + L / R: IF XB= INT XB THEN LET F=INT (XB/U/R): PRINT AT CODE "°020",CODE "°015" + F ; "°LSE°PJP°LX_PJP_BARUP";XB - F * R * U  
7700  PRINT AT A-L,B;"°LSE°POK°LX_RITAB°000°POK°LX_RDTAB°000°LDI°VARL_W°LX_PROTQUIETO°001°000°PAG°016°DXY°001°004°DIR°LXSPBLK°SPR°LOC°000°255°CLD°ESC°DXY°004°004°ANI°LX_PROTQUIETO°SPR°FIN": CONTINUE
7730 LET O(Y)=O(Y)-XB-DB: IF O(Y)>K THEN GOTO 7700
7731 POKE N,PEEK N + CODE "°128":  PRINT "°LSE°PAG°016°CLE°DXY°004°004°DIR°LXSPBLK°SPR°LDI°000°064°000°160°128°023°PAG°017°SND°LX_SFX_HIT°FIN";: FOR Y=C TO 14:  PRINT AT Y,D;"°021°001°019°000°128°128°128°128°LSE°PAG°016°LOC°004°000°DXY°001°004°DIR°LXSPBLK°SPR°LOC°000°255°DXY°004°004°ANI°LX_MORTITAB°SPR°PAG°022°AYS°LX_AYS_IRRUPBM°FIN"; : OUT 65533,PI+PI: OUT 49149,RND*CODE "°32":  NEXT Y : PRINT "°LSE°PAG°017°SND°LX_SFX_HIT°PAG°016°LDI°LXSPBLK°000°088°001°000°LDI°000°088°001°088°127°002°PAG°017°SND°LX_SFX_HIT°FIN";: GOTO 8001
7810 LPRINT 
7850 PRINT  "°LSE°PAG°016°LDI°VARL_P°LX_PBSHTTAB°001°000°GAB°LOC°000°001°DXY°004°004°ANI°LX_PBSHTTAB°SPR°PAG°017°SND°LX_SFX_SHT°PAG°016°FIN";: POKE 4010|00,CODE "°224" : GOTO 7500
7860 PRINT "°LSE°PAG°016°FIN"; : LET P = PEEK ( °LX_FLCH  + PEEK °LASTK ) : IF P=8 THEN LET P=R+U*W
7860 PRINT "°LSE°PAG°016°LDI°VARL_P°LX_PBAIMTAB°001°000°GAB°LOC°000°001°DXY°005°004°ANI°LX_PBAIMTAB°SPR°FIN";: CONTINUE
7870 GOTO 7850
7900 IF ABS (C-Q)>U OR ABS (D-N)>U THEN GOTO 7700
7901 PRINT "°LSE°PAG°022°POK°LX_RATATAB°000°FIN"; : LET S=SGN(D-N) : LET O=K : IF NOT S OR ATTR (C,D+S+(S>K)) DIF CODE "°007" THEN LET S=K : LET O=SGN(C-Q) : PRINT "°LSE°POK°LX_RATATAB°002°FIN";
7902 FOR Y=K TO CODE "°30": IF ATTR (C+O+(O>K),D+S+(S>K)) = CODE "°007" THEN LET C=C+O:LET D=D+S: PRINT  "°LSE°PAG°016°CLE°PAG°022°LOC°001°001°DXY°004°004°ANI°LX_RATATAB°SPR°FIN": NEXT Y
7903 IF ATTR (C,D-L)=CODE "°120" THEN PRINT "°LSE°PAG°016°CLE°DXY°002°002°DIR°LXSPBLK°SPR°FIN": LET Q=C: LET N=D-R: GOTO 7910
7905 GOTO 7700
7910  LET Q= PEEK °SPECESCL: PRINT "°LSE°PAG°017°SND°LX_SFX_CAID°FIN";: IF Q < 14 THEN FOR Y=Q TO Q+U*R: PRINT AT Y,PEEK °SPECESCC;"°016°007°017°000°019°000°128°128°008°008°LSE°PAG°016°DXY°001°002°DIR°GRFESC°SPO°LOC°000°000°SPR°FIN": NEXT Y: GOTO 7700
7911 IF PEEK °LX_LSTORD > CODE "°252" THEN FOR Y=Q TO Q+U: PRINT AT Y,PEEK °SPECESCC;"°016°007°017°000°019°000°128°008°LSE°PAG°016°DXY°001°001°DIR°GRFBBRICK°SPO°LOC°000°000°SPR°FIN": NEXT Y: GOTO 7700
7912 PRINT "°LSE°PAG°023°FIN": LET F=PEEK (°TABOBJ+M)+256*PEEK (°TABOBJH+M): PRINT AT Q,PEEK °SPECESCC; "°LSE°PJP°LX_PJP_PUERTAOFF";"°LSE°PAG°022°DIR°PUEOFFA°LOC°003°005°DXY°006°001°SPD°LOC°000°005°SPO°LOC°255°004°SPD°LOC°000°005°SPO°DIR°PUEOFFB°LOC°255°004°SPD°LOC°000°005°SPO°PAG°023°FIN" AND PEEK F DIF CODE "°192": POKE F,CODE "°192": GOTO 7700
7920 PRINT AT Q,N;"°LSE°PAG°023°LDI°000°160°000°064°128°023°LDI°000°192°000°160°128°023°FIN°016°007°019°000°128°LSE°PAG°016°DXY°001°001°DIR°GRFBBRICK°LOC°001°000°SPD°LOC°000°000°SPO°FIN": LET F=PEEK °SPECRDL:  LET F=F-L+R*(ATTR(Q,N-CODE "°15") = CODE "°006"): POKE °SPECRDL,F: IF NOT F THEN GOTO 7910
7920 GOTO 7700
8000 IF M>54 THEN PRINT "°LSE°PAG°023°FIN": LET A=PEEK(°ROOMNTSIZ+9*W+M)
8005 LET C=100: LET O=K: LET E=K: POKE 4041|0, CODE "°250" : PRINT "°LSE°PAG°023°LDI°FSTVARSRST°FVRDEST°056°000°LDI°000°064°000°192°000°027°POK°23554°000°LDI°PAGKEY_AR°MSTK_CTRL_P°001°000°PAG°023°FIN°022°000°000"; : LET N=PEEK (°TABOBJ+M)+256*PEEK (°TABOBJH+M): POKE 8010|6,PEEK (°ROOMADDL+M) : POKE 8010|7, PEEK (°ROOMADDH+M): POKE 8010|4,PEEK (°ROOMPAG+M)
8010 PRINT "°LSE°PAG°020°RLE°000°000°LDI°000°064°000°160°128°023°LDI°NXTLIN°PROG°002°000°PAG°031°FIN";: GOTO PEEK N
0001 LET O=O+1: LET C(O)=PEEK (N+L): LET D(O)=PEEK (N+R): PRINT AT C(O),D(O);"°LSE°PAG°031°DIR°TESORO°FIN°019°001°017°006°016°000°064°065"; INK O+L;"°LSE°LOC°002°255°FIN°017°000°066°067°LSE°PAG°031°FIN";: LET N=N+4: GOTO PEEK N
0002 LET O=O+1: LET C(O)=PEEK (N+L): LET D(O)=PEEK (N+R): PRINT AT C(O),D(O);"°LSE°PAG°030°DIR°DIANA°FIN°019°001°016°007°064°065°LSE°LOC°002°255°FIN°066°067°LSE°PAG°031°FIN";: LET N=N+4: GOTO PEEK N
0003 LET O=O+1: LET C=PEEK (N+1): LET D=PEEK (N+2): LET C(O)=C: LET D(O)=D: LET O(O)=°LX_ARCHAIMC-56*C-D: PRINT "°LSE°PAG°024°DXY°004°003°DIR°ENEMBAIM°CLE°SPR°PAG°031°LOC°255°001°FIN°021°001°019°001°128°LSE°LOC°002°255°FIN°128°128°128°LSE°LOC°002°255°FIN°128";: LET N=N+4: LET E=2: GOTO PEEK N
0004 LET O=O+L: IF NOT E THEN LET C=PEEK (N+L):LET D=PEEK (N+R): LET S=PEEK (N+INT PI): POKE 23554,O-L: POKE °LX_ESWWTAB, R + U*(M=CODE "°064") + CODE "°006"*(M=R) : PRINT  "°LSE°PAG°030°CLE°DXY°004°004°ANI°LX_ESWWTAB°SPR°PAG°031°FIN": LET E=INT PI : IF M=CODE "°64" THEN IF SF THEN PRINT "°LSE°PAG°030°LDI°LX_IRRUPVENTDW°VARS°002°000°FIN";A$;"°LSE°PAG°031°PJP°LX_PJP_VARZONE"
0004 LET N=N+U: GOTO PEEK N
0005 LET C(L)=CODE "°009": LET D(L)=CODE "°018": LET O(L)=1000+1000*BD:  PRINT AT C(L),D(L);"°021°001°128°019°001°128°128°LSE°POK°LX_MORTITAB°000°POK°LX_MORTARMTAB°000°LOC°002°255°FIN°128°128°LSE°PAG°024°LOC°002°001°DXY°004°004°ANI°LX_MORTITAB°SPR°FIN"; AT 14,K; "°LSE°PAG°030°DIR°MORTIWALL°FIN°016°006°017°003°019°001°064°LSE°LOC°001°255°FIN°064°LSE°LOC°001°255°FIN°064°LSE°LOC°001°255°FIN°064°LSE°LOC°001°255°FIN°064"; AT 14,CODE "°024";"°064°LSE°LOC°001°255°FIN°064°LSE°LOC°001°255°FIN°064°LSE°LOC°001°255°FIN°064°LSE°LOC°001°255°FIN°064°LSE°PAG°031°FIN":LET B=L: LET N=N+U: LET E=U: GOTO PEEK N
0006 IF NOT E THEN LET C=PEEK (N+L): LET D=PEEK (N+R): LET S=4 AND ATTR(C+L,D)=CODE "°007": POKE °LX_ADDSPTAB,3 + S: PRINT "°LSE°PAG°024°CLE°DXY°001°003°ANI°LX_ADDSPTAB°SPR°PAG°031°FIN";: LET E=L
0006 LET N=N+U: GOTO PEEK N
0007 IF NOT E THEN  LET C=PEEK (N+L) : LET D=PEEK (N+R) :LET S=22528 + C * CODE "°032" + D: PRINT  "°LSE°POK°LX_ADDSPTAB°009°PAG°030°CLE°LDI°DFCC°TMPEDFCC°002°000°LDI°SPOSN°TMPESPOSN°002°000°LDI°TMPESPOSN°BTMPESPOSN°002°000°LDI°TMPEDFCC°BTMPEDFCC°002°000°PAG°031°FIN";: LET X=L+INT(RND*U*R):  LET E=CODE "°005"
0007 LET N=N+U: GOTO PEEK N
0008 LET C=PEEK (N+L):LET D=PEEK (N+R): PRINT "°LSE°PAG°030°DXY°004°004°CLE°LOC°001°001°DIR°RATA°SPR°PAG°031°FIN": LET N=N+U: GOTO PEEK N
0009 PRINT AT PEEK (N+L),PEEK (N+R); "°LSE°PAG°030°DXY°005°005°DIR°HORSE°SPR°PAG°031°FIN": LET N=N+U: GOTO PEEK N
0010 PRINT "°LSE°PJP°LX_PJP_WSCARLET" AND NOT E AND SF
0191 LET O=O+L:LET N=N+U:GOTO PEEK N
0192 LET O=O+L: PRINT AT PEEK (N+L),PEEK (N+R); "°LSE°PJP°LX_PJP_PUERTAOFF";"°LSE°PAG°030°DIR°PUEOFFA°LOC°003°005°DXY°006°001°SPD°LOC°000°005°SPO°LOC°255°004°SPD°LOC°000°005°SPO°DIR°PUEOFFB°LOC°255°004°SPD°LOC°000°005°SPO°PAG°031°FIN":LET N=N+U: GOTO PEEK N
0255 POKE 0255|41,PEEK N: POKE 0255|40,PEEK(N+1): PRINT "°LSE°PAG°028°LDI°000°000°LX_LSTORD°011°000°PAG°024°GAB°CLD°POK°LX_RITAB°000°POK°LX_RDTAB°000°LDI°LX_VAR_B_F°VARL_B°005°000°PAG°031°FIN";: LET O=L: GOTO 256+E 
0256 PRINT "°LSE°LDI°LX_CONT_FRE°OLDPPC°002°000°LDI°LX_PROG°PROG°002°000°FIN";: POKE 4210||4220,0:POKE 0,0: GOTO 3999
0257 PRINT "°LSE°LDI°LX_CONT_VAI°OLDPPC°002°000°LDI°LX_PROG°PROG°002°000°FIN";: POKE 4210||4220,0:POKE 0,0: GOTO 3999
0258 PRINT "°LSE°LDI°LX_CONT_BOW°OLDPPC°002°000°LDI°LX_PROG°PROG°002°000°FIN";: POKE 4210||4500,0:POKE 0,0: LET SK=(INT PI-BD)*U*R-U: GOTO 3999
0259 IF C=A AND B>D THEN GOTO 8999
0259 GOTO 0256
0260 GOTO 8400
0261 PRINT "°LSE°LDI°LX_CONT_WAS°OLDPPC°002°000°LDI°LX_PROG°PROG°002°000°FIN";: POKE 4210||4400,0:POKE 0,0: GOTO 3999
8400 IF MF THEN PRINT "°LSE°LDI°LX_CONT_MOR°OLDPPC°002°000°LDI°LX_PROG°PROG°002°000°FIN";: POKE 4210||4600,0:POKE 0,0: POKE 4041|0,CODE "°234": GOTO 3999
8401 GOTO _8450: PRINT "°LSE°PAG°016°DXY°004°004°ANI°LX_PROTQUIETO°SPR°FIN": LET MF=L: LET F=CODE "R": GOTO _9920: GOTO _9000: GOTO PZ: GOTO 8001
8450 POKE 4020|00,250-16*W:POKE 4030|00,234+16*W:POKE 4010|00,224:  PRINT "°LSE°POK°LX_RITAB°000°POK°LX_RDTAB°000°LDI°VARL_W°LX_PROTQUIETO°001°000°PAG°016°GAB°CLD°ESC°LDI°LX_VAR_B_F°VARL_B°005°000°FIN";: RETURN
8500 PRINT "°LSE°PAG°023°DIR°LX_FNTLB°FIN"; AT 21,7;"0" AND G<100;"0" AND G<10;G; #K;AT 1,3;V;AT 1,7;"0" AND (H<10) ;H;: RETURN 
8600 LET V=V-L: OUT OB,R: IF V THEN GOTO 8500
8601 IF E=INT PI THEN PRINT "°LSE°PAG°030°FIN";:POKE °LX_ESWWTAB, R+U*I: LET D=-INT -D: PRINT "°LSE°PAG°030°CLE°DXY°004°004°ANI°LX_ESWWTAB°SPR°FIN";
8602 IF NOT T THEN LET W=L+W+W: PRINT "°LSE°PAG°022°GAB°LOC°000°001°DXY°005°004°LDI°VARL_W°LX_PROTDEDW°001°000°ANI°LX_PROTDEDW°SPR°FIN";  "°LSE°GAB°ANI°LX_PROTDEDW°SPR°PAG°023°LDI°000°064°000°192°128°023°FIN" AND ACS K * ACS K * ACS K;
8620 PRINT "°LSE°LDI°LX_PROG°PROG°002°000°LDI°LX_VARZONE°VARS°002°000°FIN";: LET F=CODE "G":GOTO 1500
8629 FOR Y=K TO BD: GOTO _8600: NEXT Y:  PRINT "°LSE°PAG°017°SND°LX_SFX_HIT°PAG°016°DXY°001°003°DIR°LXSPBLK°CLE°SPR°LDI°LX_CONT_FRE°OLDPPC°002°000°FIN";:  CONTINUE 
8710 PRINT AT K,K; "°LSE°PAG°023°LDI°000°064°000°0192°000°027°PAG°030°DXY°006°000°COP°FIN": FOR Y=CODE "A" TO CODE "O": POKE 8720|1,Y:PRINT AT L,K; "°LSE°PAG°030°LDI°VARL_F°VARS°002°000°DXY°016°000°COP°FIN"
8720 PRINT A$;Z$;"°LSE°PAG°023°LDI°000°064°000°192°000°027°PJP°LX_PJP_VARZONE":  NEXT Y: RETURN
8999 GOTO _9000: GOTO 1000
9000 PRINT "°LSE°LDI°LX_PROG°PROG°002°000°FIN";: RETURN
9900 IF INKEY DIF "" THEN GOTO 9900
9905 POKE °LASTK, INT CODE INKEY: PRINT "°LSE°LDI°LX_VARZONE°VARS°002°000°PAG°017°MUS°FIN"; :IF NOT INT PEEK LK THEN GOTO 9901
9906 PRINT "°LSE°PAG°017°LDI°LXMUSSILD°LXMUSCNT°018°000°MUS°MUS°POK°LX_MUS_ON°000°PAG°022°AYS°LX_SFX_TECLA°PAG°023°FIN";: LET F=PEEK LK-CODE "1": IF F=-CODE "°036" THEN POKE LK,CODE  "@"
9908 RETURN
9910 PRINT "°LSE°PAG°023°LDI°000°064°000°192°000°027°PAG°031°FIN";: GOTO 9940
9920 PRINT "°LSE°PAG°022°AYS°LX_SFX_TECLA°PAG°023°LDI°000°064°000°192°000°027°PAG°031°FIN";
9930 LET N=K: LET J=R
9940 PRINT "°LSE°LDI°LX_FNTLW°CHARS°002°000°FIN";:POKE 9941|0018,J:POKE 9941|21,F:POKE 9941|11,PEEK (N+°LX_CURRLANGH):POKE 23627,PEEK (N+°LX_CURRLANGL)
9941 POKE 23628,CODE "A":PRINT #CODE "A";A$;: PRINT "°LSE°LDI°LX_VARZONE°VARS°002°000°FIN";:RETURN 
9984 STOP


DATA BLOCKS
-----------

SET_STACK   = $B800
ROM_CEROS   = 15584

**************************************************************************
 PAGINA CERO
**************************************************************************

$C000
            
MPAGE0_INI  
            
LX_SPRITE_OO
            WORD   $1A45,LX_ORIDES,$0EAA 
            WORD   $1118  
            WORD   $1A45,LX_ORIORI,$0E98 
            WORD   $1118  
            WORD   $10A6,LX_SPRITE,$102F 
            
LX_SPRITE_D
            WORD   $1A45,LX_ORIDES,$0EAB 
            WORD   $1118  
            WORD   $1A45,LX_ORIORI,$0E9A 
            WORD   $1118  
            WORD   $10A6,LX_SPRITE,$102F 

LX_SPRITE_O
            WORD   $1A45,LX_ORIDES,$0EAA 
            WORD   $1118  
            WORD   $1A45,LX_ORIORI,$0E9A 
            WORD   $1118  
            
            
LX_SPRITE   
            

            WORD   $1A45,LX_ORIDES,LX_ORIDESSK ,$16F9  
            WORD   $1A45,LX_ORIORI,LX_ORIORISK ,$16F9  
                        
            WORD   $1A45,LISTSP,LX_SPR_BUK 
            WORD   $1118                    
            
            WORD   $1A45, SPRDIMXYP, SPRDIMXYC 
            WORD   $16F9  
            
            
            WORD   $10A6,CHARS 
            WORD   $2AF0  
            WORD   $3447,$2BEF,$3447  
             
LX_SPR_BUK

            WORD   $16AD   
            WORD   $16AE  
            WORD   $1984  
            WORD   $2BEF  
            WORD   $168D  
            WORD   $2994  
            WORD   $10A6  
            WORD   LX_SPR_SKIPC 
            WORD   $102E  
LX_SPR_SKIPC         
            WORD   $0B0D  
            WORD   $0E98  
            WORD   $16AE  
            WORD   $0AEC  
            WORD   $1734  
            WORD   $05DF  
            WORD   $0361, $0361, $0361  
LX_ORIDES   WORD   $0EAA  

LX_ORIORI   WORD   $0E98  
     
            WORD   $007B  
            WORD   $16AD    
            WORD   $0C84  
            WORD   $16AE  
            WORD   $1F52  
            WORD   $168D  
            WORD   $1E83, $035F 
            WORD   $23A2  
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83
LX_SPRRETSK
            WORD   $10A6  
            WORD   SPRDIMXYC
            WORD   $1731  
            WORD   $1B6D  
            WORD   $16FD  
            
            WORD   $1FC6  
            WORD   $0C7D  
            
            WORD   $10A6  
            WORD   SPRDIMXYP+1
            WORD   $1733  
           
            WORD   $0BD0  
            WORD   $10A6  
            WORD   SPRDIMXYC
            WORD   $16FD  
            
            WORD   $10A6  
            WORD   LX_K_SPRTBUK1 
            WORD   $102E  
            
            WORD   $0F8D  
            WORD   $0B09  
            WORD   $1B6D  
            WORD   $0E9B  
            WORD   $0DF4  
            WORD   $0F9C  
            WORD   $168D   
            
            WORD   $0C7D  

LX_SPR_SKIPC
            WORD   $16AD  
            WORD   $16AE  
            WORD   $168D  
            
            WORD   $0B0D  
            WORD   $0E98  
            WORD   $16AE  
            WORD   $0AEC  
            WORD   $1734  
            WORD   $05DF  
            WORD   $0361, $0361, $0361  
LX_ORIDESSK WORD   $0EAA  

LX_ORIORISK WORD   $0E98  
            
            WORD   $007B  
            WORD   $1E83, $035F 
            WORD   $23A2  
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83

           
            WORD   $10A6  
            WORD   LX_SPRRETSK
            WORD   $102F 
            
LX_COLDET
            WORD   $1A45,LX_COLAREA,LX_COLAREA+1 
            WORD   $0CF6,LX_COLAREAFIN-LX_COLAREA-1
            WORD   $33C3
           
           
             
            WORD   $0B0D  
            WORD   $0E88 
            WORD   $10A6  
            WORD   $0181 
            WORD   $032F 
            WORD   $0CF6 
            WORD   $0707 
            WORD   $1981 
            WORD   $3439 
            WORD   LX_COLCAE  
            WORD   $102E  

LX_COLDETC
             
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $015F  
            
            WORD   $032F  
            WORD   $2F98,$029A
            WORD   $168D  
            WORD   $2994    
            WORD   $0C84  
            WORD   $10A6  
            WORD   LX_COLIZBRD 
            WORD   $102E  
            
            WORD   $168D  
            WORD   $007B  
            WORD   $168D  
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
            
            WORD   $10A6  
            WORD   LX_COLIZPASE 
            WORD   $102E  
            
            WORD   $16AD 
            WORD   $16AE  
            WORD   $007B 
            WORD   $168D 

            WORD   $1986  

            WORD   $10A6  
            WORD   LX_COLIZCERCA 
            WORD   $102E  

            WORD   $10A6  
            WORD   $FFE0 
            WORD   $032F 
            
            WORD   $1986  

            WORD   $10A6  
            WORD   LX_COLIZP2 
            WORD   $102E  
            
            WORD   $10A6  
            WORD   LX_COLIZP2NO            

            WORD   $102F  

LX_COLIZP2
            WORD   $10A6  
            WORD   $FFDF  
            WORD   $032F  
            
            WORD   $1986  


LX_COLIZP2NO
            WORD   $2FB8  
            WORD   LX_COLPELDR
            
            WORD   $10A6  
            WORD   LX_COLIZPELD            

            WORD   $102F              
LX_COLIZCERCA            
            WORD   $10A6  
            WORD   $FFDF  
            WORD   $032F   
            
            WORD   $1986  
LX_COLIZPASE
            
LX_COLIZBRD             
            WORD   $2FB8  
            WORD   LX_COLIZQR
LX_COLIZPELD            
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  
          
                     
             
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $0164 
            
            WORD   $032F   
            WORD   $2F98,$029A  
            WORD   $168D  
            WORD   $0C84  
            WORD   $10A6  
            WORD   LX_COLDRBRD 
            WORD   $102E  
            
            WORD   $168D 
            WORD   $007B 
            WORD   $168D            
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
            
            WORD   $10A6  
            WORD   LX_COLDEPASE 
            WORD   $102E  
            
            WORD   $168D 
            WORD   $2BEF  
            WORD   $007B  
            WORD   $168D 

            WORD   $1986  

            WORD   $10A6  
            WORD   LX_COLDECERCA 
            WORD   $102E  

            WORD   $10A6  
            WORD   $FFE0  
            WORD   $032F   
            
            WORD   $1986  


            WORD   $10A6  
            WORD   LX_COLDEP2 
            WORD   $102E  
            
            WORD   $10A6  
            WORD   LX_COLDEP2NO            

            WORD   $102F  

LX_COLDEP2
            WORD   $10A6  
            WORD   $FFE1  
            WORD   $032F   
            
            WORD   $1986  


LX_COLDEP2NO

            WORD   $2FB8  
            WORD   LX_COLPELDR
            
            WORD   $10A6  
            WORD   LX_COLDEPELD            

            WORD   $102F  
LX_COLDECERCA            
            WORD   $10A6  
            WORD   $FFE1  
            WORD   $032F   
            
            WORD   $1986  
LX_COLDEPASE
            
            
            
LX_COLDRBRD            
            WORD   $2FB8  
            WORD   LX_COLDERR
LX_COLDEPELD            
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  

LX_COLDETAR 
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $00E0  
            WORD   $032F   
            WORD   $3447  
            WORD   $2FB8  
            WORD   $0707  
            WORD   $1986  
            WORD   $2FB7   
            WORD   LX_COLARRR
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  
                 
            
            WORD   $2312 
            WORD   $10A6  
            WORD   $00A0 
            WORD   $032F   
            WORD   $1986  
            WORD   $2FB8  
            WORD   LX_COLABAR
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83   
                 
            WORD   $10A6 
            WORD   LX_K_SPRTBUK1
            WORD   $102F 

LX_COLCAE  
            WORD   $10A6  
            WORD   LX_COLCAER 
            WORD   $0D69 
            
            WORD   $10A6  
            WORD   LX_SALTANDO+3
            WORD   $0330 
            WORD   $1996 
                
            WORD   $10A6  
            WORD   LX_K_SPRTBUK1 
            WORD   $102E  
                
            WORD   $10A6 
            WORD   LX_COLDETC
            WORD   $102F    

LX_GAB
            WORD   $15FF,$168D,$0AFC,$15FF

            WORD   $1A45,LX_GAB_RET,LX_GAB_VARA_
            WORD   $0A83  

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_A 
            WORD   $102F 

LX_GAB_VARA_RET

            WORD   $10A6,LX_VAR_A
            WORD   $16FD 
        
            WORD   $10A6,$FFE8
            WORD   $340D 
            WORD   $3439 
            WORD   SPOSN+1
            WORD   $02B9,$370A
        
            WORD   $1A45,LX_GAB_RET,LX_GAB_VARB_
            WORD   $0A83

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_B 
            WORD   $102F 
            
LX_GAB_VARB_RET
                
            WORD   $10A6,LX_VAR_B 
            WORD   $16FD 
            
            WORD   $10A6,$FFDF 
            WORD   $340D 
            WORD   $3439  
            WORD   SPOSN  
            WORD   $02B9,$370A   
                        
            WORD   $0B09   
            WORD   $0E9B  
            WORD   $0DF4    
   
            WORD   $15FF,$0CF6,$0000,$0B1D,$168D,$15FF 
  
            WORD   $10A6,LX_K_SPRTBUK1,$102F 


LX_GAB_RBUILD_EXE
            
            WORD   $10A6,LX_GAB_RBUILD_DEST
            WORD   $0CF6,$168D  
            WORD   $16FD        
            WORD   $0BD1        
            WORD   $0CF6,$33B4  
            WORD   $16FD        
            WORD   $0BD1        
            WORD   $0CF6,$2DA2  
            WORD   $16FD        

            WORD   $10A6,LX_GAB_RBUILD_DEST
            WORD   $102F        
                     
            WORD   0000,0000,0000,0000
            WORD   0000,0000,0000,0000,0000
LX_GAB_RBUILD_DEST    
            WORD   $168D 
            WORD   $33B4 
            WORD   $2DA2 
            WORD   $10A6 
LX_GAB_ WORD   $0000
            WORD   $102F 
            
----------------------------------            
LX_DIMXY    
            WORD   $0F9C
            WORD   $0BD1  
            WORD   $096E, SPRDIMXYP
            WORD   $16F9  
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF
            WORD   $10A6,LX_K_SPRTBUK1,$102F 

JPUPDANIM           
            WORD   $0F9C  
            WORD   $2AEF  
            WORD   $168D     
            WORD   $2AF0  
            WORD   $0BD1  
            WORD   $1731  
            WORD   $2BEF  
            WORD   $2BEF  
            WORD   $168D  
            WORD   $340D  
            WORD   $007B  
            WORD   $168D  
            WORD   $0D69  
            WORD   $2AF0  
            WORD   $0BD1  
            WORD   $0BD1  
            WORD   $0BD1  
            WORD   $034C  
            WORD   $35C6  
            WORD   CHARS
            WORD   $16F9  
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            WORD   $10A6,LX_K_SPRTBUK1,$102F 



LX_CLENEM   
            WORD   $15FF,$168D,$0AFC,$15FF

            WORD   $1A45,LX_COLENEMI,$0000         
            WORD   $0A83                           
            
            WORD   $1A45,LX_COLENEMP,$0000
            WORD   $1118
            
            WORD   $1A45,LX_GAB_RET,LX_CLE_VARC_
            WORD   $0A83                  

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_C
            WORD   $102F                           
            
LX_CLE_VARC_RET
        
                    

            WORD   $10A6,$FFE8        
            WORD   $340D               
            WORD   $3439              
            WORD   SPOSN+1
            WORD   $02B9,$370A        
            
            
            
            WORD   $1A45,LX_GAB_RET,LX_CLE_VARD_
            WORD   $0A83  

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_D 
            WORD   $102F 
            
LX_CLE_VARD_RET
         
            
            WORD   $10A6,$FFDF    
            WORD   $340D               
            WORD   $3439          
            WORD   SPOSN          
            WORD   $02B9,$370A    
                        
            WORD   $0B09   
            WORD   $0E9B  
            WORD   $0DF4    
            
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $00FF  

            WORD   $032F   
            
            
            WORD   $2F98,$029A  
            WORD   $168D  
            WORD   $0C84  
            
            WORD   $10A6           
            WORD   LX_COLENEMIBRD   
            WORD   $102E           
            
            WORD   $168D  
            WORD   $007B  
            WORD   $168D  
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
            
           
            
            WORD   $2FB8  
            WORD   LX_COLENEMI
           
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  

LX_COLENEMIBRD 
           
             
 
            WORD   $10A6  
            WORD   $0004  
            
            WORD   $032F   
            WORD   $2F98,$029A  
            WORD   $168D  
            WORD   $0C84  
            WORD   $10A6  
            WORD   LX_COLENEMDBRD  
            WORD   $102E  

            WORD   $168D  
            WORD   $007B  
            WORD   $168D  
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
           
            
            WORD   $2FB8  
            WORD   LX_COLENEMD
           
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  

LX_COLENEMDBRD
           
           
           
           
            WORD   $0B0D  
            WORD   $2BEF       
            WORD   $007B  

            WORD   $096E,$6000  
            WORD   $35C6,$A700  
            WORD   $1F52  

            WORD   $35C6,$6000  
            WORD   $1F52  
            
            WORD   $35C6,$9904  
            WORD   $1F52  

            WORD   $35C6,$6000  
            WORD   $1F52  
            
            WORD   $35C6,$A700  
            WORD   $1F52  

            WORD   $35C6,$6000  
            WORD   $1F52  

            WORD   $35C6,$0000  
            WORD   $1F52  

            WORD   $10A6  
            WORD   LX_COLENEMI_PROTA  
            WORD   $102E  

            




            WORD   $1A45,LX_COLENEMI,$0000
            WORD   $1118 
            
            WORD   $1A45,LX_COLENEMP,$0101
            WORD   $1118 
            
            
LX_COLENEMI_PROTA  
        
            WORD   $15FF,$0CF6,$0000,$0B1D,$168D,$15FF 
            
            WORD   $10A6,LX_K_SPRTBUK1,$102F 


RUTALT0 

            
LX_FLEBYTE OR
            
            WORD   $10A6,FLECP
            WORD   $007B  
           
            
            WORD   $10A6,$029A 
            WORD   $0C84 
            
            WORD   $10A6  
            WORD   LX_FLECOR 
            WORD   $102E  

            
            WORD   $10A6,FLECP+1
            WORD   $007B
            WORD   $10A6,$02A2
            WORD   $0C84 
            
            WORD   $10A6  
            WORD   LX_FLECOR 
            WORD   $102E  
            
            
            WORD   $10A6,LX_SPRITE_O,$102F
            
LX_FLECOR   
       
            WORD   $2994
            WORD   $10A6,FLECP+1
            WORD   $0D69  
            WORD   $10A6,LX_K_SPRTBUK1,$102F 
               
            
       
PROTROAM    ARCHIVO "ARTE/LX_PROT_ROAM.SPR"   < SPRITE PROTAGONISTA CORRIENDO
PROTQUII    =    PROTROAM+PROTROAM_32
PROTQUID    =    PROTROAM+PROTROAM_68
PROTSALT    ARCHIVO "ARTE/LX_SALTO.SPR"       < SPRITE PROTAGONISTA SALTANDO
PROTCAE     ARCHIVO "ARTE/LX_PROTCAE.SPR"     < SPRITE PROTAGONISTA CAYENDO
 
PROTESC     ARCHIVO "ARTE/LX_PROTESC.SPR"     < SPRITE PROTAGONISTA EN ESCALERA        
PROTSBES    ARCHIVO "ARTE/LX_SUBEBAJAESC.SPR" < SPRITE PROTAGONISTA SUBE Y BAJA ESCALERA 
PROTSIES    =    PROTSBES+$0000
PROTSDES    =    PROTSBES+$00C0           
PROTBIES    =    PROTSBES+$0180
PROTBDES    =    PROTSBES+$0240
  
PROTBOWAIM  ARCHIVO "ARTE/LX_PROTBOW_AIM.SPR" < SPRITE PROTAGONISTA APUNTA ARCO
PROTBSHT    ARCHIVO "ARTE/LX_PROTBOW_SHT.SPR" < SPRITE PROTAGONISTA DISPARA ARCO
ENEMBAIM    ARCHIVO "ARTE/LX_ENEMBOW_AIM.SPR" < SPRITE ENEMIGO APUNTA BALLESTA        
ENEMBSHT    ARCHIVO "ARTE/LX_ENEMBOW_SHT.SPR" < SPRITE ENEMIGO DISPARA BALLESTA     
ENEMBRLD    ARCHIVO "ARTE/LX_ENEMBOW_RLD.SPR" < SPRITE ENEMIGO RECARGA BALLESTA
ENEMBRLDT   = ENEMBRLD+64   
FLECHA      ARCHIVO "ARTE/LX_FLECHA.SPR"      < SPRITE FLECHAS

ADDSPRITES
            
ADDER       ARCHIVO "ARTE/LX_ADDER.SPR"       < SPRITE VIBORA
PIPISTRELLE = $-$C0

MORTIANNA   ARCHIVO "ARTE/LX_MORTIANNA.SPR"   < SPRITE MORTIANNA

MORTILARM   = $
MORTIRARM   = $+32
            ARCHIVO "ARTE/LX_MORTIANNA_ARM.SPR" < SPRITE BRAZO MORTIANNA
            

         
LXSPBLK     WORD   $FFFF,$FFFF,$FFFF,$FFFF
            WORD   $FFFF,$FFFF,$FFFF,$FFFF
            WORD   $FFFF,$FFFF,$FFFF,$FFFF
            WORD   $FFFF,$FFFF,$FFFF,$FFFF
 
GRFESC      ARCHIVO "ARTE/LX_GRFESC.SPR"		  < GRAFICO ESCALERA

GRFBBRICK   ARCHIVO "ARTE/LX_GRFBBRICK.SPR"    < GRAFICO LADRILLO

            
            
LX_FLENEMSG = $-1 
LX_FLCH_ATT = $     
            BYTE    129,127,063,000,001,002,067,131 
            BYTE    065,064,032,000,001,002,034,066
      

            
LX_FLCH     =  $-$10  
         
            BYTE    008,006,002,008 000100ID
            BYTE    000,007,001,008 000101ID
            BYTE    004,005,003,008 000110ID
            BYTE    008,008,008,008 000111XX

 
GENFLECHA   = $

            BYTE    065,033,001,001,002,002,002,067 



            
GENFLECHAL  =  $
            BYTE    002,001,001,002,002,002,001,002
GENFLECHAC  =  $
            BYTE    001,002,002,002,002,001,001,002
            
            
            
GENFLECHAIL =  $
            BYTE    001,001,002,003,003,002,001,000
GENFLECHAIC =  $
            BYTE    000,001,001,001,000,255,255,255         
        

            
GENFLECHAEL  =  $-1
            BYTE    007,007,003,000,000,000,003,007
GENFLECHAEC  =  $-1
            BYTE    003,000,000,000,003,006,006,006
  
            
GENFLECHAILE =  $-1
            BYTE   255,255,000,001,001,000,255,254
GENFLECHAICE =  $-1
GENFLECHAICM =  $+4
            BYTE   000,001,001,001,000,255,255,255
GENPOWMORT  = $-1 
            BYTE   254          
            
LX_FLECHATABENEM         
            WORD   $0000
            WORD   LX_RDANIM-1
            WORD   CROSSBOW+$0000
            
            WORD   CROSSBOW+$0000
            WORD   CROSSBOW+$0010
            WORD   CROSSBOW+$0020
            WORD   CROSSBOW+$0030
            
            WORD   CROSSBOW+$0040
            WORD   CROSSBOW+$0050
            WORD   CROSSBOW+$0060
            WORD   CROSSBOW+$0070      

WASPX       =  $-1
            BYTE    003,004,005,006,007,008,001,002,003,004,005,006,007            
   
LX_COLDETESC

            WORD   $0B0D  
            WORD   $05DF  
            WORD   $0361, $0361, $0361  
            WORD   $0EAA  
            WORD   $0CF6  
            WORD   $0140  
            
            WORD   $0330  
            WORD   $168D   
             WORD   $1986  
             WORD   $10A6  
             WORD   LX_COLDETER1 
             WORD   $102E  
            
            WORD   $168D  
            WORD   $18BE  
            WORD   $035F  
            WORD   $168D  
             WORD   $1986  
             WORD   $10A6  
             WORD   LX_COLDETER1
             WORD   $102E  
            
            WORD   $168D  
            WORD   $18BE  
            WORD   $035F  
            WORD   $168D  
             WORD   $1986  
             WORD   $10A6  
             WORD   LX_COLDETER1 
             WORD   $102E  
             
             WORD   $10A6   
             WORD   LX_COLDETER
             WORD   $2D9E,LX_K_SPRTBUK1
             WORD   $102F 
          
LX_COLDETER1            
             WORD   $10A6   
             WORD   LX_COLDETER
             WORD   $16FF
            WORD   $168D  
            WORD   $18BE 
            WORD   $0CF6  
            WORD   $0004
            WORD   $1986  
            WORD   $10A6  
            WORD   LX_K_SPRTBUK1 
            WORD   $102E  
            WORD   $168D  
             WORD  $2D9E,LX_K_SPRTBUK1
             WORD  $102F 

           
MPAGE0_END 

**************************************************************************
 PAGINA UNO
**************************************************************************

$C000
           
MPAGE1_INI
TANOTA

			WORD  $34F5,$31FC,$2F2E,$2C88
			WORD  $2A08,$27AC,$2572,$2358
			WORD  $215C,$1F7D,$1DB9,$1C0E
			WORD  $1A7A,$18FE,$1797,$1644

			WORD  $1504,$13D6,$12B9,$11AC
			WORD  $10AE,$0FBE,$0EDC,$0E07
			WORD  $0D3D,$0C7F,$0BCB,$0B22
			WORD  $0A82,$09EB,$095D,$08D6

			WORD  $0857,$07DF,$076E,$0703
			WORD  $069F,$0640,$05E5,$0590
			WORD  $0541,$04F6,$04AE,$046B
			WORD  $042C,$03F0,$03B7,$0382

			WORD  $034F,$0320,$02F3,$02C8
			WORD  $02A0,$027B,$0257,$0235 
			WORD  $0216,$01F7,$01DC,$01C1
			WORD  $01A7,$0190,$0179,$0164

			WORD  $0150,$013D,$012C,$011B
			WORD  $010B,$00FC,$00EE,$00E0
			WORD  $00D4,$00C8,$00BD,$00B2
			WORD  $00A8,$009F,$0096,$008D
			WORD  $0085,$007E,$0077,$0070
			WORD  $006A,$0064,$005E,$0059
			WORD  $0054,$004F,$004B,$0047
			WORD  $0043,$003F,$003B,$0038
			WORD  $0035,$0032,$002F,$002D
			WORD  $002A,$0028,$0025,$0023
			WORD  $0021,$001F,$001E,$001C
			WORD  $001A,$0019,$0018,$0016
			WORD  $0015,$0014,$0013,$0012
			WORD  $0011,$0010,$000F,$000E
            
            
AYCTRL      = $FFFD
AYDATA      = $BFFD

            
            
            WORD   $1E92    
            WORD   $0707    
            WORD   $0CF6    
            WORD   AYCTRL
            WORD   $1E7D    
            WORD   $1E92    
            WORD   $FFFF    
            WORD   $0CF6    
            WORD   AYDATA
            WORD   $1E7D    
            
            
            
LX_MUSIC
            
            WORD   $1A45           
            WORD   LX_MUS_EXIT+2
            WORD   LX_K_SPRTBUK1
            WORD   $1118           
   
            
LX_MUS_CNT           
            
            WORD   $10A6,LX_MUS_ON     
            WORD   $007B               
            WORD   $1996               
            
            WORD   $10A6               
            WORD   LX_MUS_EXIT         
            WORD   $102E               

           
           
            
            WORD   $1E92,$0808         
            WORD   $0CF6,AYCTRL        
            WORD   $1E7D               
            
            WORD   $10A6,LX_MUS_SAMA   
            WORD   $007B               
            WORD   $370A               
            WORD   $1996               
            
            WORD   $10A6               
            WORD   LX_MUS_SAMBX        
            WORD   $102E               
            
            WORD   $10A6,LX_MUS_SAMA   
            WORD   $2994               
            WORD   $370A               
            
            WORD   $1F5E               
            WORD   $0CF6,AYDATA        
            WORD   $1E7D               
            
             
LX_MUS_SAMBX            
            WORD   $1E92,$0909     
            WORD   $0CF6,AYCTRL    
            WORD   $1E7D               
            
            WORD   $10A6,LX_MUS_SAMB   
            WORD   $007B           
            WORD   $370A           
            WORD   $1996               
            
            WORD   $10A6               
            WORD   LX_MUS_SAMCX        
            WORD   $102E               
            
            WORD   $10A6,LX_MUS_SAMB   
            WORD   $2994               
            WORD   $370A           
            
             WORD   $1F5E          
            
            WORD   $0CF6,AYDATA    
            WORD   $1E7D           
            
            
LX_MUS_SAMCX           
             
            
            WORD   $1E92,$0A0A           
            WORD   $0CF6,AYCTRL        
            WORD   $1E7D               
            
            WORD   $10A6,LX_MUS_SAMC   
            WORD   $007B               
            WORD   $370A               
            WORD   $1996               
            
            WORD   $10A6               
            WORD   LX_MUS_SAMXIT       
            WORD   $102E               
            
            WORD   $10A6,LX_MUS_SAMC   
            WORD   $2994               
            WORD   $370A               
            
             WORD   $1F5E              
            
            WORD   $0CF6,AYDATA        
            WORD   $1E7D               

LX_MUS_SAMXIT         
      
             
            
            WORD   $10A6,LX_MUS_CON    
            WORD   $007B               
            WORD   $2994               
            WORD   $0D69              
            
            WORD   $10A6               
            WORD   LX_MUS_TEMPO        
            WORD   $102E               
            
            WORD   $10A6,LX_MUS_EXIT,$102F 
            
LX_MUS_TEMPO
            WORD   $10A6,LX_MUS_TEM    
            WORD   $007B               
            WORD   $16AE               
            WORD   $0D69              
            
            
            WORD   $10A6,LX_MUS_CNA
            WORD   $007B               
            WORD   $1996               
            WORD   $10A6               
            WORD   LX_MUS_NORUNA       
            WORD   $102E               
            
            WORD   $10A6,LX_MUS_RUNAX,$102F 

LX_MUS_NORUNA_CONT            
LX_MUS_NORUNA       

    
            WORD   $1E92,$0808           
            WORD   $0CF6,AYCTRL    
            WORD   $1E7D               
            
            WORD   $10A6,LX_MUS_PUA
            WORD   $2AF0           
            WORD   $168D           
            WORD   $007B               
            WORD   $168D           
             
             
            WORD   $1986           
            WORD   $10A6               
            WORD   LX_MUS_LOOP         
            WORD   $102E              
            
            WORD   $05E0       
            
            WORD   $10A6               
            WORD   LX_MUS_RUNA         
            WORD   $102E               
            
            WORD   $1996               
            
            WORD   $10A6               
            WORD   LX_MUS_RLA          
            WORD   $102E               
            
            WORD   $21DE        
            
            WORD   $10A6               
            WORD   LX_MUS_SOSTA        
            WORD   $102E               
            
            WORD   $1E92,$0F0F  
            
            
            WORD   $0CF6,AYDATA   
            WORD   $1E7D               
            
            WORD   $168D                
            WORD   $096E,TANOTA   
            
            WORD   $169C          
            WORD   $16AE          
            WORD   $3447          
           
            WORD   $1E92,$0000    
            WORD   $0CF6,AYCTRL   
            WORD   $1E7D               
            WORD   $0CF6,AYDATA   
            WORD   $007B          
            WORD   $1E7D               
            
            WORD   $1E92,$0101    
            WORD   $0CF6,AYCTRL   
            WORD   $1E7D               
            WORD   $0CF6,AYDATA   
            WORD   $18BE          
            WORD   $1E7D                
            
            WORD   $2FDA 
            WORD   $1F00 
            WORD   LX_MUS_SAMA
            WORD   $0D69 
            
            
LX_MUS_RLA_RET
LX_MUS_RUNA_

              
            WORD   $10A6,LX_MUS_PUA
            WORD   $1118               
            
LX_MUS_RUNAX_           
             
            WORD   $10A6,LX_MUS_CNB  
            WORD   $007B               
            WORD   $1996               
            WORD   $10A6               
            WORD   LX_MUS_NORUNB       
            WORD   $102E               
            
            WORD   $10A6,LX_MUS_RUNBX,$102F 

LX_MUS_NORUNB_CONT            
LX_MUS_NORUNB       

            WORD   $1E92,$0909           
            WORD   $0CF6,AYCTRL   
            WORD   $1E7D               
                       
            WORD   $10A6,LX_MUS_PUB
            WORD   $2AF0           
            WORD   $168D           
            WORD   $007B               
            WORD   $168D           
            
            WORD   $05E0      
            
            WORD   $10A6               
            WORD   LX_MUS_RUNB         
            WORD   $102E               
            
             
            WORD   $1996               
            
            WORD   $10A6               
            WORD   LX_MUS_RLB          
            WORD   $102E               
            
            WORD   $21DE        
            
            WORD   $10A6               
            WORD   LX_MUS_SOSTB        
            WORD   $102E               
           
            WORD   $1E92,$0F0F  
            
            
            WORD   $0CF6,AYDATA 
            WORD   $1E7D               
            
            
            WORD   $168D               
            WORD   $096E,TANOTA 
            
            WORD   $169C               
            WORD   $16AE               
            WORD   $3447                

    
            WORD   $1E92,$0202      
            WORD   $0CF6,AYCTRL     
            WORD   $1E7D               
            WORD   $0CF6,AYDATA     
            WORD   $007B            
            WORD   $1E7D               
            
            WORD   $1E92,$0303      
            WORD   $0CF6,AYCTRL     
            WORD   $1E7D               
            WORD   $0CF6,AYDATA     
            WORD   $18BE            
            WORD   $1E7D                
            
            WORD   $2FDA 
            WORD   $1F00 
            WORD   LX_MUS_SAMB
            WORD   $0D69 
LX_MUS_RLB_RET
LX_MUS_RUNB_ 
        
              
            WORD   $10A6,LX_MUS_PUB 
            WORD   $1118               

LX_MUS_RUNBX_         
            
             
            WORD   $10A6,LX_MUS_CNC  
            WORD   $007B               
            WORD   $1996               
            WORD   $10A6               
            WORD   LX_MUS_NORUNC       
            WORD   $102E               
            
            WORD   $10A6,LX_MUS_RUNCX,$102F 

LX_MUS_NORUNC_CONT            
LX_MUS_NORUNC       

            
            WORD   $1E92,$0A0A           
            WORD   $0CF6,AYCTRL      
            WORD   $1E7D               
            
            
            WORD   $10A6,LX_MUS_PUC  
            WORD   $2AF0             
            WORD   $168D             
            WORD   $007B               
            WORD   $168D             
            
                 
            WORD   $05E0        
            
            WORD   $10A6               
            WORD   LX_MUS_RUNC         
            WORD   $102E               
            
            WORD   $1996               
            
            WORD   $10A6               
            WORD   LX_MUS_RLC          
            WORD   $102E               
            
            WORD   $21DE   
            
            WORD   $10A6               
            WORD   LX_MUS_SOSTC        
            WORD   $102E               
            
            WORD   $1E92,$0F0F 
            
            
            WORD   $0CF6,AYDATA
            WORD   $1E7D               
            
            
            WORD   $168D               
            WORD   $096E,TANOTA
            
            WORD   $169C               
            WORD   $16AE               
            WORD   $3447                
            
            
            
            WORD   $1E92,$0404 
            WORD   $0CF6,AYCTRL
            WORD   $1E7D               
            WORD   $0CF6,AYDATA
            WORD   $007B       
            WORD   $1E7D               
            
            WORD   $1E92,$0505 
            WORD   $0CF6,AYCTRL
            WORD   $1E7D               
            WORD   $0CF6,AYDATA
            WORD   $18BE       
            WORD   $1E7D                
            
            WORD   $2FDA 
            WORD   $1F00 
            WORD   LX_MUS_SAMC
            WORD   $0D69 
LX_MUS_RLC_          
LX_MUS_RUNC_RET

              
            WORD   $10A6,LX_MUS_PUC  
            WORD   $1118               

LX_MUS_RUNCX_           
            
            WORD   $1E92,$0707          
            WORD   $0CF6,AYCTRL      
            WORD   $1E7D               
            WORD   $0CF6,AYDATA      
            WORD   $1E92,%1111100011111000          
            WORD   $1E7D               

            WORD   $10A6,LX_MUS_EXIT,$102F 

LX_MUS_LOOP 
           
            WORD   $10A6,LX_MUS_REP                
            WORD   $2AF0             
            WORD   $168D                           
            WORD   $096E                            
            WORD   LX_MUS_PUA  
            WORD   $0CF6,$0006       
            WORD   $33C3             
            
            WORD   $10A6,LX_MUS_CNT,$102F          


LX_MUS_RLA

            WORD   $2FDA
            WORD   $0000 
            WORD   LX_MUS_SAMA
            WORD   $0D69 
            WORD   $0CF6,AYDATA    
            WORD   $1E7D                
LX_MUS_SOSTA
            WORD   $0F8C 
            WORD   $1E92,$0000
            WORD   $10A6,LX_MUS_RLA_RET,$102F 

LX_MUS_RLB
            WORD   $2FDA 
            WORD   $0000 
            WORD   LX_MUS_SAMB
            WORD   $0D69 
            
            WORD   $0CF6,AYDATA 
            WORD   $1E7D               
LX_MUS_SOSTB            
            WORD   $0F8C
            WORD   $1E92,$0000
            WORD   $10A6,LX_MUS_RLB_RET,$102F 
LX_MUS_RLC

            WORD   $2FDA
            WORD   $0000 
            WORD   LX_MUS_SAMC
            WORD   $0D69
            
            WORD   $0CF6,AYDATA   
            WORD   $1E7D               
LX_MUS_SOSTC           
            WORD   $0F8C 
            WORD   $1E92,$0000
            WORD   $10A6,LX_MUS_RLC_RET,$102F 
            
LX_MUS_RUNA           
            
            WORD   $16AD      
            WORD   $007B      
            WORD   $16AE               
            WORD   $3439      
            WORD   LX_MUS_CNA          
            WORD   $0D69      
            
            WORD   $10A6,LX_MUS_RUNA_RET,$102F 
            
            
LX_MUS_RUNAX       
            
            WORD   $10A6,LX_MUS_CNA    
            WORD   $007B    
            WORD   $2994               
            WORD   $0D69    

            WORD   $10A6               
            WORD   LX_MUS_NORUNA_CONT  
            WORD   $102E               

            

            WORD   $10A6,LX_MUS_RUNAX_RET,$102F 
            
    

LX_MUS_RUNB           
            
            WORD   $16AD    
            WORD   $007B    
            WORD   $16AE               
            WORD   $3439    
            WORD   LX_MUS_CNB          
            WORD   $0D69    
            
            WORD   $10A6,LX_MUS_RUNB_RET,$102F 
            
            
LX_MUS_RUNBX       
            
            WORD   $10A6,LX_MUS_CNB    
            WORD   $007B  
            WORD   $2994               
            WORD   $0D69  

            WORD   $10A6               
            WORD   LX_MUS_NORUNB_CONT  
            WORD   $102E               

            

            WORD   $10A6,LX_MUS_RUNBX_RET,$102F     
            

LX_MUS_RUNC           
            
            WORD   $16AD  
            WORD   $007B  
            WORD   $16AE               
            WORD   $3439  
            WORD   LX_MUS_CNC          
            WORD   $0D69  
            
            WORD   $10A6,LX_MUS_RUNC_RET,$102F 
            
            
LX_MUS_RUNCX       
            
            WORD   $10A6,LX_MUS_CNC    
            WORD   $007B   
            WORD   $2994               
            WORD   $0D69   

            WORD   $10A6               
            WORD   LX_MUS_NORUNC_CONT  
            WORD   $102E               

            


            WORD   $10A6,LX_MUS_RUNCX_RET,$102F 



LX_MUS_EXIT


            WORD   $10A6,LX_TST_FLAG   
            WORD   $007B               
            WORD   $2994               
            
            WORD   $10A6               
            WORD   LX_TST_MEN          
            WORD   $102E               
            
            
            WORD   $10A6,LX_K_SPRTBUK1,$102F 

LXMUSMEND 
            WORD   HOOD_I
            WORD   HOOD_R
            WORD   LXM_CHA
            WORD   LXM_CHB
            WORD   LXM_CHC
            BYTE    $FC
            BYTE    $FC                 
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
     
            ARCHIVO "MUSICA/HOOD.DAT" < MUSICA DEL MENU

LXS         =  $ MOD 256
LXMUSSILD  
            WORD   SILENCIO_I
            WORD   SILENCIO_R
            WORD   SIL_CHA
            WORD   SIL_CHA
            WORD   SIL_CHA
            BYTE    $FE
            BYTE    $FE                 
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00

SILENCIO_I
            WORD   SIL_CHA,SIL_CHA,SIL_CHA
SILENCIO_R
            WORD   SIL_CHA,SIL_CHA,SIL_CHA
SIL_CHA

            BYTE    0
            BYTE    $FD

LXMUSGOVERD 
            WORD   GOVER_I
            WORD   GOVER_R
            WORD   LXGO_CHA
            WORD   LXGO_CHB
            WORD   LXGO_CHC
            BYTE    $F8
            BYTE    $F8                 
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
     
            ARCHIVO "MUSICA/HOODOVER.DAT" < MUSICA GAME OVER

LXMUSFIND 
            WORD   FINAL_I
            WORD   FINAL_R
            WORD   LXFIN_CHA
            WORD   LXFIN_CHB
            WORD   LXFIN_CHC
            BYTE    $FC
            BYTE    $FC                 
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
            BYTE    $00
     
            ARCHIVO "MUSICA/FINAL.DAT"  < MUSICA DEL FINAL          


LX_SFX_SHT  ARCHIVO "SOUND/LOXLEY_ASHOTSQ.SQW" < SONIDO LANZAMIENTO FLECHA             

LX_SFX_HIT  =   $16C0
LX_SFX_CHIT = $-1: 
            ARCHIVO "SOUND/LOXLEY_SWCHIT.SNW"   < SONIDO COLISION ESPADAS
LX_SFX_JUMP ARCHIVO "SOUND/LOXLEY_JUMP.SQW"     < SONIDO SALTO 
LX_SFX_CAID = $1000
LX_SFX_HORS = $-1: ARCHIVO "SOUND/LX_HORSE_8000AY.SNW" < SONIDO CABALLO

            
			TODOS LOS LX_SCD SON DATOS DE PANTALLAS
			TODOS LOS LX_SCG SON LOS TILES GRAFICOS DE PANTALLAS
 
LX_SCD_R13  WORD   LX_SCG_WILDC : ARCHIVO "ARTE/LX_SCD13.DAT" 
LX_SCD_R54  WORD   LX_SCG_WILDC : ARCHIVO "ARTE/LX_SCD54.DAT"
LX_SCD_R63  WORD   LX_SCG_WILDC : ARCHIVO "ARTE/LX_SCD63.DAT"
LX_SCG_WILDC = $-1          : ARCHIVO "ARTE/LX_SCG_WILDC.FNT"
 
LX_SCD_R64  WORD   LX_SCG_CHAPEL: ARCHIVO "ARTE/LX_SCD64.DAT"
LX_SCG_CHAPEL = $-1         : ARCHIVO "ARTE/LX_SCG_CHAPEL.FNT"
 
LX_FINAL_DAT WORD   LX_END_FNT   : ARCHIVO "ARTE/LX_END.DAT"            
LX_END_FNT  = $-1            : ARCHIVO "ARTE/LX_FINAL.FNT"
            
LX_ARCHAIM  ARCHIVO "ARTE/LX_ENEMBOW_AIMTAB.bin",#3480,#690 < DATOS PARA CALCULO ANGULO DE LANZAMIENTO BALLESTA
            BYTE   008
LX_ARCHAIMC = LX_ARCHAIM+(#690/2)-28       


LX_RUSS_GFX
            ARCHIVO "ARTE/LX_RUSS_GFX.BIN"		< TRADUCCION AL RUSO
            ARCHIVO "ARTE/LX_RUSS.FNT",18
LX_RUSS_GFXL = $-LX_RUSS_GFX




LX_RUSS_DA  =  LX_MRK_FNT+1+18
LX_RUSS_BYTE   =  LX_SCG_WILD+1+18
LX_RUSS_DC  =  LX_SCG_INT1+1+18



LX_RUSS_LA  = 27*9
LX_RUSS_LB  =  8*9
LX_RUSS_LC  =  4*9

LX_RUSS_OA  =  PANTFONDO+0000
LX_RUSS_OB  =  PANTFONDO+LX_RUSS_LA
LX_RUSS_OC  =  PANTFONDO+LX_RUSS_LA+LX_RUSS_LB


LX_PJP_TRAINING
            WORD LX_PJP_TRAININGE-$-2
            BYTE  LDI
            WORD LX_RUSS_GFXW
            WORD CHARS
            WORD 002
            BYTE  FIN
            BYTE  016,006,022,002,026,072,073,074,075
LX_PJP_TRAININGE

LX_PJP_SCOLABOROV
            WORD LX_PJP_SCOLABOROVE-$-2
            BYTE  LDI
            WORD LX_RUSS_GFXW
            WORD CHARS
            WORD 002
            BYTE  FIN
            BYTE  016,006
            BYTE  022,008,012,064,065,066,067
            BYTE  022,009,012,068,069,070,071
            
LX_PJP_SCOLABOROVE

            
LX_CONV_A
            BYTE     000,000,000,000
            BYTE     008,008,008,008
            BYTE     016,016,016,016
            BYTE     024,024,024,024
           
            
LX_CONV_B
            BYTE     000,000,000,000
            BYTE     001,001,001,001
            BYTE     002,002,002,002
            BYTE     003,003,003,003
            BYTE     004,004,004,004
            BYTE     005,005,005,005
            BYTE     006,006,006,006
            BYTE     007,007,007,007            
MPAGE1_END           
            
**************************************************************************
 PAGINA CINCO+DOS
**************************************************************************

MPAGE52_INI            
$5B00


CTRL_IZQ    BYTE    "O"
CTRL_DER    BYTE    "P"
CTRL_ARR    BYTE    "Q"
CTRL_ABA    BYTE    "A"
CTRL_FUE    BYTE    "?"
CTRL_PAU    BYTE    "H"
CTRL_QUI    BYTE    "R"
LX_MAINBUKL BYTE    $00
LX_MAINBUKH BYTE    $00
LXLANG      BYTE    001    
LXSTOP      WORD   $0000  
LX_KEYMSK
MS_CTRL_IZ  BYTE   %00000010
MS_CTRL_DE  BYTE   %00000001
MS_CTRL_AR  BYTE   %00000001
MS_CTRL_AB  BYTE   %00000001
MS_CTRL_FG  BYTE   %00000001
MS_CTRL_PA  BYTE   %00010000
MS_CTRL_QU  BYTE   %00001000
SPRDIMXYC   WORD   $0404
SPRDIMXYP   WORD   $0404

LX_COLENEMI BYTE    000
LX_COLENEMD BYTE    000
LX_COLENEMP BYTE    000
            BYTE    000  
LX_COLAREA  BYTE    000 
LX_COLPELDR BYTE    000
LX_COLDETER BYTE    000 
            BYTE    000          
LX_COLIZQR  BYTE    000 
LX_COLDERR  BYTE    000
LX_COLCAER  BYTE    000
LX_COLARRR  BYTE    000
LX_COLABAR  BYTE    000
LX_COLAREAFIN
            BYTE    000
LX_CLX_TRUFLAG BYTE  000
LX_CLX_BORFLAG BYTE  000
LX_CLX_BLKFLAG BYTE  000
LX_CLX_SPRFLAG BYTE  000


LX_MUS_ON   BYTE    000
LXMUSCNT
LX_MUS_INI  WORD   SILENCIO_I
LX_MUS_REP  WORD   SILENCIO_R
LX_MUS_PUA  WORD   SIL_CHA
LX_MUS_PUB  WORD   SIL_CHA
LX_MUS_PUC  WORD   SIL_CHA
LX_TST_FLAG          
LX_MUS_TEM  BYTE    $FF
LX_MUS_CON  BYTE    $FF                 
LX_MUS_CNA  BYTE    $00
LX_MUS_CNB  BYTE    $00
LX_MUS_CNC  BYTE    $00
LX_MUS_SAMA BYTE    $00
LX_MUS_SAMB BYTE    $00
LX_MUS_SAMC BYTE    $00
PAGKEY_AR   BYTE    %00010111
PAGKEY_SW   BYTE    %00011111
RESPAWN_SCR BYTE    001

LX_VARZONE  WORD   VARS_MAIN
LX_UPAGVARS WORD   $C000
LX_SCRVARS  WORD   $C000
LX_SCRVARSH =  $-1
LX_IRRUPVL  WORD   LX_IRRUPVARS
LX_PROG     WORD   BASICPRGINI
LXT_MAP_PLW WORD   LXT_MAP_PLC
LX_CONT_FRE WORD   9984
LX_CONT_VAI WORD   4310
LX_CONT_VAO WORD   4300
LX_CONT_BOW WORD   4502
LX_CONT_SWO WORD   1150   
LX_CONT_MOR WORD   4602
LX_CONT_WAS WORD   4404     
LX_CONT_WAO WORD   4400
LX_CONT_WAT WORD   4401

LX_VAR_A    BYTE    000

LX_VAR_B_F  BYTE    000
            BYTE    000
LX_VAR_B    BYTE    000
            BYTE    000
            BYTE    000
            
QKINC       = $-1
            BYTE    002,003,004,005,001 
         
TMPEDFCC    WORD   0000   
TMPESPOSN   BYTE    000
TMPESPOSNH  BYTE    000 
BTMPEDFCC    WORD   0000   
BTMPESPOSN   BYTE    000
BTMPESPOSNH  BYTE    000 
TMP_S        WORD  0000
LX_FLEHITPRO BYTE   000 
ESWBESTM
            
            BYTE    001,000,000
            BYTE    001,000,001
            BYTE    001,002,000
            BYTE    001,002,001
            BYTE    002,000,000
            BYTE    002,000,001
            BYTE    002,002,000
            BYTE    002,002,001


            

TABCHANS
            WORD $09F4
            WORD $10A8
            BYTE  $4B  
           
            WORD $09F4
            WORD $15C4
            BYTE  $53  

            WORD $0F81
            WORD $15C4
            BYTE  $52  

            WORD $0C7D
            WORD $15C4
            BYTE  $50  
            
            BYTE  $80
            
TIPOBJ      
            BYTE    000,000,000,000,000
LX_LSTORD   BYTE    000 
SPECRDL
          
            
SPECRDL_A   BYTE    000
SPECRDL_B   BYTE    000
SPECRDL_C   BYTE    000
SPECRDL_D   BYTE    000

SPECRDC
            BYTE    000,000,000,000
SPECESCL            
            BYTE    000
SPECESCC    
            BYTE    000

LX_K_TABLAJP
            WORD   JPUPDANIM
            WORD   LX_SPRITE_O
            WORD   LX_SCRLE
            WORD   LX_COLDET
            WORD   LX_CHRABS
            WORD   LX_DIMXY
            WORD   LX_ATREL
            WORD   LX_SPAG
            WORD   LX_SPEXIT
            WORD   LX_COLDETESC
            WORD   LX_FLEBYTE OR
            WORD   LX_SPRITE_OO
            WORD   LX_LDIR
            WORD   LX_SPRITE_D
            WORD   LX_CLENEM
            WORD   LX_GAB
            WORD   LX_BLCOPY6
            WORD   LX_SOUND
            WORD   LX_MUSIC
            WORD   LX_AYSOUND
            WORD   LX_COLEXX  
            WORD   LX_COLEXX_INI
            WORD   LX_PRINTJMP
            WORD   LX_POKE
LX_RUSS_GFXW WORD LX_RUSS_GFX-512       
LX_SFX_STEP = $-1  
            BYTE    006,000
            BYTE    011,000
            BYTE    012,004
            BYTE    007,199
            BYTE    008,031
            BYTE    013,000
            BYTE    $4B

             
23552
          
KSTATE      BYTE  000,000,000,000,000,000,000

CTRL_SIDE   BYTE  000

CTRL_READ
LASTK       BYTE  000                  
REPDEL      BYTE  035                  
REPPER      BYTE  005                  
DEFADD      WORD $0000                
KDATA       BYTE  000                  
TVDATA      WORD $0000                
STRMS       BYTE  001,000              
            BYTE  006,000
            BYTE  011,000
            BYTE  001,000
            BYTE  001,000
            BYTE  006,000
            BYTE  016,000
            BYTE  000,000
            BYTE  021,000
            BYTE  026,000
            BYTE  031,000
            BYTE  036,000
            BYTE  000,000
            BYTE  001,006
            BYTE  196,021
            BYTE  066,125
            BYTE  012,196
            BYTE  021,067
            BYTE  027,037
            
CHARS       WORD $3C00                
RASP        BYTE  000                  
PIP         BYTE  000                  
NEW_CHANSE

ERRNR       BYTE  255                  
FLAGS       BYTE  %11000000            
TVFLAG      BYTE  001                  
ERRSP       WORD LX_ERRSP             
LISTSP      WORD MSTK_CTRL            
MODE        BYTE  008                  
NEWPPC      WORD $0000                
NSPPC       BYTE  $00                  
PPC         WORD $0000                
SUBPPC      BYTE  001                  
BORDCR      BYTE  007                  
EPPC        WORD $0000                

VARS        WORD VARS_MAIN            
DEST        WORD $0000                
CHANS       WORD TABCHANS             
CURCHL      WORD TABCHANS             
PROG        WORD BASICPRGINI          
NXTLIN      WORD BASICPRGINI          
DATADD      WORD BASICPRGINI          
ELINE       WORD BASICPRGFIN          
KCUR        WORD BASICPRGINI          
CHADD       WORD BASICPRGINI          
XPTR        WORD $0000                
WORKSP      WORD BASICPRGFIN          
STKBOT      WORD BASICPRGFIN          
STKEND      WORD BASICPRGFIN          

BREG        BYTE  000                  
MEM         WORD $0000                
FLAGS2      BYTE  025                  
DFSZ        BYTE  002                  
STOP        WORD $0000                
OLDPPC      WORD $0000                
OLDPPCH     = $-1
OSPPC       BYTE  000                  
FLAGX       BYTE  000                  
STRLEN      WORD $0000                
TADDR       WORD $0000                
SEED        WORD $0000                
FRAMES      BYTE  000,000,000          
UDG         WORD $0000                
COORDS      BYTE  000,000              
PPOSN       BYTE  000                  
PRCC        WORD $0000                
ECHOE       WORD $0000                
DFCC        WORD $0000                
DFCCL       WORD $0000                
SPOSN       BYTE  000
SPOSNH      BYTE  000                  
SPOSNL      BYTE  000,000              
SCRCT       BYTE  255                  
ATTRP       BYTE  007                  
MASKP       BYTE  127                  
ATTRT       BYTE  000                  
MASKT       BYTE  000                  
PFLAG       BYTE  000                  
MEMBOT      ESPACIOS  30                
NMIADD      WORD 0000                 
RAMTOP      WORD SET_STACK-1          
PRAMT       WORD $FFFF                
BASICPRGINI 

            < AQUI SE INSERTA EL PROGRAMA BASIC >

BASICPRGFIN           
            ESPACIOS  256
$A000
PANTFONDO

LX_TST_MEN

            WORD   $2FDA 
            WORD   $7F00 
            WORD   LX_TST_KMSM
            WORD   $1F5C
            WORD   $0C84
            WORD   $10A6  
            WORD   LX_TST_MEN_SK
            WORD   $102E

            WORD   $10A6,LX_K_SPRTBUK1,$102F 
LX_TST_MEN_SK
            
            WORD   $2FDA
            WORD   $FB00
            WORD   LX_TST_KMSK
            WORD   $1F5C
            WORD   $0C84
            WORD   $10A6  
            WORD   LX_TST_MEN_DEP
            WORD   $102E

            WORD   $10A6,LX_K_SPRTBUK1,$102F 
 
LX_TST_KMSM BYTE    %00000001 

LX_TST_KMSK BYTE    %00001000



LX_TST_MEN_DEP
            WORD   $0554,$0909         
            WORD   $0601
            
            WORD   $1A45               
            WORD   SPOSN
            WORD   $1821
            WORD   $1118 
            
            WORD   $1A45               
            WORD   DFCC
            WORD   $4000
            WORD   $1118 
            
            WORD   $1A45               
            WORD   LX_RLE_RETS
            WORD   LX_TSTMENU_RET
            WORD   $1118               
            
            WORD   $15FF
            
            WORD   $096E               
            WORD   LX_TMEN_DAT-1
            
            WORD   $0F8D
            
            WORD   $15FF
            
            
            WORD   $10A6,LX_SCRLE,$102F
            
            
LX_TSTMENU_           


LX_TSTMENU_LOOP

            WORD   $2FDA
            WORD   $FB00
            WORD   LX_TST_KMSK
            WORD   $1F5C
            WORD   $0C84
            WORD   $10A6   
            WORD   LX_TST_MEN_EXIT
            WORD   $102E

       
            WORD   $2FDA
            WORD   $F700   
            WORD   LX_TST4_KMSK
            WORD   $1F5C
            WORD   $0C84
            WORD   $10A6      
            WORD   LX_TST4
            WORD   $102E

            WORD   $2FDA
            WORD   $F700   
            WORD   LX_TST5_KMSK
            WORD   $1F5C
            WORD   $0C84
            WORD   $10A6      
            WORD   LX_TST5
            WORD   $102E

            WORD   $2FDA
            WORD   $EF00
            WORD   LX_TST6_KMSK
            WORD   $1F5C
            WORD   $0C84
            WORD   $10A6      
            WORD   LX_TST6
            WORD   $102E

            WORD   $10A6,LX_TSTMENU_LOOP,$102F


LX_TST2_KMSK BYTE    %00000001
LX_TST3_KMSK BYTE    %00000010
LX_TST4_KMSK BYTE    %00000100
LX_TST5_KMSK
LX_TST6_KMSK BYTE    %00001000

LX_TST4     
            WORD   $0554,$0606         
            WORD   $0601           
            
            WORD   $2FDA                
            WORD   $4B00           
            WORD   BL8600_294+5    
            WORD   $0D69           
            
            WORD   $2FDA                
            BYTE    "LL"           
            WORD   BL80_24+1       
            WORD   $0D69           
            
            WORD   $0554,$0101         
            WORD   $0601           
            
            WORD   $10A6,LX_TSTMENU_LOOP,$102F 
            
LX_TST5     
            WORD   $1A45               
            WORD   CHARS
            WORD   $3C00
            WORD   $1118 
            
            WORD   $1A45               
            WORD   ERRSP
            WORD   SET_STACK-4
            WORD   $1118
            
            WORD   $2FDA                
            WORD   $0200               
            WORD   DFSZ
            WORD   $0D69               
            
            WORD   $2FDA                
            WORD   $0000               
            WORD   FLAGX
            WORD   $0D69               
            
            WORD   $2FDA                
            WORD   $FF00               
            WORD   ERRNR
            WORD   $0D69               
            
            WORD   $10A6               
            WORD   SET_STACK-4 
            WORD   $0051       
            WORD   $102F       
LX_TST6
            
            WORD   $1A45               
            WORD   SPOSN
            WORD   $1821
            WORD   $1118 
            
            WORD   $1A45               
            WORD   DFCC
            WORD   $4000
            WORD   $1118 
            
             
            WORD   $1A45               
            WORD   LX_RLE_RETS
            WORD   LX_TSTMENU_RET2
            WORD   $1118               
            
            WORD   $15FF       
            
            WORD   $096E               
            WORD   LX_LEG1_DAT-1
            
            WORD   $0F8D       
            
            WORD   $15FF       

            WORD   $0554,$0000         
            WORD   $0601       

            WORD   $10A6,LX_SCRLE,$102F
            
            
LX_TSTMENU_RET2    


            WORD   $1A45               
            WORD   SPOSN
            WORD   $0C21
            WORD   $1118 
            
            WORD   $1A45               
            WORD   DFCC
            WORD   $4880
            WORD   $1118 
             
            WORD   $1A45               
            WORD   LX_RLE_RETS
            WORD   LX_TSTMENU_RET3
            WORD   $1118               
            
            WORD   $15FF               
            
            WORD   $096E               
            WORD   LX_LEG2_DAT-1
            
            WORD   $0F8D               
            
            WORD   $15FF               

            WORD   $10A6,LX_SCRLE,$102F
            
            
LX_TSTMENU_RET3   


LX_TST6_LOOP


            WORD   $2FDA  
            WORD   $0000  
            WORD   LX_TST6L_KMSK
            WORD   $1F5C  
            WORD   $027F  
            WORD   $0C84  
            WORD   $10A6      
            WORD   LX_TST6_LOOP
            WORD   $102E  

            WORD   $10A6,LX_TST_MEN_DEP

LX_TST6L_KMSK BYTE   %00001111


LX_TST_MEN_EXIT

             
            WORD   $1A45               
            WORD   LX_RLE_RETS
            WORD   LX_K_SPRTBUK1
            WORD   $1118               
            
             
            WORD   $1A45               
            WORD   RESTVAR
            WORD   VARL_F-3
            WORD   $0CF6               
            WORD   RESTVARE-RESTVAR
            WORD   $33C3               

            WORD   $0554                
            WORD   $1700 
            WORD   $0CF6,$7FFD         
            WORD   $1E7D               
            
             
            WORD   $1A45               
            WORD   $0000
            WORD   $0000
            WORD   $1E73       
 

            WORD   $10A6 
            WORD   SET_STACK-6
            WORD   $102F 
            
            
       
RESTVAR                
            BYTE    "f",000,000,066,000,000 
            
            BYTE    "n",000,000,008,000,000 
            
            BYTE    "j",000,000,002,000,000 
    
            BYTE    "z",000,000,010,000,000 
RESTVARE           
            

LX_TMEN_DAT WORD     $+2 : WORD     LX_MENU_FNT-1   : ARCHIVO "ARTE/LX_TSTMENU.DAT"
LX_MENU_FNT ARCHIVO "ARTE/LX_TSTMENU.FNT"

LX_LEG1_DAT WORD     $+2 : WORD     LX_LEG1_FNT-1   : ARCHIVO "ARTE/LX_LEGACY1.DAT"
LX_LEG1_FNT ARCHIVO "ARTE/LX_LEGACY1.FNT"
LX_LEG2_DAT WORD     $+2 : WORD     LX_LEG2_FNT-1   : ARCHIVO "ARTE/LX_LEGACY2.DAT"
LX_LEG2_FNT ARCHIVO "ARTE/LX_LEGACY2.FNT"

TSTMENUEND

             
LX_IAZEE
LX_IAZEE_EN1
            BYTE    "A"
            WORD   LX_IAZE02-($+2) 
           
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001," AZEEM:",016,000," INTERESTING PLACE",006
            BYTE    " THIS... ENGLAND. ALL RIGHT,",006
            BYTE    " CHRISTIAN. HEAR THESE TIPS.",006
            BYTE    006,006
            BYTE    " LEARN THESE CONTROLS:",006
            BYTE    " FIRE: AIM TO SHOOT ARROWS",006
            BYTE    " ",126,032,127," : ENTER DOORS",006
            BYTE    " ",126," AND ",124,032,125," : JUMP",006
            BYTE    " ",127," : DRINK HEALTH POTIONS",006
            BYTE    006,006
            BYTE    " DURING SWORD FIGHTS USE:",006
            BYTE    " FIRE AND ",124,032,126,032,127,032,125," : HIT ENEMY",006
            BYTE    " ",124,032,126,032,127,032,125," : ESPACIOS ",006
            BYTE    006,006
            BYTE    " GAIN SKILL POINTS BY DEFEATING", 006
            BYTE    " ENEMIES OR PRACTISING AT THE",006
            BYTE    " THIEVES SCHOOL YOU FOUNDED. ",006
            BYTE    " GET GOLD COINS TO BUY POTIONS.",006
            BYTE    006,006
            BYTE    006,006
            BYTE    " YOU SELECTED LEVEL: "
LX_IAZE02    
            BYTE    "B"
            WORD   LX_IAZE03-($+2) 
            BYTE    022,000,000
            BYTE    017,006,016,000
            BYTE    " ALLAH YUSALLMAK!",006
            BYTE   006,006
            BYTE    022,000,000
LX_IAZE03
            BYTE    "C"
            WORD   LX_IAZE04-($+2)
            BYTE    018,001,"EASY"
            BYTE    017,006,018,000,016,000
            BYTE    006
            
LX_IAZE04     
            BYTE    "D"
            WORD   LX_IAZE05-($+2)
            BYTE    017,006,019,000,016,000
            BYTE    "MEDIUM",006
LX_IAZE05   
            BYTE    "E"
            WORD   LX_IAZE06-($+2)
            BYTE    017,006,019,000,016,000
            BYTE    "HARD",006
LX_IAZE06
 # = ¡
 ) = ¿
 & = Á
 ( = É
 < = Í
 = = Ó
 > = Ú
LX_IAZEE_ES1
            BYTE    "A"
            WORD   LX_IAZS02-($+2) 
           
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001," AZEEM:",016,000," ES UN LUGAR INTERESANTE",006
            BYTE    " ESTA... INGLATE. EST& BIEN,",006
            BYTE    " CRISTIANO. TE DAR( CONSEJOS.",006
            BYTE    006,006
            BYTE    " APRENDE ESTOS CONTROLES:",006
            BYTE    " FUEGO: APUNTA Y LANZA FLECHAS",006
            BYTE    " ",126,032,127," : ENTRAR POR LAS PUERTAS",006
            BYTE    " ",126," Y ",124,032,125," : SALTAR",006
            BYTE    " ",127," : BEBER POCIONES DE SALUD",006
            BYTE    006,006
            BYTE    " DURANTE LUCHA CON ESPADAS:",006
            BYTE    " FUEGO Y ",124,032,126,032,127,032,125," : ATACAR",006
            BYTE    " ",124,032,126,032,127,032,125," : BLOQUEAR",006
            BYTE    006,006
            BYTE    " GANA PUNTOS DE HABILIDAD VEN-", 006
            BYTE    " CIENDO ENEMIGOS O PRACTICANDO",006
            BYTE    " EN LA ESCUELA DE LADRONES QUE",006
            BYTE    " FUNDASTE. OBT(N MONEDAS PARA",006
            BYTE    " COMPRAR POCIONES.",006
            BYTE    006,006
            BYTE    " SELECCIONASTE NIVEL "
LX_IAZS02    
            BYTE    "B"
            WORD   LX_IAZS03-($+2) 
            BYTE    022,000,000
            BYTE    017,006,016,000
            BYTE    " ALLAH YUSALLMAK!",006
            BYTE   006,006
            BYTE    022,000,000
LX_IAZS03
            BYTE    "C"
            WORD   LX_IAZS04-($+2)
            BYTE    018,001,"F&CIL"
            BYTE    017,006,018,000,016,000
            BYTE    006
            
LX_IAZS04     
            BYTE    "D"
            WORD   LX_IAZS05-($+2)
            BYTE    017,006,019,000,016,000
            BYTE    "MEDIO",006
LX_IAZS05   
            BYTE    "E"
            WORD   LX_IAZS06-($+2)
            BYTE    017,006,019,000,016,000
            BYTE    "DIF<CIL",006
LX_IAZS06


LX_IAZEE_RS1
            BYTE    "A"
            WORD   LX_IAZR02-($+2) 
           
           
              

           
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001," [bcg:",016,000," chm`k`lhi` g`lmi xm[...",006
            BYTE    " [h^fcz. rmi a, pkclmc[hch,",006
            BYTE    " jkclfns[dlz e gicg li]`m[g.",006
            BYTE    006,006
            BYTE    " cbnrc njk[]f`hc`:",006
            BYTE    " i^ihw: jkcq`fcmwlz lmk`fid",006
            BYTE    " ",126,032,127," : ]idmc ] _]`kw",006
            BYTE    " ",126," c ",124,032,125," : jkvaie",006
            BYTE    " ",127," : ]vjcmw clq`fzyt`` b`fw`",006
            BYTE    006,006
            BYTE    " ]i ]k`gz ji`_chei] h[ g`r[p:",006
            BYTE    " i^ihw c ",124,032,126,032,127,032,125,": n_[kcmw ]k[^[",006
            BYTE    " ",124,032,126,032,127,032,125," : \\fie",006,006
            BYTE    006,006
            BYTE    " jifnr[d irec h[]ve[, ji\\`a_[z",006
            BYTE    " ]k[^i] cfc njk[ahzzlw ] seif`",006
            BYTE    " ]iki], eimikny mv ilhi][f.",006
            BYTE    " li\\ck[d bifimv` gih`mv,",006
            BYTE    " rmi\\v jienj[mw b`fwz.",006
            BYTE    006,006
            BYTE    " ]v\\k[hh[z lfiahilmw:"
LX_IAZR02    
            BYTE    "B"
            WORD   LX_IAZR03-($+2) 
            BYTE    022,000,000
            BYTE    017,006,016,000
            BYTE    " ALLAH YUSALLMAK!",006
            BYTE   006,006
            BYTE    022,000,000
LX_IAZR03
            BYTE    "C"
            WORD   LX_IAZR04-($+2)
            BYTE    018,001,"hcbe[z"
            BYTE    017,006,018,000,016,000
            BYTE    006
LX_IAZR04     
            BYTE    "D"
            WORD   LX_IAZR05-($+2)
            BYTE    017,006,019,000,016,000
            BYTE    "lk`_hzz",006
LX_IAZR05   
            BYTE    "E"
            WORD   LX_IAZR06-($+2)
            BYTE    017,006,019,000,016,000
            BYTE    "]vlie[z",006
LX_IAZR06

LX_IAZEE_END
            
            
MSTACKSINI
SET_STACK-16
INICIOSP    
            WORD    $0052
            WORD    $0052
            WORD    $0052
            WORD    $0052
            
            WORD    $0052
            WORD    $1B7D
            WORD    $1303
            WORD    $3E00


VARS_MAIN
VAR         =   $/256
VARL_B      =  $+1  
            BYTE    "b",000,000
            WORD   0000
            BYTE    000
VARL_D      =  $+1              
            BYTE    "d",000,000
            WORD   LXLANG
            BYTE    000
            
VARL_A      =  $+1            
            BYTE    "a",000,000
            WORD   LX_CURRLANG
            BYTE    000  

VARL_C      =  $+1           
            BYTE    "c",000,000,254,000,000
VARL_W      = $+3            
            BYTE    "w",000,255,084,217,000
            BYTE    "o",000,255,$2C,$D9,000
FLECEP      =  $+3      
FLECEPH     =  $+4       
            BYTE    "s",000,000,000,000,000
            
            BYTE    "m",000,255,054,217,000
VARL_F      = $+3            
            BYTE    "f",000,000,066,000,000
VARL_N      = $+3            
            BYTE    "n",000,000,008,000,000
            
            BYTE    "j",000,000,002,000,000
FLECP       =  $+3    
            BYTE    "z",000,000,010,000,000
            
            BYTE    'y'+$80                
            BYTE     000,000,000,000,000   
            BYTE     000,000,000,000,000   
            BYTE     000,000,000,000,000   
            BYTE     000,000,000           
            
            BYTE    "e",000,000,000,000,000
            
            
            BYTE    'D'+$80-64
            WORD   TABSPRCEND-TABSPRCINI
TABSPRCINI
            BYTE    001,005,000
            
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            
TABSPRCEND  
            
            
            BYTE    'C'+$80-64
            WORD   TABSPRLEND-TABSPRLINI
TABSPRLINI
            BYTE    001,005,000
FVRDEST          
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            
TABSPRLEND 


            BYTE    'O'+$80-64
            WORD   TABSPRAEND-TABSPRAINI
TABSPRAINI
            BYTE    001,005,000
            
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            BYTE    000,000,000,000,000
            
TABSPRAEND  
LX_CERO     = $+1
            BYTE    "k",000,000,000,000,000
LX_UNO     = $+3           
            BYTE    "l",000,000,001,000,000
            BYTE    "r",000,000,002,000,000
            BYTE    "u",000,000,004,000,000
            
VARL_P      =  $+3            
            BYTE    "p",000,000,000,000,000
            BYTE    "i",000,000,000,000,000
LX_SALTANDO BYTE    't',000,000,000,000,000
            BYTE    "q",000,000,000,000,000
            
VARL_X      = $+3             
            BYTE    "x",000,000,000,000,000
            
            BYTE    'S'+$A0-64,'K'+$E0-64: BYTE  000,000,000,000,000
            BYTE    'B'+$A0-64,'D'+$E0-64: BYTE  000,000,000,000,000
  
            BYTE    "v",000,000,255,255,000
            
              
            BYTE    "g",000,000,000,000,000  
            BYTE    "h",000,000,000,000,000  
            BYTE    'X'+$A0-64,'B'+$E0-64,000,000,000,000,000
            BYTE    'X'+$A0-64,'S'+$E0-64,000,000,000,000,000
            BYTE    'D'+$A0-64,'B'+$E0-64,000,000,000,000,000
            BYTE    'D'+$A0-64,'S'+$E0-64,000,000,000,000,000
            
            
            
              
            BYTE    'L'+$A0-64,'K'+$E0-64: WORD $0000,23560: BYTE  000  
            BYTE    'P'+$A0-64,'Z'+$E0-64: WORD $FF00,$D954: BYTE  000  
            BYTE    'O'+$A0-64,'B'+$E0-64: WORD $0000,$00FE: BYTE  000  

              
            BYTE    'K'+$80-64
            WORD   POKKEYEND-POKKEYINI
POKKEYINI
            BYTE    001,007,000
            
            WORD   $0000,LX_CIZ_PRT+1: BYTE  000
            WORD   $0000,LX_CDE_PRT+1: BYTE  000
            WORD   $0000,LX_CAR_PRT+1: BYTE  000
            WORD   $0000,LX_CAB_PRT+1: BYTE  000
            WORD   $0000,LX_CFG_PRT+1: BYTE  000
            WORD   $0000,LX_CPA_PRT+1: BYTE  000
            WORD   $0000,LX_CQU_PRT+1: BYTE  000
POKKEYEND           
            
            BYTE    'D'+$A0-64,'F'+$E0-64: WORD 00000,00000: BYTE  000  
            BYTE    'J'+$A0-64,'F'+$E0-64: WORD 00000,00000: BYTE  000  
            BYTE    'M'+$A0-64,'F'+$E0-64: WORD 00000,00000: BYTE  000  
            BYTE    'S'+$A0-64,'F'+$E0-64: WORD 00000,00000: BYTE  000  
            
           
            BYTE    $80           
VARS_END
   
PADDING            

LX_TABANII
LX_ESCTAB            
            WORD   $0000
LX_ESCTABA  WORD   LX_ESCANIM
            WORD   PROTESC+$0080
            WORD   PROTESC+$0100
            WORD   PROTESC+$0180
            WORD   PROTESC+$0200
            WORD   PROTESC+$0280
            WORD   PROTESC+$0300
            WORD   PROTESC+$0380  
            WORD   PROTESC+$0000
LX_ESCANIM  BYTE    7,0,1,2,3,4,5,6,7,0 
LX_ESCU     =  (LX_ESCANIM+2) MOD 256
ESU         =  LX_ESCU
LX_ESCQ     =  (LX_ESCANIM+1) MOD 256
ESQ         = LX_ESCQ
LX_ESCD     =  LX_ESCANIM   MOD 256
ESD         = LX_ESCD

LX_PSWWTAB            
            WORD   $0000
LX_PSWWTABA WORD   LX_SWW+2

            WORD   PROTSWORD+PROTSWORD_0
            WORD   PROTSWORD+PROTSWORD_4
            WORD   PROTSWORD+PROTSWORD_8
            WORD   PROTSWORD+PROTSWORD_12    
            
LX_SWW      BYTE    3,0,1,2,3,0,5,6,7,4,8
LX_SWWL     =  (LX_SWW+2) MOD 256
SWL         = LX_SWWL
LX_SWWR     =  LX_SWW   MOD 256
SWR         = LX_SWWR

LX_TABANIE     
            
          
LX_RITAB            
            WORD   $0000
            WORD   LX_RIANIM
            WORD   PROTROAM+PROTROAM_32
            WORD   PROTROAM+PROTROAM_28
            WORD   PROTROAM+PROTROAM_0
            WORD   PROTROAM+PROTROAM_4
            WORD   PROTROAM+PROTROAM_8
            WORD   PROTROAM+PROTROAM_12
            WORD   PROTROAM+PROTROAM_16
            WORD   PROTROAM+PROTROAM_20
            WORD   PROTROAM+PROTROAM_24           
LX_RIANIM   
LX_RDANIM
            BYTE    1,2,3,4,5,6,7,8,1

LX_RDTAB            
            WORD   $0000
            WORD   LX_RDANIM
            WORD   PROTROAM+PROTROAM_68
            WORD   PROTROAM+PROTROAM_64
            WORD   PROTROAM+PROTROAM_36
            WORD   PROTROAM+PROTROAM_40
            WORD   PROTROAM+PROTROAM_44
            WORD   PROTROAM+PROTROAM_48
            WORD   PROTROAM+PROTROAM_52
            WORD   PROTROAM+PROTROAM_56
            WORD   PROTROAM+PROTROAM_60
               


LX_SITAB            
            WORD   $0000
            WORD   LX_SIANIM
            WORD   PROTSALT+PROTSALT_0
            
            WORD   PROTROAM+PROTROAM_4
            WORD   PROTSALT+PROTSALT_0
            WORD   PROTSALT+PROTSALT_4
            WORD   PROTSALT+PROTSALT_8
            WORD   PROTSALT+PROTSALT_8
            WORD   PROTSALT+PROTSALT_4
            WORD   PROTSALT+PROTSALT_0
            WORD   PROTSALT+PROTSALT_12
            
            WORD   PROTROAM+PROTROAM_4
            WORD   PROTSALT+PROTSALT_8
            WORD   PROTSALT+PROTSALT_0
            WORD   PROTSALT+PROTSALT_8
            WORD   PROTSALT+PROTSALT_8
            WORD   PROTSALT+PROTSALT_0
            WORD   PROTSALT+PROTSALT_8
            WORD   PROTSALT+PROTSALT_12
LX_SIANIM 
LX_SDANIM  
            BYTE    1,2,3,4,5,6,7,8,0,10,11,12,13,14,15,16,9

LX_SDTAB            
            WORD   $0000
            WORD   LX_SDANIM
            WORD   PROTSALT+PROTSALT_16
            WORD   PROTROAM+PROTROAM_36
            WORD   PROTSALT+PROTSALT_16
            WORD   PROTSALT+PROTSALT_20
            WORD   PROTSALT+PROTSALT_24
            WORD   PROTSALT+PROTSALT_24
            WORD   PROTSALT+PROTSALT_20
            WORD   PROTSALT+PROTSALT_16
            WORD   PROTSALT+PROTSALT_28

            WORD   PROTROAM+PROTROAM_36
            WORD   PROTSALT+PROTSALT_24
            WORD   PROTSALT+PROTSALT_16
            WORD   PROTSALT+PROTSALT_24
            WORD   PROTSALT+PROTSALT_24
            WORD   PROTSALT+PROTSALT_16
            WORD   PROTSALT+PROTSALT_24
            WORD   PROTSALT+PROTSALT_28

LX_PBAIMTAB            
            WORD   $0000
            WORD   LX_ESCANIM+1
            WORD   PROTBOWAIM+PROTBOWAIM_0
            WORD   PROTBOWAIM+PROTBOWAIM_5
            WORD   PROTBOWAIM+PROTBOWAIM_10
            WORD   PROTBOWAIM+PROTBOWAIM_15
            WORD   PROTBOWAIM+PROTBOWAIM_20
            WORD   PROTBOWAIM+PROTBOWAIM_25
            WORD   PROTBOWAIM+PROTBOWAIM_30
            WORD   PROTBOWAIM+PROTBOWAIM_35
LX_PBSHTTAB            
            WORD   $0000
            WORD   LX_ESCANIM+1
            WORD   PROTBSHT+PROTBSHT_0
            WORD   PROTBSHT+PROTBSHT_4
            WORD   PROTBSHT+PROTBSHT_8
            WORD   PROTBSHT+PROTBSHT_12
            WORD   PROTBSHT+PROTBSHT_16
            WORD   PROTBSHT+PROTBSHT_20
            WORD   PROTBSHT+PROTBSHT_24
            WORD   PROTBSHT+PROTBSHT_28  
LX_EBAIMTAB            
            WORD   $0000
            WORD   LX_RIANIM-1
            WORD   ENEMBAIM+ENEMBAIM_0
            WORD   ENEMBAIM+ENEMBAIM_0
            WORD   ENEMBAIM+ENEMBAIM_4
            WORD   ENEMBAIM+ENEMBAIM_8
            WORD   ENEMBAIM+ENEMBAIM_12
            WORD   ENEMBAIM+ENEMBAIM_16
            WORD   ENEMBAIM+ENEMBAIM_20
            WORD   ENEMBAIM+ENEMBAIM_24
            WORD   ENEMBAIM+ENEMBAIM_28
            

LX_EBSHTTAB            
            WORD   $0000
            WORD   LX_RIANIM-1
            WORD   ENEMBSHT+ENEMBSHT_0
            WORD   ENEMBSHT+ENEMBSHT_0
            WORD   ENEMBSHT+ENEMBSHT_4
            WORD   ENEMBSHT+ENEMBSHT_8
            WORD   ENEMBSHT+ENEMBSHT_12
            WORD   ENEMBSHT+ENEMBSHT_16
            WORD   ENEMBSHT+ENEMBSHT_20
            WORD   ENEMBSHT+ENEMBSHT_24
            WORD   ENEMBSHT+ENEMBSHT_28

            
LX_FLECHATAB           
            WORD   $0000
            WORD   LX_ESCANIM+1
            WORD   FLECHA+LX_FLECHA_0             
            WORD   FLECHA+LX_FLECHA_3
            WORD   FLECHA+LX_FLECHA_6
            WORD   FLECHA+LX_FLECHA_9
            WORD   FLECHA+LX_FLECHA_12
            WORD   FLECHA+LX_FLECHA_15
            WORD   FLECHA+LX_FLECHA_18
            WORD   FLECHA+LX_FLECHA_21


LX_PROTCAETAB
            WORD   $0000
            WORD   LX_PROTCAETABAN
            WORD   PROTCAE+LX_PROTCAE_1
            WORD   PROTCAE+LX_PROTCAE_6
            WORD   PROTCAE+LX_PROTCAE_0
            WORD   PROTCAE+LX_PROTCAE_5
LX_PROTCAETABAN  BYTE  002,003,000,001
LX_PROTQUIETO
            WORD   $0000
            WORD   LX_ESCANIM+1
            WORD   PROTROAM+PROTROAM_32
            WORD   PROTROAM+PROTROAM_68
            


LX_PSWHBTAB           
            WORD   $0000
            WORD   LX_SWWHBANI
            WORD   PROTSWHH+PROTSWHH_0
            WORD   PROTSWHH+PROTSWHH_0
            WORD   PROTSWHH+PROTSWHH_4
            WORD   PROTSWHH+PROTSWHH_8
            WORD   PROTSWHM+PROTSWHM_0
            WORD   PROTSWHM+PROTSWHM_4
            WORD   PROTSWHM+PROTSWHM_8
            WORD   PROTSWHL+PROTSWHL_0
            WORD   PROTSWHL+PROTSWHL_4
            WORD   PROTSWHL+PROTSWHL_8
            WORD   PROTSWB +PROTSWB_0
            WORD   PROTSWB +PROTSWB_4
            WORD   PROTSWB +PROTSWB_8
            
LX_SWWHBANI BYTE    00,02,03,00,05,06,00,08,09,00,10,11,12,01,04,07
            BYTE    16,18,19,16,21,22,16,24,25,16,26,27,28,17,20,23
LX_ESWWTAB
            WORD   $0000
LX_ESWWTABA WORD   LX_SWW+2
            WORD   ENEMSWORD+ENEMSWORD_0
            WORD   ENEMSWORD+ENEMSWORD_4
            WORD   ENEMSWORD+ENEMSWORD_8
            WORD   ENEMSWORD+ENEMSWORD_12
            WORD   SHERSWORD+SHERSWORD_0
            WORD   SHERSWORD+SHERSWORD_4
            WORD   SHERSWORD+SHERSWORD_8
            WORD   SHERSWORD+SHERSWORD_12
            WORD   SWDUMMY
           
LX_ESWHBTAB           
            WORD   $0000
            WORD   LX_SWWHBANI
            WORD   ENEMSWM1+ENEMSWM1_0
            WORD   ENEMSWM1+ENEMSWM1_0
            WORD   ENEMSWM1+ENEMSWM1_4
            WORD   ENEMSWM1+ENEMSWM1_8
            WORD   ENEMSWM1+ENEMSWM1_12
            WORD   ENEMSWM1+ENEMSWM1_16
            WORD   ENEMSWM1+ENEMSWM1_20
            WORD   ENEMSWM2+ENEMSWM2_0
            WORD   ENEMSWM2+ENEMSWM2_4
            WORD   ENEMSWM2+ENEMSWM2_8
            WORD   ENEMSWM2+ENEMSWM2_12
            WORD   ENEMSWM2+ENEMSWM2_16
            WORD   ENEMSWM2+ENEMSWM2_20
            WORD   $0000
            WORD   $0000
            WORD   $0000
            
            WORD   SHERSWM1+SHERSWM1_0
            WORD   SHERSWM1+SHERSWM1_0
            WORD   SHERSWM1+SHERSWM1_4
            WORD   SHERSWM1+SHERSWM1_8
            WORD   SHERSWM1+SHERSWM1_12
            WORD   SHERSWM1+SHERSWM1_16
            WORD   SHERSWM1+SHERSWM1_20
            WORD   SHERSWM2+SHERSWM2_0
            WORD   SHERSWM2+SHERSWM2_4
            WORD   SHERSWM2+SHERSWM2_8
            WORD   SHERSWM2+SHERSWM2_12
            WORD   SHERSWM2+SHERSWM2_16
            WORD   SHERSWM2+SHERSWM2_20
           
            
LX_SWORDTAB
            WORD   $0000
            WORD   LX_ESCANIM+1
            WORD   SWORD+$0000
            WORD   SWORD+$0020
            WORD   SWORD+$0040  
            WORD   SWORD+$0060
            WORD   SWORD+$0080
            WORD   SWORD+$00A0 

LX_ADDSPTAB
            WORD   $0000
            WORD   LX_ADDSPANI
            WORD   ADDER+$0000
            WORD   ADDER+$0030 
            WORD   ADDER+$0090
            WORD   ADDER+$0060 
            WORD   PIPISTRELLE+$0000
            WORD   PIPISTRELLE+$0030
            WORD   PIPISTRELLE+$0090
            WORD   PIPISTRELLE+$0060
            WORD   WASP +$0000
            WORD   WASP +$0020
            
LX_ADDSPANI BYTE    001,000,003,002,005,004,007,006,009,008

LX_MORTITAB
            WORD   $0000
            WORD   LX_ESCANIM+1
            WORD   MORTIANNA+LX_MORTIANNA_0
            WORD   MORTIANNA+LX_MORTIANNA_4
LX_MORTARMTAB
            WORD   $0000
            WORD   LX_ESCANIM+1
            WORD   MORTILARM
            WORD   MORTIRARM

TABTECJMP   
            BYTE    060
            BYTE    020
            BYTE    010
            BYTE    010
            BYTE    040
            BYTE    040
            BYTE    040
            BYTE    040
            
            BYTE    030
            BYTE    030
            BYTE    030
            BYTE    030
            BYTE    030
            BYTE    030
            BYTE    030
            BYTE    030
            
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            BYTE    050
            
        
   
LX_SWGEST 
LX_SWGESTF   = $-16           
            BYTE    001,001,001,001
            BYTE    002,002,002,002
            BYTE    000,000,000,000
            BYTE    000,000,000,000
            
            BYTE    001,001,001,001
            BYTE    002,002,002,002
            BYTE    000,000,000,000
            BYTE    000,000,000,000

            
            WORD   0000
LX_ERRSP
            WORD   $1C46
            WORD   $10A6  
            WORD   BREG
            WORD   $0D69
           
            WORD   $096E  
            WORD   ERRNR
            
            WORD   $0C51
            
            WORD   $0CF6  
            WORD   $00D2
            WORD   $1986  
            WORD   $10A6  
            WORD   LX_K_SPRT  
            WORD   $102E  
          
            WORD   $0CF6  
            WORD   $00C7
            WORD   $1986  
            WORD   $10A6  
            WORD   LX_9_CBUCLE  
            WORD   $102E  
            
            WORD   $0CF6  
            WORD   $00C9
            WORD   $1986  
            WORD   $10A6  
            WORD   LX_B_GOSUB  
            WORD   $102E  
            
            WORD   $0CF6  
            WORD   $00C5
            WORD   $1986  
            WORD   $10A6  
            WORD   LX_7_RETURN  
            WORD   $102E  
     
            WORD   $0CF6  
            WORD   $00D3
            WORD   $1986  
            WORD   $10A6  
            WORD   LX_L_ANTIBREAK  
            WORD   $102E  
            
            WORD   $102F

MSTK_CTRL   
            WORD   $0554                
MSTK_CTRL_P = $+1           
            WORD   $1700 
            WORD   $0CF6,$7FFD 
            WORD   $1E7D               
            WORD   $10A6,MSTK_CTRL_P7,$102F 
            
             
            
LX_K_SPRT   
            WORD   $15FF,$168D,$2BEF,$168D,$0F8D,$15FF
            WORD   $10A6,LX_K_SPRT2,$102F 
            
LX_K_SPRTBUK1            
            WORD   $15FF,$0F8C,$0BD0,$15FF
LX_K_SPRT2            
            WORD   $0F9C,$007B
            
            WORD   $10A6,LX_K_TABLAJP-256
            
            WORD   $340A 
            WORD   $340D 
            
            WORD   $2AF0 
            WORD   $168D 
            
            WORD   $102F  
            

            
            
LSE         =  $14
ANI         =  $80
SPR         =  $81
RLE         =  $82
CLD         =  $83
DIR         =  $84
DXY         =  $85
LOC         =  $86
PAG         =  $87
FIN         =  $88
ESC         =  $89
FLE         =  $8A 
SPO         =  $8B
LDI         =  $8C
SPD         =  $8D
CLE         =  $8E
GAB         =  $8F
COP         =  $90
SND         =  $91
MUS         =  $92         
AYS         =  $93    
CLX         =  $94 
CLI         =  $95
PJP         =  $96            
POK         =  $97
        
LX_SPEXIT            
            WORD   $15FF,$0F8C,$15FF
            WORD   $1A45,LISTSP,MSTK_CTRL 
            WORD   $1118                    
            
            WORD   $10A6, SET_STACK-16  
            WORD   $102F  
            
            
LX_SOUND    
            
           
            WORD   $0F9C  
            WORD   $0BD1               
            WORD   $2AF0  
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            
            WORD   $0AF0  
              
            WORD   $0554               
            WORD   $0707
            WORD   $0CF6,AYCTRL
            WORD   $1E7D       
            WORD   $15FF       
            WORD   $0554               
            WORD   $FFFF
            WORD   $0CF6,AYDATA
            WORD   $1E7D       
            
            WORD   $168D                            
            WORD   $21DC       
            WORD   $3439       
            
             
            WORD   LX_SNWSNDBUK        
            WORD   $102E       
            
            WORD   $0554,0000  
            WORD   $10A6,LX_SQWSNDBUK,$102F
            
LX_SND_EXIT
            WORD   $15FF             
            WORD   $0B15             
            WORD   $15FF             
            WORD   $10A6
            WORD   LX_K_SPRTBUK1,$102F 
            
LX_SQWSNDBUK    
            WORD   $0BD0          
                                  
            WORD   $0BD2,$0BD2,$0BD2
            WORD   $10A6,LX_SQWSND_CONT,$102E   
            WORD   $10A6,LX_SQWSNDBUK  ,$102F    

LX_SQWSND_CONT 
            WORD   $10A6,$0084    
            WORD   $1F52          
            WORD   $0601          

            WORD   $168D          
            WORD   $1731          
            WORD   $0BD0          
            WORD   $168D          
             
            WORD   $10A6
            WORD   LX_SND_EXIT,$102E   
            WORD   $10A6,LX_SQWSNDBUK,$102F            


LX_SNWSNDBUK   
            WORD   $168D                            
            WORD   $21DC    
            WORD   $3439    
             
            WORD   LX_SNWSND_RLE         
            WORD   $102E        
             
            WORD   $168D               
            WORD   $15FF      
            WORD   $0554                   
            WORD   $0800
            WORD   $1E7D      
            WORD   $15FF      
            WORD   $0554               
            WORD   $F000
            WORD   $0C84               
            WORD   $1F5E               
            WORD   $1F5E               
            WORD   $1F5E               
            WORD   $1F5E               
            WORD   $1E7D               
            WORD   $0380                
             
            WORD   $15FF                      
            WORD   $0554                   
            WORD   $0900
            WORD   $1E7D         
            WORD   $15FF         
            WORD   $0380                
            WORD   $1E7D               
            WORD   $0380                
             
            WORD   $15FF    
            WORD   $0554                   
            WORD   $0A00
            WORD   $1E7D    
            WORD   $15FF    
            WORD   $0380                
            WORD   $1E7D               
             
            WORD   $15FF    
            WORD   $0554                   
            WORD   $0800
            WORD   $1E7D    
            WORD   $15FF    
            WORD   $0554                   
            WORD   $0F00
            WORD   $0C84               
            WORD   $1E7D               
            WORD   $0380                
             
            WORD   $15FF     
            WORD   $0554                   
            WORD   $0900
            WORD   $1E7D     
            WORD   $15FF     
            WORD   $0380                
            WORD   $1E7D               
            WORD   $0380                
             
            WORD   $15FF    
            WORD   $0554                   
            WORD   $0A00
            WORD   $1E7D    
            WORD   $15FF    
            WORD   $0380                
            WORD   $1E7D               
            
            WORD   $3439               
            WORD   LX_SNWSNDBUK,$102F  

            
            
LX_SNWSND_RLE
            
            WORD   $168D               
            WORD   $18BE 
            WORD   $168D               


            WORD   $1996               
            WORD   $10A6
            WORD   LX_SND_EXIT,$102E   

LX_SNWSND_RLEB
            WORD   $2994               

            WORD   $10A6               
            WORD   LX_SNWSNDBUK           
            WORD   $102E               
        
        
 
            WORD   $0308,$0308
            WORD   $0308,$0308
            WORD   $0308,$0308
            WORD   $0308,$0308
            WORD   $0308,$0308
             
            WORD   $10A6,LX_SNWSND_RLEB,$102F               




LX_SPAG     
            WORD   $15FF,$0F8C,$0BD0,$15FF           
            WORD   $0F9C,$007B
            WORD   $0CF6,$7FFD
            WORD   $1E7D 
            WORD   $10A6,LX_K_SPRTBUK1,$102F 
            
LX_PRINTJMP    
            
            WORD   $15FF      
            WORD   $16AD      
            WORD   $2AF0      
            WORD   $3290      
            WORD   $0000
            WORD   $16F9      
            
            WORD   $15FF      
            WORD   $10A6,LX_K_SPRTBUK1,$102F 
      
LX_CHRABS
            WORD   $0F9C 
            WORD   $0BD1  
            WORD   $096E, CHARS  
            WORD   $16F9  
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            WORD   $10A6,LX_K_SPRTBUK1,$102F 
            
LX_ATREL          
            WORD   $0F9C 
            WORD   $2AEF 
            WORD   $0B09   
            WORD   $168D 
            WORD   $340D  
            WORD   $0E98  
            WORD   $0E9B  
            WORD   $0DF4    
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            WORD   $10A6,LX_K_SPRTBUK1,$102F 
            

LX_B_GOSUB

            WORD   $10A6   
            WORD   STRLEN
            WORD   $1731  
          
            WORD   $1A45  
            WORD   23618
            WORD   00000
            WORD   $16FD  
            WORD   $1E76  
            
            WORD   $1A45  
            WORD   23621
            WORD   23625
            WORD   $16F9  
            
            WORD   $10A6  
            WORD   23623
            WORD   $007B  
            WORD   $2994  
            WORD   $10A6  
            WORD   23608
            WORD   $0D69  
    
            WORD   $10A6  
            WORD   SET_STACK-6
            WORD   $102F  
           
LX_9_CBUCLE
            
            WORD   $1A45  
            WORD   LXSTOP
            WORD   23618 
            WORD   $16F9 

            WORD   $3000 
            WORD   $1E76 

            
            WORD   $10A6 
            WORD   SET_STACK-6 
            WORD   $102F 
          
LX_7_RETURN          
            WORD   $1A45 
            WORD   23625
            WORD   23618
            WORD   $16F9
            
            WORD   $1A45 
            WORD   23608
            WORD   23620
            WORD   $16F9
LX_L_ANTIBREAK            
            WORD   $10A6 
            WORD   SET_STACK-6
            WORD   $0CF6  
            WORD   $1B7D
            WORD   $16FD
            WORD   $1734
            WORD   $102F
LX_SCRLE    
            WORD   $0B09  

            WORD   $0CF6, $0800  
            WORD   $2A2A  
            WORD   $0E88  
            WORD   $168D  
            WORD   $0AFF  
            WORD   $15FF  
            WORD   $0B20  
            WORD   $15FF  
            
            WORD   $0F9C
            WORD   $2AEF
            WORD   $168D
             
            WORD   $096E, LX_TILEDIR  
            WORD   $16F9 
             
            WORD   $0F8C 
            WORD   $168D  
            WORD   $0BD1  
            WORD   $096E, KCUR  
            WORD   $16F9 
            
             
            WORD   $206E 
            WORD   $15FF,$168D,$18BD,$168D  
            WORD   $203E,$203E,$15FF
            
            WORD   $1A45,LISTSP,LX_SCRLE_BUK
            WORD   $1118                            
            
LX_SCRLE_BUK    
            WORD   $206E 
            WORD   $15FF,$0F8C,$203E,$15FF   
            WORD   $0F9C,$007B 
            WORD   $1010  

            WORD   $1996  
            WORD   $10A6, LX_RLE   ,$102E
 
             
LX_TILE     
            WORD   $1A45  
            WORD   $0000
LX_TILEDIR  WORD   $0000
            
            WORD   $22C6
            WORD   $168D  
            WORD   $168C  
            
            WORD   $0E95
            WORD   $168C  

            
            WORD   $0B0D  
            WORD   $0E98  
            WORD   $16AE  
            WORD   $0AEC  
            
            WORD   $168D  
            WORD   $18BE, $1E83, $035F
            WORD   $18BE, $1E83, $035F
            WORD   $18BE, $1E83, $035F
            WORD   $18BE, $1E83, $035F
            WORD   $18BE, $1E83, $035F
            WORD   $18BE, $1E83, $035F
            WORD   $18BE, $1E83, $035F
            WORD   $18BE, $1E83       
            WORD   $18BE              
            WORD   $15FF              
            WORD   $226F              
            WORD   $15FF              
         
            WORD   $1E7E              
            WORD   $2994               
            WORD   $10A6,$029A        
            WORD   $0C84               
            
            WORD   $1FC6              
            WORD   $0C7D              

           
            WORD   $0B09               
            WORD   $1B6D              
            WORD   $0E9B               
            WORD   $0DF4                 
            
            WORD   $0C7D              

            
LX_RLE           
            WORD   $206E                  
            WORD   $15FF,$0F8C,$203E,$15FF
            WORD   $0F9C,$007B            
            WORD   $1010                  
            
            WORD   $1996                        
            WORD   $10A6                        
LX_RLE_RETS WORD   LX_K_SPRTBUK1 ,$102E   
            
             
            WORD   $10A6, 23552       
            WORD   $0D69              

            WORD   $1A45,LISTSP,LX_RLE_
            WORD   $1118                          
            
            WORD   $15FF  
            WORD   $0F8C  
            WORD   $206E  
            WORD   $203E  
            WORD   $15FF  

            WORD   $0F9C,$007B
            WORD   $1010      

            WORD   $10A6  
            WORD   LX_RLE_CHAR+1
            WORD   $0D69  

LX_RLE_RET
LX_RLE_BUK  WORD   $0554  
LX_RLE_CHAR WORD   $0000  

            WORD   $10A6, 23552
            WORD   $2AF2
            WORD   $19B5
            WORD   $111A

            WORD   $10A6  
            WORD   LX_RLE_XIT 
            WORD   $102E  

            WORD   $10A6  
            WORD   LX_TILE
            WORD   $102F
LX_RLE_XIT            
            WORD   $1A45,LISTSP,LX_SCRLE_BUK
            WORD   $1118                    
            WORD   $0C7D 


LX_LDIR        
            WORD   $0F9C 
            WORD   $0BD1  
            WORD   $096E, LX_LDIRORI  
            WORD   $16F9  
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            
            WORD   $0F9C 
            WORD   $0BD1  
            WORD   $096E, LX_LDIRDES  
            WORD   $16F9  
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            
            WORD   $0F9C 
            WORD   $0BD1  
            WORD   $096E, LX_LDIRNBY  
            WORD   $16F9  
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
           
            WORD   $1A45  
LX_LDIRORI  WORD   $0000
LX_LDIRDES  WORD   $0000
            WORD   $0CF6  
LX_LDIRNBY  WORD   $0000
            WORD   $33C3 
        
            WORD   $19F7 
            WORD   $10A6,
            WORD    LX_K_SPRTBUK1,$102F 
          
LX_POKE        
            WORD   $0F9C 
            WORD   $0BD1  
            WORD   $1731 
            WORD   $18BD 
            WORD   $1E83 
            
            WORD   $15FF,$0F8C,$0F8C,$0F8C,$0BD0,$0BD0,$0BD0,$15FF 
            
            WORD   $10A6,LX_K_SPRTBUK1,$102F 

MSTACKEND

MPAGE52_END

**************************************************************************
 PAGINA TRES
**************************************************************************

DATOS DE PANTALLAS Y GRAFICOS DE PANTALLAS

$C000                          
MPAGE3_INI
 SHERWOOD
LX_SCD_R01  WORD   LX_SCG_WILD   : ARCHIVO "ARTE/LX_SCD01.DAT" 
LX_SCD_R03  WORD   LX_SCG_WILD   : ARCHIVO "ARTE/LX_SCD03.DAT"
LX_SCD_R04  WORD   LX_SCG_WILD   : ARCHIVO "ARTE/LX_SCD04.DAT" 
LX_SCD_R05  WORD   LX_SCG_WILD   : ARCHIVO "ARTE/LX_SCD05.DAT"
LX_SCD_R06  WORD   LX_SCG_WILD   : ARCHIVO "ARTE/LX_SCD06.DAT" 
LX_SCD_R07  WORD   LX_SCG_WILD   : ARCHIVO "ARTE/LX_SCD07.DAT"
LX_SCD_R08  WORD   LX_SCG_WILD   : ARCHIVO "ARTE/LX_SCD08.DAT"           
LX_SCG_WILD = $-1            : ARCHIVO "ARTE/LX_SCG_WILD.FNT"
 CASTLES
LX_SCD_R09  WORD   LX_SCG_CASTLE : ARCHIVO "ARTE/LX_SCD09.DAT" 
LX_SCD_R10  WORD   LX_SCG_CASTLE : ARCHIVO "ARTE/LX_SCD10.DAT"
LX_SCD_R11  WORD   LX_SCG_CASTLE : ARCHIVO "ARTE/LX_SCD11.DAT" 
LX_SCD_R12  WORD   LX_SCG_CASTLE : ARCHIVO "ARTE/LX_SCD12.DAT"     
LX_SCD_R60  WORD   LX_SCG_CASTLE : ARCHIVO "ARTE/LX_SCD60.DAT" 
LX_SCD_R61  WORD   LX_SCG_CASTLE : ARCHIVO "ARTE/LX_SCD61.DAT"
LX_SCD_R62  WORD   LX_SCG_CASTLE : ARCHIVO "ARTE/LX_SCD62.DAT" 

LX_SCG_CASTLE = $-1          : ARCHIVO "ARTE/LX_SCG_CASTLE.FNT"           
 MKTOWN
LX_SCD_R15  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD15.DAT" 
LX_SCD_R16  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD16.DAT"      
LX_SCD_R17  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD17.DAT" 
LX_SCD_R39  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD39.DAT"  
LX_SCD_R40  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD40.DAT" 
LX_SCD_R44  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD44.DAT"  
LX_SCD_R45  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD45.DAT" 
LX_SCD_R46  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD46.DAT"              
LX_SCD_R47  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD47.DAT"  
LX_SCD_R48  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD48.DAT" 
LX_SCD_R52  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD52.DAT"    
LX_SCD_R53  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD53.DAT"
LX_SCD_R55  WORD   LX_SCG_MKTOWN : ARCHIVO "ARTE/LX_SCD55.DAT"

LX_SCG_MKTOWN = $-1          : ARCHIVO "ARTE/LX_SCG_MKTOWN.FNT"   
MPAGE3_END  

**************************************************************************
 PAGINA CUATRO
**************************************************************************

DATOS DE PANTALLAS Y GRAFICOS DE PANTALLAS

$C000   
MPAGE4_INI 
 RICHTOWN
LX_SCD_R18  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD18.DAT"
LX_SCD_R19  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD19.DAT"
LX_SCD_R20  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD20.DAT"
LX_SCD_R29  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD29.DAT"
LX_SCD_R30  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD30.DAT"
LX_SCD_R31  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD31.DAT"
LX_SCD_R36  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD36.DAT"
LX_SCD_R37  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD37.DAT"
LX_SCD_R38  WORD   LX_SCG_RICH   : ARCHIVO "ARTE/LX_SCD38.DAT"
LX_SCG_RICH = $-1            : ARCHIVO "ARTE/LX_SCG_RICHTOWN.FNT"

 INTERIOR 1
LX_SCD_R02  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD02.DAT"
LX_SCD_R14  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD14.DAT"
LX_SCD_R21  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD21.DAT"
LX_SCD_R22  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD22.DAT"
LX_SCD_R23  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD23.DAT"
LX_SCD_R24  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD24.DAT"
LX_SCD_R25  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD25.DAT"
LX_SCD_R26  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD26.DAT"
LX_SCD_R27  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD27.DAT"
LX_SCD_R28  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD28.DAT"
LX_SCD_R32  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD32.DAT"
LX_SCD_R33  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD33.DAT"
LX_SCD_R34  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD34.DAT"
LX_SCD_R35  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD35.DAT"
LX_SCD_R56  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD56.DAT"  

CAVERNAS
LX_SCD_R57  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD57.DAT"
LX_SCD_R58  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD58.DAT"
LX_SCD_R59  WORD   LX_SCG_INT1   : ARCHIVO "ARTE/LX_SCD59.DAT"
LX_SCG_INT1 = $-1            : ARCHIVO "ARTE/LX_SCG_INT1.FNT"

 INTERIOR 2
LX_SCD_R41  WORD   LX_SCG_INT2   : ARCHIVO "ARTE/LX_SCD41.DAT"
LX_SCD_R42  WORD   LX_SCG_INT2   : ARCHIVO "ARTE/LX_SCD42.DAT"
LX_SCD_R43  WORD   LX_SCG_INT2   : ARCHIVO "ARTE/LX_SCD43.DAT"
LX_SCD_R49  WORD   LX_SCG_INT2   : ARCHIVO "ARTE/LX_SCD49.DAT"
LX_SCD_R50  WORD   LX_SCG_INT2   : ARCHIVO "ARTE/LX_SCD50.DAT"
LX_SCD_R51  WORD   LX_SCG_INT2   : ARCHIVO "ARTE/LX_SCD51.DAT"
LX_SCG_INT2 = $-1            : ARCHIVO "ARTE/LX_SCG_INT2.FNT"

DATOS DE SPRITES

            
DUMMYRD
            
ARCHER1
            BYTE    000
            BYTE    003,003,003,003,003
ARCHER2
            BYTE    000
            BYTE    006,006,006,006,006      
ARCHER3
            BYTE    000
            BYTE    009,009,009,009,009   
            BYTE    000 PADDING
ARCHER4
            BYTE    000
            BYTE    012,012,012,012,012               
            
ARCHER9
            BYTE    000
            BYTE    024,024,027,030,030
            
      
ARCHER5MAD      
            BYTE    255
            BYTE    015,015,015,015,015

           
ARCHERPUZZLE1
            BYTE    003 
            BYTE    003,003,003,010
            BYTE    000,000,000,006
            BYTE    010,005
            
ARCHERPUZZLE2
            BYTE    003
            BYTE    003,004,003,010
            BYTE    000,000,000,009
            BYTE    010,008 
            
ARCHERPUZZLE3
            BYTE    003
            BYTE    003,003,003,010
            BYTE    000,000,000,002
            BYTE    010,001

            

TARGETPUZZLE1
            BYTE    000
            BYTE    007,007,007,007
            BYTE    018,013,023,008
            BYTE    010,001

TARGETPUZZLE2
            BYTE    000
            BYTE    000,000,002,002
            BYTE    008,011,006,009
            BYTE    014,017

TARGETPUZZLE3
            BYTE    003
            BYTE    000,000,000,009
            BYTE    000,000,000,015
            BYTE    014,018
TARGETPUZZLE4
            BYTE    000
            BYTE    010,008,001,001
            BYTE    030,001,021,011
            BYTE    010,007
          
RATAPUZZLE1 
            BYTE    253
            BYTE    000,000,000,000
            BYTE    000,000,000,000
            BYTE    010,010 
            
RATAPUZZLE2 
            BYTE    253
            BYTE    000,000,000,000
            BYTE    000,000,000,000
            BYTE    005,010 
RATAPUZZLE3  
            BYTE    253 
            BYTE    000,000,000,000 
            BYTE    000,000,000,000
            BYTE    014,027 
            
ESCALFLECH1 
            BYTE    254 
            BYTE    020,000,000,000
            BYTE    000,000,000,000
            BYTE    000,000 
            
CRUZPUZZLE1 
            BYTE    255
            BYTE    024,000,000,000
            BYTE    000,000,000,000
            BYTE    014,005
PINCHOS1
            BYTE    252
            BYTE    015,019,031
PINCHOS2
            BYTE    252
            BYTE    015,014,025
PINCHOS3
            BYTE    252
            BYTE    015,000,014
PINCHOS4
            BYTE    252
            BYTE    015,019,031
PINCHOS5
            BYTE    252
            BYTE    015,019,031
PINCHOS6
            BYTE    252
            BYTE    015,019,031

            
MPAGE4_END 

**************************************************************************
 PAGINA SEIS
**************************************************************************

$C000
MPAGE6_INI
LX_SPRITE_OO6
            WORD   $1A45,LX_ORIDES,$0EAA 
            WORD   $1118  
            WORD   $1A45,LX_ORIORI,$0E98 
            WORD   $1118  
            WORD   $10A6,LX_SPRITE,$102F 
            
LX_SPRITE_D6
            WORD   $1A45,LX_ORIDES,$0EAB 
            WORD   $1118  
            WORD   $1A45,LX_ORIORI,$0E9A 
            WORD   $1118  
            WORD   $10A6,LX_SPRITE,$102F 

LX_SPRITE_O6
            WORD   $1A45,LX_ORIDES,$0EAA 
            WORD   $1118  
            WORD   $1A45,LX_ORIORI,$0E9A 
            WORD   $1118  
            
            
LX_SPRITE6   

            WORD   $1A45,LX_ORIDES,LX_ORIDESSK ,$16F9
            WORD   $1A45,LX_ORIORI,LX_ORIORISK,$16F9 
            
            WORD   $1A45,LISTSP,LX_SPR_BUK 
            WORD   $1118                               
            
            WORD   $1A45, SPRDIMXYP, SPRDIMXYC 
            WORD   $16F9  
            
            
            WORD   $10A6,CHARS 
            WORD   $2AF0  
            WORD   $3447,$2BEF,$3447
            
             
LX_SPR_BUK6
            WORD   $16AD 
            WORD   $16AE  
            WORD   $1984 
            WORD   $2BEF  
            WORD   $168D  
            WORD   $2994  
            WORD   $10A6  
            WORD   LX_SPR_SKIPC 
            WORD   $102E  
            
            WORD   $0B0D  
            WORD   $0E98  
            WORD   $16AE  
            WORD   $0AEC  
            WORD   $1734  
            WORD   $05DF  
            WORD   $0361, $0361, $0361  
LX_ORIDES6   WORD   $0EAA  

LX_ORIORI6   WORD   $0E98  
            
            WORD   $007B 
            WORD   $16AD    
LX_SPRCRIP
          
            WORD   $0C84 
            WORD   $16AE 
            WORD   $1F52 
            WORD   $168D 
            WORD   $1E83, $035F 
            WORD   $23A2  
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83,$035F,$23A2
            WORD   $007B,$16AD,$0C84,$16AE,$1F52,$168D,$1E83

            WORD   $10A6  
            WORD   SPRDIMXYC
            WORD   $1731  
            WORD   $1B6D  
            WORD   $16FD  
            
            WORD   $1FC6  
            WORD   $0C7D  
            
       
            WORD   $10A6  
            WORD   SPRDIMXYP+1
            WORD   $1733  
           
            WORD   $0BD0  
            WORD   $10A6  
            WORD   SPRDIMXYC
            WORD   $16FD 
            
            WORD   $10A6  
            WORD   LX_K_SPRTBUK1 
            WORD   $102E  
            
            WORD   $0F8D  
            WORD   $0B09  
            WORD   $1B6D 
            WORD   $0E9B  
            WORD   $0DF4    
            WORD   $0F9C 
            WORD   $168D   
            
            WORD   $0C7D 
             


            WORD   $16AD  
            WORD   $16AE  
            WORD   $168D 
            
            WORD   $0B0D  
            WORD   $0E98  
            WORD   $16AE  
            WORD   $0AEC  
            WORD   $1734  
            WORD   $05DF  
            WORD   $0361, $0361, $0361  
            WORD   $0EAA  

            WORD   $0E98  
            
            WORD   $007B 
            WORD   $1E83, $035F
            WORD   $23A2 
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83,$035F,$23A2
            WORD   $007B,$1E83

           
            WORD   $10A6  
            WORD   LX_SPRRETSK
            WORD   $102F 
            


            
LX_COLDET6
            
            WORD   $1A45,LX_COLAREA,LX_COLAREA+1 
            WORD   $0CF6,LX_COLAREAFIN-LX_COLAREA-1
            
            WORD   $33C3

       
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $0181
            WORD   $032F   
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1981
            WORD   $3439
            WORD   LX_COLCAE  
            WORD   $102E  

LX_COLDETC6

             
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $015F
            
            WORD   $032F   
            WORD   $2F98,$029A  
            WORD   $168D 
            WORD   $2994
            WORD   $0C84 
            WORD   $10A6  
            WORD   LX_COLIZBRD 
            WORD   $102E  
            
            WORD   $168D 
            WORD   $007B 
            WORD   $168D 
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
            
            WORD   $10A6  
            WORD   LX_COLIZPASE 
            WORD   $102E  
            
            WORD   $16AD
            WORD   $16AE  
            WORD   $007B  
            WORD   $168D 

            WORD   $1986  

            WORD   $10A6  
            WORD   LX_COLIZCERCA 
            WORD   $102E  

            WORD   $10A6  
            WORD   $FFE0
            WORD   $032F   
            
            WORD   $1986  

            WORD   $10A6  
            WORD   LX_COLIZP2 
            WORD   $102E  
            
            WORD   $10A6  
            WORD   LX_COLIZP2NO            

            WORD   $102F  

            WORD   $10A6  
            WORD   $FFDF
            WORD   $032F   
            
            WORD   $1986  


            WORD   $2FB8  
            WORD   LX_COLPELDR
            
            WORD   $10A6  
            WORD   LX_COLIZPELD            

            WORD   $102F
            WORD   $10A6  
            WORD   $FFDF
            WORD   $032F   
            
            WORD   $1986  
            WORD   $2FB8  
            WORD   LX_COLIZQR
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  
          
                     
             
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $0164
            
            WORD   $032F   
            WORD   $2F98,$029A  
            WORD   $168D 
            WORD   $0C84 
            WORD   $10A6  
            WORD   LX_COLDRBRD 
            WORD   $102E  
            
            WORD   $168D 
            WORD   $007B 
            WORD   $168D            
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
            
            WORD   $10A6  
            WORD   LX_COLDEPASE 
            WORD   $102E  
            
            WORD   $168D 
            WORD   $2BEF  
            WORD   $007B  
            WORD   $168D 

            WORD   $1986  

            WORD   $10A6  
            WORD   LX_COLDECERCA 
            WORD   $102E  

            WORD   $10A6  
            WORD   $FFE0
            WORD   $032F   
            
            WORD   $1986  


            WORD   $10A6  
            WORD   LX_COLDEP2 
            WORD   $102E  
            
            WORD   $10A6  
            WORD   LX_COLDEP2NO            

            WORD   $102F  

            WORD   $10A6  
            WORD   $FFE1
            WORD   $032F   
            
            WORD   $1986  



            WORD   $2FB8  
            WORD   LX_COLPELDR
            
            WORD   $10A6  
            WORD   LX_COLDEPELD            

            WORD   $102F
LX_COLDECERCA6            
            WORD   $10A6  
            WORD   $FFE1
            WORD   $032F   
            
            WORD   $1986  
LX_COLDEPASE6
            
            
            
LX_COLDRBRD6            
            WORD   $2FB8  
            WORD   LX_COLDERR
LX_COLDEPELD6            
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  

LX_COLDETAR6  
            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $00E0
            WORD   $032F   
            WORD   $3447  
            WORD   $2FB8  
            WORD   $0707  
            WORD   $1986  
            WORD   $2FB7   
            WORD   LX_COLARRR
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  
                 
             
            WORD   $2312
            WORD   $10A6  
            WORD   $00A0
            WORD   $032F   
            WORD   $1986  
            WORD   $2FB8  
            WORD   LX_COLABAR
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83   
                 
            WORD   $10A6 
            WORD   LX_K_SPRTBUK1
			WORD   $102F
			
LX_COLCAE6  
            WORD   $10A6  
            WORD   LX_COLCAER 
            WORD   $0D69
            
            WORD   $10A6  
            WORD   LX_SALTANDO+3
            WORD   $0330
            WORD   $1996   
                
            WORD   $10A6  
            WORD   LX_K_SPRTBUK1 
            WORD   $102E  
                
            WORD   $10A6 
            WORD   LX_COLDETC
            WORD   $102F

LX_GAB6
            WORD   $15FF,$168D,$0AFC,$15FF

            WORD   $1A45,LX_GAB_RBUILDY,LX_GAB_RBUILDY_DEST
            WORD   $0CF6,$0008      
            WORD   $33C3            
            WORD   $10A6,LX_GAB_RBUILDY_DEST,$102F 

            WORD   0,0,0,0,0,0,0,0
LX_GAB_RBUILDY_DEST          
            WORD   $10A6,VARL_A
            WORD   $33B4 
            WORD   $2DA2 

            WORD   $1A45,LX_GAB_RET,LX_GAB_VARA_
            WORD   $0A83 

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_A 
            WORD   $102F 
            


 
            WORD   $10A6,LX_VAR_A 
            WORD   $16FD 
        
            WORD   $10A6,$FFE8
            WORD   $340D 
            WORD   $3439 
            WORD   SPOSN+1
            WORD   $02B9,$370A  

           
            WORD   $1A45,LX_GAB_RBUILDX,LX_GAB_RBUILDX_DEST
            WORD   $0CF6,$0008
            WORD   $33C3 
            WORD   $10A6,LX_GAB_RBUILDX_DEST,$102F 

            WORD   0,0,0,0,0,0,0,0
LX_GAB_RBUILDX_DEST          
            WORD   $10A6,VARL_B
            WORD   $33B4
            WORD   $2DA2
        
            WORD   $1A45,LX_GAB_RET,LX_GAB_VARB_
            WORD   $0A83

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_B
            WORD   $102F 
            
        
            WORD   $10A6,LX_VAR_B
            WORD   $16FD 
            
            WORD   $10A6,$FFDF
            WORD   $340D 
            WORD   $3439  
            WORD   SPOSN  
            WORD   $02B9,$370A
                        
            WORD   $0B09   
            WORD   $0E9B  
            WORD   $0DF4    
   
            WORD   $15FF,$0CF6,$0000,$0B1D,$168D,$15FF 
  
            
            WORD   $10A6,LX_K_SPRTBUK1,$102F 


            WORD   $10A6,LX_GAB_RBUILD_DEST
            WORD   $0CF6,$168D 
            WORD   $16FD        
            WORD   $0BD1        
            WORD   $0CF6,$33B4 
            WORD   $16FD        
            WORD   $0BD1        
            WORD   $0CF6,$2DA2 
            WORD   $16FD        

            WORD   $10A6,LX_GAB_RBUILD_DEST
            WORD   $102F        
                     
            WORD   0000,0000,0000,0000
            WORD   0000,0000,0000,0000,0000
  
            WORD   $168D 
            WORD   $33B4
            WORD   $2DA2
            WORD   $10A6 
            WORD   $0000
            WORD   $102F 

            
            WORD   $168D 
            WORD   $33B4
            WORD   $2DA2

            
LX_DIMXY6   
            WORD   $0F9C
            WORD   $0BD1  
            WORD   $096E, SPRDIMXYP
            WORD   $16F9  
            
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            WORD   $10A6,LX_K_SPRTBUK1,$102F             
            
JPUPDANIM6           
            WORD   $0F9C
            WORD   $2AEF
            WORD   $168D     
            WORD   $2AF0
            WORD   $0BD1  
            WORD   $1731
            WORD   $2BEF  
            WORD   $2BEF  
            WORD   $168D  
            WORD   $340D
            WORD   $007B
            WORD   $168D  
            WORD   $0D69
            WORD   $2AF0
            WORD   $0BD1  
            WORD   $0BD1  
            WORD   $0BD1  
            WORD   $034C
            WORD   $168C                 
            WORD   $168D  
            WORD   $35C6
            WORD   $168C                  
            WORD   $168D  
            WORD   $096E, CHARS  
            WORD   CHARS
            WORD   $16F9
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            WORD   $10A6,LX_K_SPRTBUK1,$102F 

LX_CLENEM6   
           
            WORD   $15FF,$168D,$0AFC,$15FF 
            
            WORD   $1A45,LX_COLENEMI,$0000 
            WORD   $0A83 
            
            WORD   $1A45,LX_COLENEMP,$0000
            WORD   $1118 
            
            WORD   $1A45,LX_GAB_RET,LX_CLE_VARC_
            WORD   $0A83 

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_C
            WORD   $102F                           
            
LX_CLE_VARC_RET
        
            WORD   $10A6,LX_VAR_C 
            WORD   $16FD               

            WORD   $10A6,$FFE8    
            WORD   $340D               
            WORD   $3439          
            WORD   SPOSN+1
            WORD   $02B9,$370A    
            
            
            
            WORD   $1A45,LX_GAB_RET,LX_CLE_VARD_
            WORD   $0A83 

            WORD   $1A45,LX_GAB_RBUILD_EXE,VARL_D
            WORD   $102F 
            
LX_CLE_VARD_RET
        
            WORD   $10A6,LX_VAR_D
            WORD   $16FD 

            
            WORD   $10A6,$FFDF   
            WORD   $340D               
            WORD   $3439         
            WORD   SPOSN         
            WORD   $02B9,$370A   
                        
            WORD   $0B09   
            WORD   $0E9B  
            WORD   $0DF4    


            WORD   $0B0D  
            WORD   $0E88  
            WORD   $10A6  
            WORD   $00FF 
            
            WORD   $168C 
            WORD   $032F   
            WORD   $2F98,$029A  
            WORD   $168D  
            
            WORD   $10A6,LX_VAR_D 
            WORD   $007B           
            WORD   $0386          
            WORD   $0C84  
             
            WORD   $10A6           
            WORD   LX_COLENEMIBRD   
            WORD   $102E           
            
            WORD   $168D  
            WORD   $007B  
            WORD   $168D  
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
            

            
            WORD   $2FB8  
            WORD   LX_COLENEMI
           
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  

LX_COLENEMIBRD
 
            WORD   $10A6  
            WORD   $0004 
            
            WORD   $032F   
            WORD   $2F98,$029A  
            WORD   $168D  
            WORD   $0C84  
            WORD   $10A6  
            WORD   LX_COLENEMDBRD  
            WORD   $102E  

            WORD   $168D  
            WORD   $007B  
            WORD   $168D  
            
            WORD   $0CF6  
            WORD   $0707  
            WORD   $1986  
            
  
            
            WORD   $2FB8  
            WORD   LX_COLENEMD
           
            WORD   $1FC6  
            WORD   $10A6   
            WORD   $1E83  

LX_COLENEMDBRD
           
            WORD   $0B0D  
            WORD   $2BEF       
            WORD   $007B 

            WORD   $096E,$6000  
            WORD   $35C6,$A700  
            WORD   $1F52  

            WORD   $35C6,$6000  
            WORD   $1F52 
            
            WORD   $35C6,$9904  
            WORD   $1F52  

            WORD   $35C6,$6000  
            WORD   $1F52 
            
            WORD   $35C6,$A700  
            WORD   $1F52  

            WORD   $35C6,$6000  
            WORD   $1F52 

            WORD   $35C6,$0000  
            WORD   $1F52  

            WORD   $10A6  
            WORD   LX_COLENEMI_PROTA  
            WORD   $102E  

            WORD   $1A45,LX_COLENEMI,$0000
            WORD   $1118 
            
            WORD   $1A45,LX_COLENEMP,$0101
            WORD   $1118 
           
            WORD   $15FF,$0CF6,$0000,$0B1D,$168D,$15FF 
            
            WORD   $10A6,LX_K_SPRTBUK1,$102F 
RUTALT6
            
LX_BLCOPY6   
            
            WORD   $1A45, SPRDIMXYP, SPRDIMXYC 
            WORD   $16F9  
            
LX_BLCOPY_BUK6
            WORD   $0B0D                
            WORD   $168D                
            WORD   $0B0D                
            WORD   $1011
            
            WORD   $05DF
            WORD   $0361, $0361, $0361
            WORD   $0EAA                
        
            WORD   $0CF6               
            WORD   $0020
            WORD   $33C3 
            
            WORD   $0F9C 
            WORD   $2994  
            WORD   $0EAA 
            WORD   $168D  
            
            WORD   $0F9C 
            WORD   $23A2 
            WORD   $1011 
            WORD   $168D  
            
            WORD    $0CF6,$0020,$33C3,$0F9C,$2994,$0EAA,$168D,$0F9C,$23A2,$1011,$168D  
            WORD    $0CF6,$0020,$33C3,$0F9C,$2994,$0EAA,$168D,$0F9C,$23A2,$1011,$168D  
            WORD    $0CF6,$0020,$33C3,$0F9C,$2994,$0EAA,$168D,$0F9C,$23A2,$1011,$168D  
            WORD    $0CF6,$0020,$33C3,$0F9C,$2994,$0EAA,$168D,$0F9C,$23A2,$1011,$168D  
            WORD    $0CF6,$0020,$33C3,$0F9C,$2994,$0EAA,$168D,$0F9C,$23A2,$1011,$168D  
            WORD    $0CF6,$0020,$33C3,$0F9C,$2994,$0EAA,$168D,$0F9C,$23A2,$1011,$168D  
            
          
            WORD    $0F8D,$0CF6,$0020,$33C3,$2312,$2BEF,$23A2,$22C6,$1E7E,$168D,$0F9C,$23A2,$168D  
  
            WORD   $0CF6,$0020,$33C3,$2312,$2BEF,$23A2,$22C6,$1E7E,$168D,$2BEF,$23A2,$22C6,$1E7E,$168D  
            
            WORD   $1011,$2D8A,$0CF6,$0020,$33C3,$0F9C,$23A2,$168D,$0F9C,$2994,$0EAA,$168D               
           
            
            WORD   $0CF6,$0020,$33C3
         

              
            WORD   $10A6 
            WORD   SPRDIMXYC
            WORD   $1731 
           
            WORD   $0BD0 
            WORD   $10A6 
            WORD   SPRDIMXYC
            WORD   $16FD 
            
            WORD   $10A6  
            WORD   LX_K_SPRTBUK1 
            WORD   $102E  
            
            WORD   $0B09  
            WORD   $1B6D 
            WORD   $0E9B  
            WORD   $0DF4    
            
            WORD   $10A6  
            WORD   LX_BLCOPY_BUK6
            WORD   $102F  
            
LX_COLEXX_INI
            WORD   $1A45 
            WORD   LX_CLX_CLEAR
            WORD   LX_CLX_TRUFLAG
            WORD   $0CF6 
            WORD   0004
            WORD   $33C3
            
            
LX_COLEXX
            
            WORD   $0B0D          
            WORD   $2F98        
            WORD   $029A  
            WORD   $168D           
            WORD   $0C84        
            
            WORD   $10A6        
            WORD   LX_CLX_BORD  
            WORD   $102E        
            
            WORD   $1F5D  
            WORD   $102E        
            
            WORD   $0B0D         
            WORD   $05DF  
            WORD   $10A6  
            WORD   $02BD  
            WORD   $0C84  
            WORD   $02BC  
            
            WORD   $10A6        
            WORD   LX_CLX_BORD  
            WORD   $102E        
            
            WORD   $0B0D             
            WORD   $007B       

            WORD   $096E,$6000  
            WORD   $35C6,$A700  
            WORD   $1F52       

            WORD   $35C6,$6000  
            WORD   $1F52       
            
            WORD   $35C6,$9904  
            WORD   $1F52       

            WORD   $10A6        
            WORD   LX_CLX_CNT1  
            WORD   $102E        
           
LX_CLX_SPR        
            WORD   $2FDA 
            WORD   $0100 
            WORD   LX_CLX_SPRFLAG
            WORD   $0D69 
            WORD   $10A6,LX_CLX_TRUE,$102F   
           
            WORD   $10A6        
            WORD   LX_CLX_SPR   
            WORD   $102F        
           
LX_CLX_CNT1           
            WORD   $0B0D        
            WORD   $0E88        
            WORD   $10A6        
            WORD   $0100  
            WORD   $032F         
            
            WORD   $10A6         
            WORD   $0C01  
            WORD   $0C84  
            
            WORD   $10A6        
            WORD   LX_K_SPRTBUK1 
            WORD   $102E        
            
            WORD   $10A6        
            WORD   LX_CLX_BLK   
            WORD   $102F        
            
           

LX_CLX_BLK         
            WORD   $2FDA 
            WORD   $0100 
            WORD   LX_CLX_BLKFLAG
            WORD   $0D69 
            WORD   $10A6,LX_CLX_TRUE,$102F  


            
LX_CLX_BORD         
            WORD   $2FDA 
            WORD   $0100 
            WORD   LX_CLX_BORFLAG
            WORD   $0D69 
            
LX_CLX_TRUE   
            WORD   114
            WORD   $2FDA 
            WORD   $0000 
            WORD   LX_CLX_TRUFLAG
            WORD   $0D69 
            WORD   $10A6,LX_K_SPRTBUK1,$102F

LX_CLX_CLEAR            
            BYTE    001,000,000,000

            
LX_AYSOUND  
            WORD   114
            WORD   $0F9C        
            WORD   $2AEF        
            WORD   $15FF,$0F8C,$0F8C,$0BD0,$0BD0,$15FF 
            
LX_AYSOUND_BUK
            WORD   $168D               
            WORD   $21DC        
            WORD   $168D               
            
            WORD   $3439        
            
            WORD   $10A6               
            WORD   LX_K_SPRTBUK1       
            WORD   $102E               
            
            WORD   $0CF6,AYCTRL 
            WORD   $1E7D        
            WORD   $168D               
            WORD   $18BE        
            WORD   $168D               
            WORD   $0CF6,AYDATA 
            WORD   $1E7D        
            
            WORD   $10A6,LX_AYSOUND_BUK,$102F 

            
PROTSWORD   ARCHIVO  "ARTE/LX_PROTSWW.SPR"     < SPRITE PROTAGONISTA CON ESPADA CAMINANDO
PROTSWHH    ARCHIVO  "ARTE/LX_PROTSWHH.SPR"    < SPRITE PROTAGONISTA CON ESPADA ESTOCADA ALTA
PROTSWHM    ARCHIVO  "ARTE/LX_PROTSWHM.SPR"    < SPRITE PROTAGONISTA CON ESPADA ESTOCADA MEDIA
PROTSWHL    ARCHIVO  "ARTE/LX_PROTSWHL.SPR"    < SPRITE PROTAGONISTA CON ESPADA ESTOCADA BAJA
PROTSWB     ARCHIVO  "ARTE/LX_PROTSWB.SPR"     < SPRITE PROTAGONISTA CON ESPADA BLOQUEO A/M/B
SWDUMMY     ARCHIVO  "ARTE/LX_SWDUMMY.SPR"     < SPRITE MUÑECO DE PRACTICA
ENEMSWORD   ARCHIVO  "ARTE/LX_ENEMSWW.SPR"     < SPRITE ENEMIGO CON ESPADA CAMINANDO
ENEMSWM1    ARCHIVO  "ARTE/LX_ENEMSWM1.SPR"    < SPRITE ENEMIGO CON ESPADA ESTOCADA Y BLOQUEO
ENEMSWM2    ARCHIVO  "ARTE/LX_ENEMSWM2.SPR"    < SPRITE ENEMIGO CON ESPADA ESTOCADA Y BLOQUEO
SHERSWORD   ARCHIVO  "ARTE/LX_SHERSWW.SPR"     < SPRITE SHERIFF CON ESPADA CAMINANDO
SHERSWM1    ARCHIVO  "ARTE/LX_SHERSWM1.SPR"    < SPRITE SHERIFF CON ESPADA ESTOCADA Y BLOQUEO
SHERSWM2    ARCHIVO  "ARTE/LX_SHERSWM2.SPR"    < SPRITE SHERIFF CON ESPADA ESTOCADA Y BLOQUEO            
SWORD       ARCHIVO  "ARTE/LX_SWORD.SPR"       < ESPADA
LX_PROTDED  ARCHIVO  "ARTE/LX_PROTDED.SPR"     < SPRITE MUERTE PROTAGONISTA
LX_ENEMBOW_DED ARCHIVO  "ARTE/LX_ENEMBOW_DED.SPR" < SPRITE MUERTE BALLESTERO
LX_SWDUMMYDED  ARCHIVO  "ARTE/LX_SWDUMMYDED.SPR"  < SPRITE MUÑECO DE PRACTICA TUMBADO

LX_PROTFALL ARCHIVO  "ARTE/LX_PROTFALL.SPR"    < SPRITE PROTAGONISTA CAE MUERTO
LX_ENEMSWWFALL ARCHIVO  "ARTE/LX_ENEMSWWFALL.SPR" < SPRITE ENEMIGO CAE MUERTO
LX_SHERSWWFALL ARCHIVO  "ARTE/LX_SHERSWWFALL.SPR" < SPRITE SHERIFF CAE MUERTO

LX_ENEMSWDED ARCHIVO  "ARTE/LX_ENEMSWDED.SPR"  < SPRITE ENEMIGO ESPADA MUERTO
LX_SHERDED  ARCHIVO  "ARTE/LX_SHERDED.SPR"     < SPRITE SHERIFF ESPADA MUERTO

PUEOFFA     ARCHIVO  "ARTE/LX_PUEOFF.SPR"      < GRAFICO PUERTA 
PUEOFFB     = $-96
WASP        ARCHIVO  "ARTE/LX_WASP.SPR"        < SPRITE AVISPA
HORSE       ARCHIVO  "ARTE/LX_HORSE.SPR"       < SPRITE CABALLO
RATA        ARCHIVO  "ARTE/LX_RATA.SPR"        < SPRITE RATA
CROSSBOW    ARCHIVO  "ARTE/LX_CROSSBOW.SPR"    < SPRITE DARDOS
DIANA       = $-512
            ARCHIVO  "ARTE/LX_DIANA.BIN"       < GRAFICO DIANA

LXSPCUR     ARCHIVO  "ARTE/LX_CURSOR.SPR"      < GRAFICO CURSOR  
            
MORTIWALL   =  $       -512                  < GRAFICOS Y SPRITES RELACIONADOS CON MORTIANNA
            ARCHIVO  "ARTE/LX_MORTIANNA_ADD.BIN",8,8
MORTIFIRE   =  $ 
            ARCHIVO  "ARTE/LX_MORTIANNA_ADD.SPR",16,16

GRAFICOS IRRUPCION LOXLEY EN CAPILLA            
LX_IRRUP1
LX_IRRUP2   ARCHIVO "ARTE/LX_PROT_IRRUP2.BIN"
LX_IRRUP3   ARCHIVO "ARTE/LX_PROT_IRRUP3.SPR"
LX_IRRUP4   ARCHIVO "ARTE/LX_PROT_IRRUP4.SPR"
LX_IRRUP5   ARCHIVO "ARTE/LX_PROT_IRRUP5.SPR" 
LX_IVENT1   ARCHIVO "ARTE/LX_IRRVENT1.BIN"
LX_IVENT2   ARCHIVO "ARTE/LX_IRRVENT2.BIN"
LX_IVENT3   ARCHIVO "ARTE/LX_IRRVENT3.BIN"
LX_IVENT4   ARCHIVO "ARTE/LX_IRRVENT4.BIN"
LX_IVENT5   ARCHIVO "ARTE/LX_IRRVENT5.BIN"
LX_IVENT6   ARCHIVO "ARTE/LX_IRRVENT6.BIN"
LX_IVENT7   ARCHIVO "ARTE/LX_IRRVENT7.BIN"
LX_IVENT8   ARCHIVO "ARTE/LX_IRRVENT8.BIN"

LX_RATATAB
            WORD   $0000
            WORD   LX_RATAANI
            WORD   RATA+LX_RATA_0
            WORD   RATA+LX_RATA_4
            WORD   RATA+LX_RATA_4          
            WORD   RATA+LX_RATA_8
            
LX_RATAANI  BYTE    001,000,003,002,004,005

LX_PROTDEWORD
LX_ENEMSWDEWORD
            WORD   $0000
            WORD   LX_FALLDED
            WORD   LX_PROTFALL+LX_PROTFALL_0
            WORD   LX_PROTDED+LX_PROTDED_0
            WORD   LX_PROTFALL+LX_PROTFALL_5
            WORD   LX_PROTDED+LX_PROTDED_4
            
            WORD   LX_ENEMSWWFALL
            WORD   LX_ENEMSWDED
            
            WORD   LX_SHERSWWFALL
            WORD   LX_SHERDED
            
            WORD   LX_SWDUMMYDED
              
LX_FALLDED  BYTE    001,000,003,002,005,004,007,006,008


            

LX_SFX_COIN = $-1
            BYTE    000,040
            BYTE    001,000
            BYTE    002,045
            BYTE    003,000
            BYTE    004,050
            BYTE    005,000
            BYTE    011,000
            BYTE    012,025
            BYTE    007,%11111000
            BYTE    008,031
            BYTE    009,031
            BYTE    010,031
            BYTE    013,000
            BYTE    $4B

LX_SFX_AHHIT = $-1
            BYTE    002,000
            BYTE    003,005
            BYTE    006,020
            BYTE    007,%11101101
            BYTE    011,000
            BYTE    012,005
            BYTE    008,000
            BYTE    009,%11111111
            BYTE    010,000
            BYTE    013,000
            BYTE    $4B

LX_SFX_TECLA = $-1
            BYTE    002,040
            BYTE    003,000
            BYTE    011,000
            BYTE    012,025
            BYTE    007,%11111101
            BYTE    009,031
            BYTE    013,000
            BYTE    $4B
			
 IRRUPCION LOXLEY

 
LX_IRRUPVARS
LX_IRRUPSALTO

            BYTE    "A": WORD  LX_ISAA-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP2
            BYTE    DXY,001,003,LOC,238,014,SPR
LX_ISAA     BYTE    FIN

            BYTE    "B": WORD  LX_ISAB-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP2
            BYTE    DXY,001,003,LOC,237,014,SPR
            BYTE    DIR: WORD LX_IRRUP2+080
            BYTE    DXY,001,001,LOC,254,254,SPR
            BYTE    DIR: WORD LX_IRRUP2+128
            BYTE    DXY,001,001,LOC,000,255,SPR
LX_ISAB     BYTE    FIN

            BYTE    "C": WORD  LX_ISAC-($+2)+1 : BYTE  LSE
            
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            
            BYTE    DIR: WORD LX_IRRUP2
            BYTE    DXY,003,003,LOC,000,002,SPD
            
LX_ISAC     BYTE    FIN
 
            BYTE    "D": WORD  LX_ISAD-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            BYTE    LOC,254,000,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,002,SPD
            
LX_ISAD     BYTE    FIN

            BYTE    "E": WORD  LX_ISAE-($+2)+1 : BYTE  LSE
             BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+$40
            BYTE    LOC,254,000,SPR
            BYTE    LOC,254,000,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,001,SPD
LX_ISAE     BYTE    FIN

            BYTE    "F": WORD  LX_ISAF-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2
            BYTE    LOC,254,000,SPR
            BYTE    LOC,254,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0
            BYTE    LOC,255,000,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,255,000,SPD
LX_ISAF     BYTE    FIN

            BYTE    "G": WORD  LX_ISAG-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,001,001
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2: BYTE  DXY,002,002
            BYTE    LOC,255,255,SPR
            BYTE    LOC,254,255,SPR
            BYTE    LOC,254,255,SPR
            BYTE    LOC,254,255,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,001,SPD
LX_ISAG     BYTE    FIN 

            BYTE    "H": WORD  LX_ISAH-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,001,001
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2: BYTE  DXY,002,002
            BYTE    LOC,255,255,SPR
            BYTE    LOC,254,255,SPR
            BYTE    LOC,254,255,SPR
            BYTE    LOC,254,255,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,255,255,SPD
LX_ISAH     BYTE    FIN
 
            BYTE    "I": WORD  LX_ISAI-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2: BYTE  DXY,002,002
            BYTE    LOC,254,000,SPR
            BYTE    LOC,254,255,SPR
            BYTE    LOC,254,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4-16: BYTE  DXY,001,001
            BYTE    LOC,255,254,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,000,SPD
            
LX_ISAI     BYTE    FIN

            BYTE    "J": WORD  LX_ISAJ-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2: BYTE  DXY,002,002
            BYTE    LOC,254,000,SPR
            BYTE    LOC,254,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4-16: BYTE  DXY,001,001
            BYTE    LOC,255,254,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2: BYTE  DXY,002,002
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,000,SPD
            
LX_ISAJ     BYTE    FIN

            BYTE    "K": WORD  LX_ISAK-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2
            BYTE    LOC,255,000,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4-16: BYTE  DXY,001,001
            BYTE    LOC,255,254,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2: BYTE  DXY,002,002
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2+16: BYTE  DXY,001,001
            BYTE    LOC,254,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4: BYTE  DXY,002,002
            BYTE    LOC,000,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4-16: BYTE  DXY,001,001
            BYTE    LOC,255,254,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,000,SPD
LX_ISAK     BYTE    FIN

            BYTE    "L": WORD  LX_ISAL-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_0: BYTE  DXY,002,002
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2
            BYTE    LOC,255,000,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4-16: BYTE  DXY,001,001
            BYTE    LOC,255,254,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2+16
            BYTE    LOC,255,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4: BYTE  DXY,002,002
            BYTE    LOC,000,255,SPR
            BYTE    LOC,255,254,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,255,254,SPD
LX_ISAL     BYTE    FIN
 
            BYTE    "M": WORD  LX_ISAM-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2: BYTE  DXY,001,002
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_6: BYTE  DXY,002,002
            BYTE    LOC,254,252,SPR
            BYTE    LOC,255,253,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,002,006,SPR
            BYTE    LOC,255,253,SPR
            BYTE    LOC,255,253,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4-16: BYTE  DXY,001,001
            BYTE    LOC,255,254,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,000,SPD
LX_ISAM     BYTE    FIN
 
            BYTE    "N": WORD  LX_ISAN-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2+16: BYTE  DXY,001,001
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_6: BYTE  DXY,002,002
            BYTE    LOC,000,255,SPR
            BYTE    LOC,255,253,SPR
            BYTE    LOC,255,253,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,002,005,SPR
            BYTE    LOC,255,253,SPR
            BYTE    LOC,255,253,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,000,SPD
LX_ISAN     BYTE    FIN

            BYTE    "O": WORD  LX_ISAO-($+2)+1 : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_2+16: BYTE  DXY,001,001
            BYTE    LOC,235,013,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_6: BYTE  DXY,002,002
            BYTE    LOC,000,255,SPR
            BYTE    LOC,000,255,SPR
            BYTE    LOC,000,255,SPR
            BYTE    LOC,000,255,SPR
            BYTE    DIR: WORD LX_IRRUP4+IRRUP4_4
            BYTE    LOC,000,255,SPR
            BYTE    DIR: WORD LX_IRRUP2: BYTE  DXY,003,003
            BYTE    LOC,000,000,SPD
            
LX_ISAO     BYTE    FIN
            
            BYTE    "Z": WORD  LX_ISAZ-($+2)
LX_ISAZ     
            BYTE    $80
            
LX_IRRUPVENTWORD   WORD LX_IRRUPVENT
LX_IRRUPVENT
            BYTE    "A": WORD  LX_IVEA-($+2)
            BYTE    LSE,DIR: WORD LX_IVENT1-512: BYTE  FIN
            BYTE    016,006
            BYTE    022,006,024,"@AB"
            BYTE    022,007,024,"CDE"
            BYTE    022,008,024,"FGH"
            BYTE    022,009,024,"IJK"
            BYTE    022,010,024,"LMN"
            BYTE    LSE,DIR: WORD LX_IVENT8-512: BYTE  FIN
            BYTE    016,008
            BYTE    022,012,023,"@ABC"
            BYTE    022,013,023,"DEFG"
LX_IVEA     
 
            BYTE    "B": WORD  LX_IVEB-($+2)
            BYTE    LSE,DIR: WORD LX_IVENT1-512: BYTE  FIN
            BYTE    016,008
            BYTE    022,006,024,"@AB"
            BYTE    022,007,024,"CDE"
            BYTE    022,008,024,"FGH"
            BYTE    022,009,024,"IJK"
            BYTE    022,010,024,"LMN"
            BYTE    LSE,DIR: WORD LX_IVENT8-512: BYTE  FIN
            BYTE    016,008
            BYTE    022,012,023,"@ABC"
            BYTE    022,013,023,"DEFG"
LX_IVEB     
            BYTE    "C": WORD  LX_IVEC-($+2) 
            BYTE    LSE,DIR: WORD LX_IVENT1-512: BYTE  FIN
            BYTE    016,008
            BYTE    022,006,024,"@AB"
            BYTE    022,007,024,"CDE"
            BYTE    022,008,024,"FOP"
            BYTE    022,009,024,"IQR"
            BYTE    022,010,024,"LMN"
            BYTE    LSE,DIR: WORD LX_IVENT8-512
            BYTE    AYS:     WORD LX_AYS_IRRUPB
            BYTE    FIN
            BYTE    016,008
            BYTE    022,012,023,"@ABC"
            BYTE    022,013,023,"DEFG"
            
LX_IVEC     

            BYTE    "D": WORD  LX_IVED-($+2)
            BYTE    LSE,DIR: WORD LX_IVENT1-512
            BYTE    AYS:     WORD LX_AYS_IRRUP6_10: BYTE  FIN
            BYTE    016,008
            BYTE    022,006,024,"@AB"
            BYTE    022,007,024,"STU"
            BYTE    022,008,024,"VWX"
            BYTE    022,009,024,"Y",016,005,"Z",16,08,"["
            BYTE    022,010,024,"\\]^"
            BYTE    LSE,DIR: WORD LX_IVENT8-512
            BYTE    AYS:     WORD LX_AYS_IRRUP6_31: BYTE  FIN
            BYTE    016,008
            BYTE    022,012,023,"@ABC"
            BYTE    022,013,023,"DEFG"
LX_IVED     

            BYTE    "E": WORD  LX_IVEE-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,233,009,SPD
            BYTE    DIR: WORD LX_IVENT4-512
            BYTE    AYS:     WORD LX_AYS_IRRUP6_28: BYTE  FIN
            BYTE    016,006
            BYTE    022,006,024,"@A",016,005,"B",16,08
            BYTE    022,007,024,"C",016,005,"D",16,08,"E"
            BYTE    022,008,024,"F",016,005,"GH",16,08
            BYTE    022,009,024,"IJK"
            BYTE    022,010,024,"LMN"
            BYTE    022,011,024,"OPQ"
            BYTE    LSE,DIR: WORD LX_IVENT8-512
            BYTE    AYS:     WORD LX_AYS_IRRUP6_10: BYTE  FIN
            BYTE    016,008
            BYTE    022,012,023,"@ABC"
            BYTE    022,013,023,"DEFG"
            
LX_IVEE     

            BYTE    "F": WORD  LX_IVEF-($+2): BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,234,008,SPD
            BYTE    DIR: WORD LX_IVENT5-512
            BYTE    AYS:     WORD LX_AYS_IRRUP6_21: BYTE  FIN
            BYTE    016,008
            BYTE    022,007,023,"@A",016,005,"BC",016,008
            BYTE    022,008,023,"DEF",016,006,"G",016,008
            BYTE    022,009,023,"HI",016,005,"JK",016,008
            BYTE    022,010,023,"LM",016,007,"N",016,008,"O"
            BYTE    022,011,023,"P",016,006,"QRS"
            BYTE    LSE,DIR: WORD LX_IVENT8-512
            BYTE    AYS:     WORD LX_AYS_IRRUP6_05: BYTE  FIN
            BYTE    016,008
            BYTE    022,012,023,"@ABC"
            BYTE    022,013,023,"DEFG"
           

LX_IVEF     
 
            BYTE    "G": WORD  LX_IVEG-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,235,007,SPD
            BYTE    DIR: WORD LX_IRRUP5: BYTE  DXY,004,002
            BYTE    LOC,001,001,SPD
            BYTE    DIR: WORD LX_IVENT6-512: BYTE  FIN
            BYTE    016,008
            BYTE    022,008,024,"@",016,005,"AB",016,008
            BYTE    022,009,024,"C",016,005,"DE",016,008
            BYTE    022,010,024,"F",016,007,"GH",016,008
            BYTE    022,011,024,"IJK"
            BYTE    LSE,DIR: WORD LX_IVENT8-512: BYTE  FIN
            BYTE    016,008
            BYTE    022,012,023,"@ABC"
            BYTE    022,013,023,"DEFG"
LX_IVEG     

            BYTE    "H": WORD  LX_IVEH-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,236,006,SPD
            BYTE    DIR: WORD LX_IRRUP5: BYTE  DXY,004,002
            BYTE    LOC,000,002,SPD
            BYTE    DIR: WORD LX_IVENT7-512: BYTE  FIN
            BYTE    016,007
            BYTE    022,011,023,"@ABC"
            BYTE    022,012,023,"DEFG"
            BYTE    022,013,023,"HIJK"
            
LX_IVEH     

            BYTE    "I": WORD  LX_IVEI-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,237,006,SPD
            BYTE    DIR: WORD LX_IRRUP5: BYTE  DXY,004,002
            BYTE    LOC,255,001,SPD, FIN
           
LX_IVEI    

            BYTE    "J": WORD  LX_IVEJ-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,238,005,SPD
            BYTE    DIR: WORD LX_IRRUP5: BYTE  DXY,004,002
            BYTE    LOC,254,002,SPD,FIN
LX_IVEJ     
 
            BYTE    "K": WORD  LX_IVEK-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,239,005,SPD
            BYTE    DIR: WORD LX_IRRUP5: BYTE  DXY,004,002
            BYTE    LOC,253,002,SPD,FIN

LX_IVEK     
 
            BYTE    "L": WORD  LX_IVEL-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,240,004,SPD ,FIN            
LX_IVEL     

            BYTE    "M": WORD  LX_IVEM-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,241,003,SPD, FIN
                        
LX_IVEM    

            BYTE    "N": WORD  LX_IVEN-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,241,002,SPD, FIN
                        
LX_IVEN    
            BYTE    "O": WORD  LX_IVEO-($+2) : BYTE  LSE
            BYTE    DIR: WORD LX_IRRUP3: BYTE  DXY,003,004
            BYTE    LOC,242,002,SPD, FIN
                        
LX_IVEO    

            BYTE    "Z": WORD  LX_IVEZ-($+2)+1 
            BYTE    022,013,007
            BYTE    LSE
            BYTE    DIR: WORD SHERSWORD+SHERSWORD_12: BYTE  DXY,004,004
            BYTE    SPR
LX_IVEZ     BYTE    FIN
            BYTE    $80
            
LX_AYS_IRRUPB    = $-1  
            BYTE    006,000
LX_AYS_IRRUPBM   = $-1              
            BYTE    011,000
            BYTE    012,032
            BYTE    007,199
            BYTE    008,031
            BYTE    009,031
            BYTE    010,031
            BYTE    013,000
            BYTE    $4B

LX_AYS_IRRUP6_05  = $-1 
            BYTE    006,005
            BYTE    $4B
            
LX_AYS_IRRUP6_10 = $-1 
            BYTE    006,010
            BYTE    $4B
LX_AYS_IRRUP6_21 = $-1 
            BYTE    006,021
            BYTE    $4B
LX_AYS_IRRUP6_28 = $-1 
            BYTE    006,028
            BYTE    $4B
LX_AYS_IRRUP6_31 = $-1 
            BYTE    006,031
            BYTE    $4B
LX_AYS_SWORDA = $-1
            BYTE    008,000
            BYTE    006,000
            BYTE    011,000
            BYTE    012,004
            BYTE    007,055
            BYTE    008,031
            BYTE    013,004
            BYTE    $4B            
            
LX_AYS_SWORBYTE  = $-1  
            BYTE    006,000
            BYTE    011,000
            BYTE    012,006
            BYTE    007,055
            BYTE    008,031
            BYTE    013,000
            BYTE    $4B            
MPAGE6_END
 


**************************************************************************
 PAGINA SIETE
**************************************************************************
 
$C000
MPAGE7_INI 
   

LXT_EN1     
            
            
            BYTE    "B"
            WORD   LXT_EN3-($+2)
            BYTE    016,007
            BYTE    022,006,000,006,013,013
            BYTE    006,013
            BYTE    006,013
            BYTE    "  1.START",006,013
            BYTE    006,013
            BYTE    "  2.SKILL",006,013
            BYTE    006,013
            BYTE    "  3.CONTROLS",006,013
            BYTE    006,013
            BYTE    "  4.CREDITS",006,013
            BYTE    006,013
            BYTE    006
      
LXT_EN3
            BYTE    "C"
            WORD   LXT_EN4-($+2)
            BYTE    022,008,000
            BYTE    016,007
            BYTE    006,013,013
            BYTE    "1.KEYBOARD",006,013,013
            BYTE    "2.SINCLAIR",006,013,013
            BYTE    "3.CURSOR",006,013,013
            BYTE    "4.KEMPSTON",006,013,013
            BYTE    "5.REDEFINE KEYS",006
            
LXT_EN4
            BYTE    "D"
            WORD   LXT_EN5-($+2)
            BYTE    022,006,000
            BYTE    016,007
            BYTE    124," LEFT",006,013,013
            BYTE    125," RIGHT",006,013,013
            BYTE    126," UP",006,013,013
            BYTE    127," DOWN",006,013,013
            BYTE    "$ FIRE",006,013,013
            BYTE    "% PAUSE",006,013,013
            BYTE    "X QUIT",006
             
LXT_EN5
            BYTE    "E"
            WORD   LXT_EN6-($+2)
            BYTE    016,007
            BYTE    022,010,000,006,013,013
            BYTE    "  1.EASY",006,013,013
            BYTE    "  2.NORMAL",006,013,013
            BYTE    "  3.HARD",006
LXT_EN6
            BYTE    "F"
            WORD   LXT_EN7-($+2)
            BYTE    022,008,000
            BYTE    016,007
            BYTE    023,005,005
            BYTE    "MUSIC",006,013
            BYTE    "  * RICHARD",006,013 
            BYTE    "'KULOR' ARMIJO",006,013
            BYTE    006,013
            BYTE    "RUSSIAN VERSION:",013
            BYTE    "MIKHAIL SUDAKOV",006,013
            BYTE    "   AND MARIA",006,013
            BYTE    "KRASHENINNIKOVA",006,013
            BYTE    006,013
            BYTE    "DESIGN AND CODE",013
            BYTE    " * ARIEL RUIZ",006
            
            
            
LXT_EN7
            BYTE    "G"
            WORD   LXT_EN8-($+2)
            BYTE      016,000,017,006,019,000
            BYTE      022,010,000,006,006
            BYTE      "   YOU ARE DEAD, CHRISTIAN...",006
            BYTE      023,006,000,"YOUR DEATH WILL DOOM",006
            BYTE      023,010,000,"YOUR PEOPLE.",006
            BYTE      006,006
            
LXT_EN8
            BYTE    "H"
            WORD   LXT_EN9-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    " WILL SCARLET:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " HI ROBIN, LOOKING FOR ACTION?",006
            BYTE    " GO TO ",006,006
            BYTE    006,006
            BYTE    022,004,007
LXT_EN9
            BYTE    "I"
            WORD   LXT_EN10-($+2)
            
            BYTE    022,000,000
            BYTE    020,RLE
            WORD   LX_TLAY_DAT
            BYTE    LDI,000,088,000,160,000,003
            BYTE    FIN
            BYTE    022,004,000
            BYTE    LSE,RLE
            WORD   LX_TUCK_DAT
            BYTE    FIN  
            
            BYTE    022,000,000
            BYTE    016,001
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    "  FRIAR TUCK:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " HI ROBIN, WHAT DO YOU NEED?",006
            BYTE    022,007,004
            BYTE    "HEALTH"
            BYTE    022,008,004
            BYTE    "POTION"
            BYTE    022,009,013
            BYTE    "80"
            
            BYTE    022,007,020
            BYTE    "REPLACE"
            BYTE    022,008,020
            BYTE    "PRACTICE"
            BYTE    022,009,029
            BYTE    "20"
            
            BYTE    022,011,004
            BYTE    "IMPROVE"
            BYTE    022,012,004
            BYTE    "BOW"
            BYTE    022,013,013
            BYTE    "30"
            
            BYTE    022,011,020
            BYTE    "IMPROVE"
            BYTE    022,012,020
            BYTE    "SWORD"
            BYTE    022,013,029
            BYTE    "30"
            
            BYTE    022,015,004
            BYTE    "DONE"
            
           
            BYTE    LSE
            BYTE    PAG,023
            BYTE    LDI,000,160,000,216,208,002
            BYTE    FIN
LXT_EN10

LXT_EN11
            BYTE    "K"
            WORD   LXT_EN12-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  DUNCAN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " MASTER ROBIN, IS THAT YOU?",006
            BYTE    006,006
            BYTE    " OH, PRAISE THY, I THOUGHT",006
            BYTE    " THAT GOD HAD ABANDONED US.",006
            BYTE    006,006
            BYTE    " I GIVE THY PART OF THE",006
            BYTE    " TREASURE OF THY FATHER",006
            BYTE    " I MANAGED TO RECOVER.",006
            BYTE    006,006
LXT_EN12
            BYTE    "L"
            WORD   LXT_EN13-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  DUNCAN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " MARIAN WAS KIDNAPPED",006
            BYTE    " BY THE SHERIFF.",006
            BYTE    006,006
            BYTE    " THOU MUST FIND A WAY TO ENTER",006
            BYTE    " NOTTINGHAM CASTLE.",006
            BYTE    006,006
LXT_EN13
            BYTE    "M"
            WORD   LXT_EN14-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    023,011,000
            BYTE    016,000
            BYTE    "GOOD JOB!",006
            BYTE    006,006
            BYTE    " YOU COMPLETED THE GAME BUT",006
            BYTE    " YOU MUST DEFEAT THE SHERIFF",006
            BYTE    " IN HARD MODE TO SEE THE REAL",006
            BYTE    " ENDING. GOOD LUCK!",006
            BYTE    006,006
LXT_EN14
            BYTE    "N"
            WORD   LXT_EN15-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    023,005,000
            BYTE    016,000
            BYTE    "HAIL, ROBIN OF LOXLEY!",006
            BYTE    006,006
            BYTE    " YOU DEFEATED THE SHERIFF OF",006
            BYTE    " NOTTINGHAM AND HIS ALLIES.",006
            BYTE    " YOUR BELOVED MARIAN AND YOUR",006
            BYTE    " PEOPLE ARE NOW SAFE.",006
            BYTE    006,006
LXT_EN15
            BYTE    "O"
            WORD   LXT_EN16-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  LITTLE JOHN:",006,006
            BYTE    016,000
            BYTE    006,006          
            BYTE    " THANK YOU, MATE. YOU SAVED US.",006
            BYTE    " BUT THE SHERIFF'S MEN TOOK",006
            BYTE    " THE SWINES, AND PEOPLE ARE",006
            BYTE    " STARVING.",006,006
            BYTE    006,006
            BYTE    " BRING US 1000 COINS SO WE CAN",006
            BYTE    " GET SOME FOOD, AND THEN WE",006
            BYTE    " SHALL BE ABLE TO HELP YOU.",006
            BYTE    006,006
            
LXT_EN16
            BYTE    "P"
            WORD   LXT_EN17-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  LITTLE JOHN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " THIS GOLD YOU BROUGHT SHALL",006
            BYTE    " BE SHARED WITH POORS, WHOSE",006
            BYTE    " SHALL BE ETERNALLY GRATEFUL.",006
            BYTE    006,006
            BYTE    " ALL RIGHT. WE'LL HELP YOU",006
            BYTE    " TO RESCUE MARIAN. YOU CAN GET",006
            BYTE    " INTO NOTTINGHAM CASTLE THROUGH",006
            BYTE    " THE CAVES. LET ME MARK THEM",006
            BYTE    " IN YOUR MAP.",006,006         
            BYTE    006,006
LXT_EN17
            BYTE    "Q"
            WORD   LXT_EN18-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  LITTLE JOHN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " GO TO THE CAVES.",006
            BYTE    " I MARKED THEM IN YOUR MAP.",006
            BYTE    006,006
LXT_EN18
            BYTE    "R"
            WORD   LXT_EN19-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  MORTIANNA:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " AHHH! YOU WON'T STOP US,",006
            BYTE    " PREPARE TO DIE!",006
            BYTE    006,006
LXT_EN19
            BYTE    "S"
            WORD   LXT_EN20-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  SHERIFF:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " DO YOU MIND, LOXLEY?",006
            BYTE    " WE'VE JUST BEEN MARRIED!",006
            BYTE    006,006
            
LXT_EN20
            BYTE    "T"
            WORD   LXT_EN21-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  SHERIFF:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " RECOGNISE THIS SWORD?",006
            BYTE    " IT BELONGED TO YOUR FATHER.",006
            BYTE    " APPROPRIATE, DON'T YOU THINK,",006
            BYTE    " THAT I NOW USE IT TO SEND YOU",006
            BYTE    " TO MEET HIM?",006,006
            BYTE    006,006
            
            
LXT_EN21            
            BYTE    "U"
            WORD   LXT_EN22-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  ROBIN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " I SHALL NEVER FEAR OF",006 
            BYTE    " MY FATHER'S SWORD",006
            BYTE    006,006
            BYTE    006,006
            BYTE    006,006
            BYTE    006,006
LXT_EN22
            BYTE    "V"
            WORD   LXT_EN23-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  GUARD:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " MOVE ON, THE GATE WILL BE",006
            BYTE    " CLOSED DURING SHERIFF'S",006
            BYTE    " WEDDING.",006,006
            BYTE    006,006
LXT_EN23
            BYTE    "W"
            WORD   LXT_EN24-($+2)
            BYTE    022,000,000
            BYTE    016,004

            BYTE    019,001
            BYTE    023,004,004
            BYTE    "2022 WORLD XXI SOFT INC.",006
LXT_EN24            
LXT_ENZ     
       
            BYTE     128
LXT_EN_END

LXT_EN_MAP1            
            BYTE    "A"
            WORD   LXT_EN_MAP2-($+2)
            BYTE    022,000,005
            BYTE    "TRAVEL TO..."
LXT_EN_MAP2      
            BYTE    "B"
            WORD   LXT_EN_MAP3-($+2)
            BYTE    "LOXLEY"
LXT_EN_MAP3      
            BYTE    "C"
            WORD   LXT_EN_MAP4-($+2)
            BYTE    "HATHERSAGE"
LXT_EN_MAP4      
            BYTE    "D"
            WORD   LXT_EN_MAP5-($+2)
            BYTE    "SHERWOOD"
LXT_EN_MAP5      
            BYTE    "E"
            WORD   LXT_EN_MAP6-($+2)
            BYTE    "CLIPSTONE"
LXT_EN_MAP6      
            BYTE    "F"
            WORD   LXT_EN_MAP7-($+2)
            BYTE    "MANSFIELD"
LXT_EN_MAP7      
            BYTE    "G"
            WORD   LXT_EN_MAP8-($+2)
            BYTE    "PAPPLEWICK"
LXT_EN_MAP8      
            BYTE    "H"
            WORD   LXT_EN_MAP9-($+2)
            BYTE    "WORKSOP"
LXT_EN_MAP9      
            BYTE    "I"
            WORD   LXT_EN_MAP10-($+2)
            BYTE    "RETFORD"
LXT_EN_MAP10      
            BYTE    "J"
            WORD   LXT_EN_MAP11-($+2)
            BYTE    "TUXFORD"
LXT_EN_MAP11
            BYTE    "K"
            WORD   LXT_EN_MAP12-($+2)
            BYTE    "NOTTINGHAM"
LXT_EN_MAP12
            BYTE    "L"
            WORD   LXT_EN_MAP13-($+2)
            BYTE    "CAVES",006
LXT_EN_MAP13
            BYTE    "M"
            WORD   LXT_EN_MAP14-($+2)
            BYTE    006
            
LXT_EN_MAP14


    
LXT_RS1          
            BYTE    "B"
            WORD   LXT_RS3-($+2)
            BYTE    016,007
            BYTE    022,006,000,006,013,013
            BYTE    006,013
            BYTE    006,013
            BYTE    "  1.h[r[mw c^kn",006,013
            BYTE    006,013
            BYTE    "  2.lfiahilmw",006,013
            BYTE    006,013
            BYTE    "  3.njk[]f`hc`",006,013
            BYTE    006,013
            BYTE    "  4.[]mikv",006,013
            BYTE    006,013
            BYTE    006,006
            
      
LXT_RS3
            BYTE    "C"
            WORD   LXT_RS4-($+2)
            BYTE    022,008,000
            BYTE    016,007
            BYTE    006,013,013
            BYTE    "1.ef[]c[mnk[",006,013,013
            BYTE    "2.lchef`k",006,013,013
            BYTE    "3.enklik",006,013,013
            BYTE    "4.e`gjlmih",006,013,013
            BYTE    "5.]v\\k[mw ef[]csc",006
            
LXT_RS4
            BYTE    "D"
            WORD   LXT_RS5-($+2)
            BYTE    022,006,000
            BYTE    016,007
            BYTE    124," ]f`]i",006,013,013
            BYTE    125," ]jk[]i",006,013,013
            BYTE    126," ]]`kp",006,013,013
            BYTE    127," ]hcb",006,013,013
            BYTE    "$ i^ihw",006,013,013
            BYTE    "% j[nb[",006,013,013
            BYTE    "X ]vdmc",006,006
             
LXT_RS5
            BYTE    "E"
            WORD   LXT_RS6-($+2)
            BYTE    016,007
            BYTE    022,010,000,006,013,013
            BYTE    "  1.hcbe[z",006,013,013
            BYTE    "  2.lk`_hzz",006,013,013
            BYTE    "  3.]vlie[z",006
LXT_RS6
            BYTE    "F"
            WORD   LXT_RS7-($+2)
            BYTE    022,008,000
            BYTE    016,007
            BYTE    023,005,005
            BYTE    "gnbve[",006,013
            BYTE    023,004,004
            BYTE    "* kcr[k_",006,013
            BYTE    " 'KULOR' [kgcpi",013
            BYTE    006,013
            BYTE    " knlle[z ]`klcz:",013
            BYTE    " gcp[cf ln_[ei]",013
            BYTE    023,004,004
            BYTE    "c g[kcz",006,013
            BYTE    " ek[s`hchhcei][",013
            BYTE    006,013
            BYTE    "  _cb[dh c ei_",013
            BYTE    " * [kcxfw kncl",006
            
            
LXT_RS7
            BYTE    "G"
            WORD   LXT_RS8-($+2)
            BYTE      016,000,017,006,019,000
            BYTE      022,010,000,006,006
            BYTE      023,005,005,"mv ng`k, pkclmc[hch...",006
            BYTE      "   m`j`kw m]ic fy_c i\\k`r`hv.",006
            BYTE      006,006
            
LXT_RS8
            BYTE    "H"
            WORD   LXT_RS9-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  ncff le[kf`mm:",006
            BYTE    016,000
            BYTE    006,006
            BYTE    " b_k[]lm]nd, ki\\ch, ct`sw r`g",006
            BYTE    " b[hzmwlz?",006,006
            BYTE    " imjk[]fzdlz ]",006,006
            BYTE    006,006
            BYTE    022,005,015
            
              
            
LXT_RS9
            BYTE    "I"
            WORD   LXT_RS10-($+2)
           
            BYTE    022,000,000
            BYTE    020,RLE
            WORD   LX_TLAY_DAT
            BYTE    LDI,000,088,000,160,000,003
            BYTE    FIN
            BYTE    022,004,000
            BYTE    LSE,RLE
            WORD   LX_TUCK_DAT
            BYTE    FIN  
            
            BYTE    022,000,000
            BYTE    016,001
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    "  \\k[m mne:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " b_k[]lm]nd, ki\\ch, rmi",006
            BYTE    " m`\\` hnahi?",006
            BYTE    022,007,004
            
            BYTE    "clq`fzyt``"
            BYTE    022,008,004
            BYTE    "b`fw`"
            BYTE    022,009,013
            BYTE    "80"
            
            BYTE    022,007,020
            BYTE    "jirchcmw"
            BYTE    022,008,020
            BYTE    "ch]`hm[kw"
            BYTE    022,009,029
            BYTE    "20"
            
            BYTE    022,011,004
            BYTE    "nfnrscmw"
            BYTE    022,012,004
            BYTE    "fne"
            BYTE    022,013,013
            BYTE    "30"
            
            BYTE    022,011,020
            BYTE    "nfnrscmw"
            BYTE    022,012,020
            BYTE    "g`r"
            BYTE    022,013,029
            BYTE    "30"
            
            BYTE    022,015,004
            BYTE    "^imi]i"
            
           
            BYTE    LSE
            BYTE    PAG,023
            BYTE    LDI,000,160,000,216,208,002
            BYTE    FIN
            
LXT_RS10
      
LXT_RS11
            BYTE    "K"
            WORD   LXT_RS12-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  _nhe[h:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " g[lm`k ki\\ch, ]v fc xmi?",006
            BYTE    006,006
            BYTE    " p][f[ h`\\`l[g, z na \\vfi",006
            BYTE    " k`scf, rmi ^ilji_w im]`khnflz",006
            BYTE    " im h[l.",006,006
            BYTE    006,006
            BYTE    " ]]`kzy ][g r[lmw _`h`^ ][s`^i",006
            BYTE    " imq[, eimikny z l\\`k{^.",006
            BYTE    006,006
LXT_RS12
            BYTE    "L"
            WORD   LXT_RS13-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  _nhe[h:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " s`kco jipcmcf g[kc[h.",006
            BYTE    " ]v _ifahv jki\\k[mwlz",006
            BYTE    " ] himmch^`glecd b[gie.",006
            BYTE    006,006

LXT_RS13
            BYTE    "M"
            WORD   LXT_RS14-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    023,010,000
            BYTE    016,000
            BYTE    "jk`]ilpi_hi!",006
            BYTE    006,006
            BYTE    " mv jkis{f c^kn, hi _[\\v",006
            BYTE    " n]c_`mw h[lmiztny eihqi]en,",006
            BYTE    " lf`_n`m i_if`mw s`kco[",006
            BYTE    " ] lfiahig k`acg`.",006
            BYTE    006,006
LXT_RS14
            BYTE    "N"
            WORD   LXT_RS15-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,000
            BYTE    " jkc]`mlm]ny, ki\\ch cb fielfc!",006
            BYTE    023,008,008,"mv i_if`f s`kco[",006
            BYTE    " himmch^`glei^i c `^i liybhcei]."
            BYTE    023,004,004,"imhvh` m]iz ]ibfy\\f`hh[z",006
            BYTE    023,007,007,"g[kc[h c m]ic fy_c",006
            BYTE    023,008,008,"] \\`bij[lhilmc.",006
            BYTE    006,006
LXT_RS15
            BYTE    "O"
            WORD   LXT_RS16-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  g[f`hwecd _aih:",006
            BYTE    016,000
            BYTE    006,006        
            BYTE    " lj[lc\\i m`\\`, _kn^. mv h[l",006
            BYTE    " lj[l. hi fy_c s`kco[ b[k`b[fc",006
            BYTE    " ]l`p l]ch`d c i\\k`efc h[ki_",006
            BYTE    " h[ ^ifi_.",006,006
            BYTE    006,006
            BYTE    " jkch`lc h[g 1000 gih`m, rmi\\v",006
            BYTE    " gv k[b_i\\vfc h`ghi^i `_v.",006
            BYTE    " c mi^_[ gv m`\\` jigia`g.",006
            BYTE    006,006
            
LXT_RS16
            BYTE    "P"
            WORD   LXT_RS17-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  g[f`hwecd _aih:",006
            BYTE    006,006
            BYTE    016,000
            BYTE    " bifimi, eimiki` mv jkch{l, gv",006
            BYTE    " k[b_`fcg l \\`_hze[gc.",006
            BYTE    " ihc \\n_nm \\f[^i_[khv m`\\`",006
            BYTE    " ji ^ki\\ acbhc.",006,006
            BYTE    006,006
            BYTE    " pikisi. gv jigia`g m`\\` lj[lmc",006
            BYTE    " g[kc[h. ] himmch^`glecd b[gie",006
            BYTE    " giahi jij[lmw r`k`b j`t`kv.",006
            BYTE    " jib]ifw z img`rn cp h[ m]i`d",006
            BYTE    " e[km`.",006,006
            BYTE    006,006
LXT_RS17
            BYTE    "Q"
            WORD   LXT_RS18-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  g[f`hwecd _aih:",006
            BYTE    006,006
            BYTE    016,000
            BYTE    " imjk[]fzdlz ] j`t`kv.",006
            BYTE    " z img`mcf cp h[ e[km`.",006
            BYTE    006,006
LXT_RS18
            BYTE    "R"
            WORD   LXT_RS19-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  gikmc[hh[:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " [[[! m`\\` h[l h` ilm[hi]cmw.",006
            BYTE    " jkc^imi]wlz ng`k`mw!",006
            BYTE    006,006
LXT_RS19
            BYTE    "S"
            WORD   LXT_RS20-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  s`kco:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " mv h` jkimc], fielfc?",006
            BYTE    " gv mifwei rmi i\\]`hr[fclw.",006
            BYTE    006,006
            
LXT_RS20
            BYTE    "T"
            WORD   LXT_RS21-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  s`kco:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " nbh[{sw xmim g`r?",006
            BYTE    " ih jkch[_f`a[f m]i`gn imqn",006
            BYTE    " c ir`hw ji_pi_cm _fz mi^i,",006
            BYTE    " rmi\\v z imjk[]cf m`\\z",006
            BYTE    " h[ ]lmk`rn l hcg.",006
            BYTE    006,006
            
            
LXT_RS21            
            BYTE    "U"
            WORD   LXT_RS22-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  ki\\ch:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " z h` \\iylw imqi]lei^i g`r[.",006 
            BYTE    006,006
            BYTE    006,006
            BYTE    006,006
            BYTE    006,006
            BYTE    006,006
LXT_RS22
            BYTE    "V"
            WORD   LXT_RS23-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  ipk[hhce:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " lmnj[d imly_[. ]ikim[ b[ekvmv",006
            BYTE    " h[ ]k`gz l][_w\\v s`kco[.",006
            BYTE    006,006
LXT_RS23
            BYTE    "W"
            WORD   LXT_RS24-($+2)
            BYTE    022,000,000
            BYTE    016,004

            BYTE    019,001
            BYTE    023,004,004
            BYTE    "2022 WORLD XXI SOFT INC.",006
LXT_RS24            
LXT_RSZ     
       
            BYTE     128
LXT_RS_END

LXT_RS_MAP1            
            BYTE    "A"
            WORD   LXT_RS_MAP2-($+2)
            BYTE    022,000,001
            BYTE    016,000
            BYTE    "imjk[]cmwlz ]..."
LXT_RS_MAP2      
            BYTE    "B"
            WORD   LXT_RS_MAP3-($+2)
            BYTE    "fielfc"
LXT_RS_MAP3      
            BYTE    "C"
            WORD   LXT_RS_MAP4-($+2)
            BYTE    "p[m`kl`d_a"
LXT_RS_MAP4      
            BYTE    "D"
            WORD   LXT_RS_MAP5-($+2)
            BYTE    "s`k]n_"
LXT_RS_MAP5      
            BYTE    "E"
            WORD   LXT_RS_MAP6-($+2)
            BYTE    "efcjlmih"
LXT_RS_MAP6      
            BYTE    "F"
            WORD   LXT_RS_MAP7-($+2)
            BYTE    "gxhlocf_"
LXT_RS_MAP7      
            BYTE    "G"
            WORD   LXT_RS_MAP8-($+2)
            BYTE    "j[jf]ce"
LXT_RS_MAP8      
            BYTE    "H"
            WORD   LXT_RS_MAP9-($+2)
            BYTE    "nikelij"
LXT_RS_MAP9      
            BYTE    "I"
            WORD   LXT_RS_MAP10-($+2)
            BYTE    "k`moik_"
LXT_RS_MAP10      
            BYTE    "J"
            WORD   LXT_RS_MAP11-($+2)
            BYTE    "m[eloik_"
LXT_RS_MAP11
            BYTE    "K"
            WORD   LXT_RS_MAP12-($+2)
            BYTE    "himmch^`g"
LXT_RS_MAP12
            BYTE    "L"
            WORD   LXT_RS_MAP13-($+2)
            BYTE    "j`t`kv",006
LXT_RS_MAP13
            BYTE    "M"
            WORD   LXT_RS_MAP14-($+2)
            BYTE    006
            
LXT_RS_MAP14

            
LXT_SWITCHWORD WORD LXT_SWITCH
LXT_SWITCH
            BYTE    "A"
            WORD   LXT_SW_ES-($+2)
            
            BYTE    LSE,LDI
            WORD   LXT_EN1,LX_PITEXT1,LXT_EN_END-LXT_EN1
            
            BYTE    LDI
            WORD   LXT_EN_MAP1,LXT_MAP_PLC,LXT_MAP_PLC_END-LXT_MAP_PLC
            
            BYTE    LDI
            WORD   LX_VARZONE,VARS
            BYTE    002,000
            
            BYTE    FIN
LXT_SW_ES
            BYTE    "B"
            WORD   LXT_SW_RS-($+2)
            
            BYTE    LSE,LDI
            WORD   LXT_ES1,LX_PITEXT1,LXT_ES_END-LXT_ES1
            
            BYTE    LDI
            WORD   LXT_ES_MAP1,LXT_MAP_PLC,LXT_MAP_PLC_END-LXT_MAP_PLC
            
            BYTE    LDI
            WORD   LX_VARZONE,VARS
            BYTE    002,000
            
            BYTE    FIN
          
LXT_SW_RS    
            BYTE    "C"
            WORD   LXT_SW_END-($+2)
            
            BYTE    LSE,LDI
            WORD   LXT_RS1,LX_PITEXT1,LXT_RS_END-LXT_RS1

            BYTE    LDI
            WORD   LXT_RS_MAP1,LXT_MAP_PLC,LXT_MAP_PLC_END-LXT_MAP_PLC
            
            BYTE    LDI
            WORD   LX_VARZONE,VARS
            BYTE    002,000
                      
            BYTE    FIN


LXT_SW_END           
            BYTE    128



   
LXT_DEPLOY_INI
            



LXT_ES12
            BYTE    "L"
            WORD   LXT_ES13-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  DUNCAN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " MARIAN FUE SECUESTRADA",006
            BYTE    " POR EL SHERIFF.",006
            BYTE    006,006
            BYTE    " VUESTRA MERCED DEBER& BUSCAR",006
            BYTE    " UNA FORMA DE ACCEDER AL ",006
            BYTE    " CASTILLO DE NOTTINGHAM.",006

            BYTE    006,006
            
LXT_ES13
            BYTE    "M"
            WORD   LXT_ES14-($+2)
            BYTE      022,000,000
            BYTE      016,000,017,006,019,000
            BYTE      006,006
            BYTE      023,010,000
            BYTE    "#BIEN HECHO!",006
            BYTE    006,006
            BYTE    " COMPLETASTE EL JUEGO PERO",006
            BYTE    " DEBES DERROTAR AL SHERIFF",006
            BYTE    " EN MODO DIF<CIL PARA VER EL",006
            BYTE    " FINAL REAL. #BUENA SUERTE!",006
            BYTE      006,006            
            
LXT_ES14
            BYTE    "N"
            WORD   LXT_ES15-($+2)
            BYTE      022,000,000
            BYTE      016,000,017,006,019,000
            BYTE      006,006
            BYTE      023,004,000
            BYTE      "#SALUD, ROBIN DE LOXLEY!",006
            BYTE      006,006
            BYTE      " VENCISTE AL SHERIFF DE",006
            BYTE      " NOTTINGHAM Y SUS ALIADOS.",006
            BYTE      " TU AMADA MARIAN Y TU PUEBLO",006
            BYTE      " ESTAR&N A SALVO.",006
            BYTE      006,006
LXT_ES15
            BYTE    "O"
            WORD   LXT_ES16-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  PEQUEO JUAN:",006,006
            BYTE    016,000
            BYTE    006,006
            BYTE    " GRACIAS, AMIGO. NOS SALVASTE.",006
            BYTE    " PERO LOS SOLDADOS DEL SHERIFF",006
            BYTE    " SE LLEVARON LOS CERDOS, Y LA",006
            BYTE    " GENTE SE MUERE DE HAMBRE.",006
            BYTE    006,006
            BYTE    " TR&ENOS 1000 MONEDAS DE ORO",006
            BYTE    " PARA PODER ALIMENTARNOS, Y",006
            BYTE    " ENTONCES PODREMOS AYUDARTE.",006
            BYTE    006,006
            
          
LXT_ES16
            BYTE    "P"
            WORD   LXT_ES17-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  PEQUEO JUAN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " ESTE ORO QUE ME ENTREGAS SER&",006
            BYTE    " REPARTIDO ENTRE LOS POBRES,",006
            BYTE    " QUIENES ESTAR&N ETERNAMENTE",006
            BYTE    " AGRADECIDOS.",006,006
            BYTE    006,006
            BYTE    " DE ACUERDO. TE AYUDAREMOS A",006
            BYTE    " RESCATAR A MARIAN. PUEDES",006
            BYTE    " ENTRAR AL CASTILLO DE",006
            BYTE    " NOTTINGHAM A TRAV(S DE LAS",006
            BYTE    " CAVERNAS. D(JAME MARCARLAS",006
            BYTE    " EN TU MAPA.",006,006
            BYTE    006,006
LXT_ES17
            BYTE    "Q"
            WORD   LXT_ES18-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  PEQUEO JUAN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " VE A LAS CAVERNAS.",006
            BYTE    " YA LAS MARQU( EN TU MAPA.",006
            BYTE    006,006
LXT_ES18
            BYTE    "R"
            WORD   LXT_ES19-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  MORTIANNA:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " #AHHH! #NO PODR&S DETENERNOS,",006
            BYTE    " PREP&RATE PARA MORIR!",006
            BYTE    006,006
LXT_ES19                       
            BYTE    "S"
            WORD   LXT_ES20-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  SHERIFF:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " )TE IMPORTAR<A, LOXLEY?",006
            BYTE    " #ACABAMOS DE CASARNOS!",006
            BYTE    006,006
            
LXT_ES20
            BYTE    "T"
            WORD   LXT_ES21-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  SHERIFF:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " )RECONOCES ESTA ESPADA?",006
            BYTE    " ERA DE TU PADRE.",006
            BYTE    " QU( APROPIADO, )NO CREES?",006
            BYTE    " LA USAR( PARA ENVIARTE JUNTO",006
            BYTE    " A (L.",006,006
            BYTE    006,006
            
            
LXT_ES21            
            BYTE    "U"
            WORD   LXT_ES22-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  ROBIN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " NUNCA TEMER( LA ESPADA DE",006 
            BYTE    " MI PADRE.",006,006
            BYTE    006,006
            BYTE    006,006
            BYTE    006,006
            BYTE    006,006
LXT_ES22
            BYTE    "V"
            WORD   LXT_ES23-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,002
            BYTE    "  GUARDIA:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " RET<RESE. LA PUERTA ESTAR&",006
            BYTE    " CEDA DURANTE LA BODA DEL",006
            BYTE    " SHERIFF.",006,006
            BYTE    006,006
LXT_ES23


            BYTE    "W"
            WORD   LXT_ES24-($+2)
            BYTE    022,000,000
            BYTE    016,004
            BYTE    019,001
            BYTE    023,004,004
            BYTE    "2022 WORLD XXI SOFT INC.",006
LXT_ES24            
LXT_ESZ     
       
            BYTE    128

LXT_ES_END
            ENT
LXT_DEPLOY_END
LXT_DEPLOY_LNG = LXT_DEPLOY_END-LXT_DEPLOY_INI
            

          
            
            ESPACIOS  256

$DB00


LX_FNTL     ARCHIVO "ARTE/LXFONT.BIN" < JUEGO DE CARACTERES
LX_FNTLB    = LX_FNTL-256
             $C300
LX_CURRLANG WORD  LX_PITEXT1         
LX_CURRLANGL = LX_CURRLANG
LX_CURRLANGH = LX_CURRLANG+1

              INDICACIONES AZEEM
            WORD   LX_IAZEE_EN1
            WORD   LX_IAZEE_ES1
            WORD   LX_IAZEE_RS1 
            
             GRAFICOS ADICIONALES
            WORD   LX_GRFAD
            WORD   0000 LX_MRK_FNT-256     
            WORD   0000 LX_MAP_FNT-256     
       
            WORD   0000LXT_EN_MAP1
            WORD   0000 LXT_MAP_PLC
            WORD   0000 LXT_MAP_PLC        
            WORD   0000 LXT_MAP_PLC        
LX_FNTLW    WORD   LX_FNTL-256
            
    
            

LX_GRFAWORD   WORD   LX_GRFAWORD+2
LX_GRFAD     GRAFICOS ADICIONALES
LX_GRFAL    = LX_GRFAD MOD 256
LX_GRFAH    = LX_GRFAD / 256



LXT_MRK     
            BYTE    "A"
            WORD   LXT_TITULO-($+2)
            BYTE    022,020,000
            BYTE    020,RLE
            WORD   LX_MRK_DAT
            BYTE    FIN
            
LXT_TITULO
            BYTE    "B"
            WORD   LXT_END-($+2)
            BYTE    022,000,000
            BYTE    020,RLE
            WORD   LX_MENU_DAT
            BYTE    FIN
LXT_END
           
LXT_MAP     BYTE    "M"
            WORD   LXT_MPEND-($+2)
            
            BYTE    022,000,000
            BYTE    020,RLE
            WORD   LX_MLAY_DAT
            
            BYTE    LDI,000,088,000,160,000,003
            
            BYTE    LOC,000,019
            BYTE    RLE 
            WORD   LX_MAP_DAT
            BYTE    PAG,023
            BYTE    LDI,000,160,000,216,208,002
            
            BYTE    FIN  
LXT_MPEND
            BYTE    "N"
            WORD   LXT_CVTXTE-($+2)
            BYTE    022,017,013
            BYTE    020,RLE
            WORD   LX_CUEVA_DAT
            BYTE    LDI: WORD CAVESLAYERD,CAVESLAYER,0002
            BYTE    FIN
LXT_CVTXTE
   
            BYTE    128

LX_MRK_DAT  WORD   LX_MRK_FNT   : ARCHIVO "ARTE/LX_MRK.DAT"
LX_MENU_DAT WORD   LX_MRK_FNT   : ARCHIVO "ARTE/LX_MENU.DAT"
LX_MAP_DAT  WORD   LX_MRK_FNT   : ARCHIVO "ARTE/LX_MAP.DAT" 
LX_MLAY_DAT WORD   LX_MAP_LAYER : ARCHIVO "ARTE/LX_MAP_LAYER.DAT"          
LX_CUEVA_DAT WORD   LX_CUEVA    : BYTE  002,003,000,000
LX_TUCK_DAT  WORD   LX_MRK_FNT  : ARCHIVO "ARTE/LX_TUCK.DAT"

LX_MRK_FNT  = $-1 
            ARCHIVO "ARTE/LX_MRKMENU.FNT"
LX_MRK_BARSXW WORD LX_MRK_BARSX 
            
LX_MRK_BARSPW WORD LX_MRK_BARSP 
LX_MRK_BARSX = $-128-256
LX_MRK_BARSP = $-128+64-256
            ARCHIVO "ARTE/LX_MRK_BARS.BIN"
LX_CUEVA    = $-1 
            ARCHIVO "ARTE/LX_CUEVA.FNT"
LX_MAP_LAYER = $-1 
            ARCHIVO "ARTE/LX_MAP_LAYER.FNT"            
CAVESLAYER  = 49152+6144+32*17+13
CAVESLAYERD WORD  $0A0A
LX_TLAY_DAT WORD   LX_MAP_LAYER : ARCHIVO "ARTE/LX_TUCK_LAYER.DAT"




LX_CTDFLT   
            BYTE     "OPQA?"
            BYTE     "67980"
            BYTE     "58760"
            BYTE     ":<=>"


LX_KEYB     
            BYTE     $EF
            BYTE     $F7
            BYTE     $F7
            BYTE     $F7
            BYTE     $F7
            BYTE     $F7
            BYTE     $EF
            BYTE     $EF
            BYTE     $EF
            BYTE     $EF
            BYTE     $00
            BYTE     $00
            BYTE     $00
            BYTE     $00
            BYTE     $00
            BYTE     $7F
            BYTE     $BF
            BYTE     $FD
            BYTE     $7F
            BYTE     $FE
            BYTE     $FD
            BYTE     $FB
            BYTE     $FD
            BYTE     $FD
            BYTE     $BF
            BYTE     $DF
            BYTE     $BF
            BYTE     $BF
            BYTE     $BF
            BYTE     $7F
            BYTE     $7F
            BYTE     $DF
            BYTE     $DF
            BYTE     $FB
            BYTE     $FB
            BYTE     $FD
            BYTE     $FB
            BYTE     $DF
            BYTE     $FE
            BYTE     $FB
            BYTE     $FE
            BYTE     $DF
            BYTE     $FE
LX_KEYBM          
            BYTE     %00000001
            BYTE     %00000001
            BYTE     %00000010
            BYTE     %00000100
            BYTE     %00001000
            BYTE     %00010000
            BYTE     %00010000
            BYTE     %00001000
            BYTE     %00000100
            BYTE     %00000010
            BYTE     %00000010
            BYTE     %00000001
            BYTE     %00001000
            BYTE     %00000100
            BYTE     %00010000
            BYTE     %00000001
            BYTE     %00000001
            BYTE     %00000001
            BYTE     %00010000
            BYTE     %00001000
            BYTE     %00000100
            BYTE     %00000100
            BYTE     %00001000
            BYTE     %00010000
            BYTE     %00010000
            BYTE     %00000100
            BYTE     %00001000
            BYTE     %00000100
            BYTE     %00000010
            BYTE     %00000100
            BYTE     %00001000
            BYTE     %00000010
            BYTE     %00000001
            BYTE     %00000001
            BYTE     %00001000
            BYTE     %00000010
            BYTE     %00010000
            BYTE     %00001000
            BYTE     %00010000
            BYTE     %00000010
            BYTE     %00000100
            BYTE     %00010000
            BYTE     %00000010               

MSTK_CTRL_P7              
             
            WORD   $1A45  
            WORD   23621 
            WORD   MSTK_JMP
            WORD   $16F9 
            
            WORD   $0554  
            WORD   $0000
            WORD   $0308 
            

            WORD   $2FDA 
LX_CPA_PRT  WORD   $BF00 
            WORD   $0100 
            WORD   $1F5C 
            WORD   $1758 
            WORD   $10A6  
            WORD   MS_CTRL_PA
            WORD   $0C84  
            WORD   $10A6  
            WORD   LX_PAUSA
            WORD   $102E  
            
             
            WORD   $2FDA 
LX_CQU_PRT  WORD   $FB00
            WORD   $0100
            WORD   $1F5C
            WORD   $1758
            WORD   $10A6  
            WORD   MS_CTRL_QU
            WORD   $0C84  
            WORD   $10A6  
            WORD   LX_QUIT
            WORD   $102E  

            WORD   $10A6 
            WORD   LX_KEMPSTON
LX_KEMPSWI  WORD   $1030 
            
            WORD   $2FDA 
LX_CIZ_PRT  WORD   $DF00 
            WORD   $0100 
            WORD   $1F5C 
            WORD   $1758 
            WORD   $10A6  
            WORD   MS_CTRL_IZ 
            WORD   $027F  
            WORD   $0C84  
            WORD   $10A6  
            WORD   MSTK_AIZ
            WORD   $102E  
            WORD   $1E92  
            WORD   $0200
MSTK_AIZ    WORD   $10A6  
            WORD   CTRL_READ
            WORD   $0D69
            
             
            WORD   $2FDA 
LX_CDE_PRT  WORD   $DF00
            WORD   $0100
            WORD   $1F5C
            WORD   $1758
            WORD   $10A6  
            WORD   MS_CTRL_DE
            WORD   $027F  
            WORD   $0C84  
            WORD   $10A6  
            WORD   MSTK_ADE
            WORD   $102E  
            WORD   $1E92  
            WORD   $0100$0800
MSTK_ADE    WORD   $10A6  
            WORD   CTRL_READ
            WORD   $0D68 
            
            WORD   $2FDA 
LX_CAR_PRT  WORD   $FB00
            WORD   $0100
            WORD   $1F5C
            WORD   $1758
            WORD   $10A6  
            WORD   MS_CTRL_AR
            WORD   $027F 
            WORD   $0C84  
            WORD   $10A6  
            WORD   MSTK_AAR
            WORD   $102E 
            WORD   $1E92  
            WORD   $0800 
MSTK_AAR    WORD   $10A6  
            WORD   CTRL_READ
            WORD   $0D68 
            
             
            WORD   $2FDA 
LX_CAB_PRT  WORD   $FD00
            WORD   $0100
            WORD   $1F5C
            WORD   $1758
            WORD   $10A6  
            WORD   MS_CTRL_AB
            WORD   $027F 
            WORD   $0C84  
            WORD   $10A6  
            WORD   MSTK_AAB
            WORD   $102E 
            WORD   $1E92  
            WORD   $0400 
MSTK_AAB    WORD   $10A6  
            WORD   CTRL_READ
            WORD   $0D68 
            
            WORD   $2FDA 
LX_CFG_PRT  WORD   $7F00 
            WORD   $0100 
            WORD   $1F5C 
            WORD   $1758 
            WORD   $10A6  
            WORD   MS_CTRL_FG 
            WORD   $027F 
            WORD   $0C84  
            WORD   $10A6  
            WORD   MSTK_AFG
            WORD   $102E 
            WORD   $1E92  
            WORD   $1000
MSTK_KEMP          
MSTK_AFG    WORD   $10A6  
            WORD   CTRL_READ
            WORD   $0D68
    
            WORD   $10A6,TABTECJMP
            WORD   $340A
            WORD   $007B 
            
          
            WORD   $1A45 
MSTK_JMP    WORD   $0000
            WORD   $0000
            
            WORD   $340A

            
            WORD   $1E73
           
            WORD   $2FDA 
            WORD   $0300
            WORD   CTRL_READ
            WORD   $0C84  
            WORD   $2BEF
            WORD   $0D69  
            
MSTK_EXIT            
            WORD   $10A6 
            WORD   SET_STACK-14 
            WORD   $102F 

LX_PAUSA            
            
            WORD   $10A6   
            WORD   PPC
            WORD   $2AF0 
            WORD   $10A6   
            WORD   60
            WORD   $168C  
            WORD   $10A6  
            WORD   EPPC
            WORD   $0A83 
            
            WORD   $35C7  
            WORD   $0000
            WORD   $10A6   
            WORD   RASP
            WORD   $0A83 
            
            WORD   $10A6   
            WORD   9900  
           
            WORD   $1E73 
            
            WORD   $10A6  
            WORD   SET_STACK-14
            WORD   $102F  

            
LX_QUIT            
            WORD   $10A6  
            WORD   8620  
            WORD   $35C7 
            WORD   $0000
            WORD   $1E73 
            WORD   $10A6 
            WORD   SET_STACK-14
            WORD   $102F 

LX_KEMPSTON
            
            
            
            WORD   $0CF6  
            WORD   $001F 
            WORD   $0296 
            WORD   $05DF 
            WORD   $027F 
            WORD   $10A6,$029A
            WORD   $0C84               
            WORD   $10A6 
            WORD   MSTK_KEMP
            WORD   $102F 

             
ROOMPAG     = $-1       
            BYTE   027,028,027,027,027,027,027,027  8 SHERWOOD 
            BYTE   027,027,027,027,025              5 LOXLEY   
            BYTE   028,027,027,027                  4 HATHERSAGE 
            BYTE   028,028,028,028,028,028,028      7 CLIPSTONE
            BYTE   028,028,028,028,028,028,028      7 MANSFIELD
            BYTE   028,028,028,028,028,028,028      7 PAPPLEWICK
            BYTE   027,027,028,028,028              5 WORKSOP
            BYTE   027,027,027,027,027              5 RETFORD
            BYTE   028,028,028,027,027              5 TUXFORD
            BYTE   025,027                         10 NOTTINGHAM         
            BYTE   028,028,028,028,027,027,027,025 
            BYTE   025                              1 CHAPEL
            
ROOMADDL    = $-1
            
			
			BYTE    LX_SCD_R01 MOD 256 
            BYTE    LX_SCD_R02 MOD 256 
            BYTE    LX_SCD_R03 MOD 256 
            BYTE    LX_SCD_R04 MOD 256 
            BYTE    LX_SCD_R05 MOD 256 
            BYTE    LX_SCD_R06 MOD 256 
            BYTE    LX_SCD_R07 MOD 256 
            BYTE    LX_SCD_R08 MOD 256 
            BYTE    LX_SCD_R09 MOD 256 
            BYTE    LX_SCD_R10 MOD 256 
            BYTE    LX_SCD_R11 MOD 256 
            BYTE    LX_SCD_R12 MOD 256 
            BYTE    LX_SCD_R13 MOD 256 
            BYTE    LX_SCD_R14 MOD 256 
            BYTE    LX_SCD_R15 MOD 256 
            BYTE    LX_SCD_R16 MOD 256 
            BYTE    LX_SCD_R17 MOD 256 
            BYTE    LX_SCD_R18 MOD 256 
            BYTE    LX_SCD_R19 MOD 256 
            BYTE    LX_SCD_R20 MOD 256 
            BYTE    LX_SCD_R21 MOD 256 
            BYTE    LX_SCD_R22 MOD 256 
            BYTE    LX_SCD_R23 MOD 256
            BYTE    LX_SCD_R24 MOD 256
            BYTE    LX_SCD_R25 MOD 256
            BYTE    LX_SCD_R26 MOD 256
            BYTE    LX_SCD_R27 MOD 256
            BYTE    LX_SCD_R28 MOD 256
            BYTE    LX_SCD_R29 MOD 256
            BYTE    LX_SCD_R30 MOD 256
            BYTE    LX_SCD_R31 MOD 256
            BYTE    LX_SCD_R32 MOD 256
            BYTE    LX_SCD_R33 MOD 256
            BYTE    LX_SCD_R34 MOD 256
            BYTE    LX_SCD_R35 MOD 256
            BYTE    LX_SCD_R36 MOD 256
            BYTE    LX_SCD_R37 MOD 256
            BYTE    LX_SCD_R38 MOD 256
            BYTE    LX_SCD_R39 MOD 256
            BYTE    LX_SCD_R40 MOD 256
            BYTE    LX_SCD_R41 MOD 256
            BYTE    LX_SCD_R42 MOD 256
            BYTE    LX_SCD_R43 MOD 256
            BYTE    LX_SCD_R44 MOD 256
            BYTE    LX_SCD_R45 MOD 256
            BYTE    LX_SCD_R46 MOD 256
            BYTE    LX_SCD_R47 MOD 256
            BYTE    LX_SCD_R48 MOD 256
            BYTE    LX_SCD_R49 MOD 256
            BYTE    LX_SCD_R50 MOD 256
            BYTE    LX_SCD_R51 MOD 256
            BYTE    LX_SCD_R52 MOD 256
            BYTE    LX_SCD_R53 MOD 256
            BYTE    LX_SCD_R54 MOD 256
            BYTE    LX_SCD_R55 MOD 256
            BYTE    LX_SCD_R56 MOD 256
            BYTE    LX_SCD_R57 MOD 256
            BYTE    LX_SCD_R58 MOD 256
            BYTE    LX_SCD_R59 MOD 256
            BYTE    LX_SCD_R60 MOD 256
            BYTE    LX_SCD_R61 MOD 256
            BYTE    LX_SCD_R62 MOD 256
            BYTE    LX_SCD_R63 MOD 256
            BYTE    LX_SCD_R64 MOD 256


ROOMADDH    = $-1  
            BYTE    LX_SCD_R01 / 256
            BYTE    LX_SCD_R02 / 256
            BYTE    LX_SCD_R03 / 256
            BYTE    LX_SCD_R04 / 256
            BYTE    LX_SCD_R05 / 256
            BYTE    LX_SCD_R06 / 256
            BYTE    LX_SCD_R07 / 256
            BYTE    LX_SCD_R08 / 256
            BYTE    LX_SCD_R09 / 256
            BYTE    LX_SCD_R10 / 256
            BYTE    LX_SCD_R11 / 256
            BYTE    LX_SCD_R12 / 256
            BYTE    LX_SCD_R13 / 256
            BYTE    LX_SCD_R14 / 256
            BYTE    LX_SCD_R15 / 256
            BYTE    LX_SCD_R16 / 256
            BYTE    LX_SCD_R17 / 256
            BYTE    LX_SCD_R18 / 256
            BYTE    LX_SCD_R19 / 256
            BYTE    LX_SCD_R20 / 256
            BYTE    LX_SCD_R21 / 256
            BYTE    LX_SCD_R22 / 256
            BYTE    LX_SCD_R23 / 256
            BYTE    LX_SCD_R24 / 256
            BYTE    LX_SCD_R25 / 256
            BYTE    LX_SCD_R26 / 256
            BYTE    LX_SCD_R27 / 256
            BYTE    LX_SCD_R28 / 256
            BYTE    LX_SCD_R29 / 256
            BYTE    LX_SCD_R30 / 256
            BYTE    LX_SCD_R31 / 256
            BYTE    LX_SCD_R32 / 256
            BYTE    LX_SCD_R33 / 256
            BYTE    LX_SCD_R34 / 256
            BYTE    LX_SCD_R35 / 256
            BYTE    LX_SCD_R36 / 256
            BYTE    LX_SCD_R37 / 256
            BYTE    LX_SCD_R38 / 256
            BYTE    LX_SCD_R39 / 256
            BYTE    LX_SCD_R40 / 256
            BYTE    LX_SCD_R41 / 256
            BYTE    LX_SCD_R42 / 256
            BYTE    LX_SCD_R43 / 256
            BYTE    LX_SCD_R44 / 256
            BYTE    LX_SCD_R45 / 256
            BYTE    LX_SCD_R46 / 256
            BYTE    LX_SCD_R47 / 256
            BYTE    LX_SCD_R48 / 256
            BYTE    LX_SCD_R49 / 256
            BYTE    LX_SCD_R50 / 256
            BYTE    LX_SCD_R51 / 256
            BYTE    LX_SCD_R52 / 256
            BYTE    LX_SCD_R53 / 256
            BYTE    LX_SCD_R54 / 256
            BYTE    LX_SCD_R55 / 256
            BYTE    LX_SCD_R56 / 256
            BYTE    LX_SCD_R57 / 256
            BYTE    LX_SCD_R58 / 256
            BYTE    LX_SCD_R59 / 256
            BYTE    LX_SCD_R60 / 256
            BYTE    LX_SCD_R61 / 256
            BYTE    LX_SCD_R62 / 256
            BYTE    LX_SCD_R63 / 256
            BYTE    LX_SCD_R64 / 256


            
            
            
           
ROOMIZQ     = $-1     
            BYTE  000,000,001,003,004,005,006,007  8 SHERWOOD 
            BYTE  000,009,010,011,012              5 LOXLEY   
            BYTE  000,000,015,016                  4 HATHERSAGE 
            BYTE  000,018,019,$FF,$FF,022,$FF      7 CLIPSTONE
            BYTE  $FF,025,$FF,027,$FF,029,030      7 MANSFIELD
            BYTE  $FF,032,033,$FF,$FF,036,037      7 PAPPLEWICK
            BYTE  000,039,$FF,041,042              5 WORKSOP
            BYTE  $FF,044,045,046,047              5 RETFORD
            BYTE  $FF,049,$FF,$FF,052              5 TUXFORD
            BYTE  000,000                         11 NOTTINGHAM         
            BYTE  $FF,056,057,058,$FF,060,061,062 
 
           
ROOMDER     = $-1    
            BYTE  003,$FF,004,005,006,007,008,$FF  8 SHERWOOD 
            BYTE  010,011,012,013,000              5 LOXLEY   
            BYTE  $FF,016,017,000                  4 HATHERSAGE 
            BYTE  019,020,$FF,$FF,023,$FF,$FF      7 CLIPSTONE
            BYTE  026,$FF,028,$FF,030,031,000      7 MANSFIELD
            BYTE  033,034,$FF,$FF,037,038,000      7 PAPPLEWICK
            BYTE  040,$FF,042,043,$FF              5 WORKSOP
            BYTE  045,046,047,048,000              5 RETFORD
            BYTE  050,$FF,$FF,053,000              5 TUXFORD
            BYTE  000,$FF                         11 NOTTINGHAM         
            BYTE  057,058,059,$FF,061,062,063,000 

ROOMWARP    = $-1   WARP DOORS
            BYTE  002,001,000,000,000,000,000,000  8 SHERWOOD 
            BYTE  000,000,000,000,000              5 LOXLEY   
            BYTE  015,014,000,000                  4 HATHERSAGE 
            BYTE  021,022,024,018,019,000,020      7 CLIPSTONE
            BYTE  000,029,000,031,026,000,028      7 MANSFIELD
            BYTE  000,036,000,038,033,000,035      7 PAPPLEWICK
            BYTE  000,043,000,000,040              5 WORKSOP
            BYTE  000,000,000,000,000              5 RETFORD
            BYTE  000,052,053,050,051              5 TUXFORD
            BYTE  000,056                         11 NOTTINGHAM 
            BYTE  055,000,000,060,059,000,000,000 
            
ROOMWARPDP  = $-1  WARP DOOR POSITION      
            BYTE  010,010,100,100,100,100,100,100  8 SHERWOOD 
            BYTE  100,100,100,100,100              5 LOXLEY   
            BYTE  008,008,100,100                  4 HATHERSAGE 
            BYTE  011,014,023,011,014,000,023      7 CLIPSTONE
            BYTE  000,016,000,006,016,000,006      7 MANSFIELD
            BYTE  000,014,000,010,014,000,010      7 PAPPLEWICK
            BYTE  000,024,000,000,024              5 WORKSOP
            BYTE  000,000,000,000,000              5 RETFORD
            BYTE  000,013,014,013,014              5 TUXFORD
            BYTE  000,014                         11 NOTTINGHAM 
            BYTE  014,000,000,026,025,000,000,000              
ROOMHORSE            
             SPAWN HORSE
            BYTE  022,022,006,006,022,022,006,022,022,006,006
ROOMMAP           
             MAP DESTINATIONS
            BYTE  013,017,001,018,031,038,039,048,053,054,055



ROOMNTSIZ   = $-56
            BYTE  001,001,006,001,001,001,001,015,013
ROOMNTSDE   = $-56         
            BYTE  015,015,015,015,015,015,015,001,013

LX_LOOKUPTOWN = $-7

            BYTE   002                             SHERWOOD   
            BYTE   000,000,000,000,000             LOXLEY
            BYTE   001,001,001,001                 HATHERSAGE
            BYTE   003,003,003,003,003,003,003    CLIPSTONE
            BYTE   004,004,004,004,004,004,004    MANSFIELD
            BYTE   005,005,005,005,005,005,005    PAPPELWICK
            BYTE   006,006,006,006,006            WORKSOP
            BYTE   007,007,007,007,007            RETFORD
            BYTE   008,008,008,008,008            TUXFORD

FSTVARSRST       
            BYTE    000,000,100,000,000
            BYTE    000,000,100,000,000
            BYTE    000,000,100,000,000
            BYTE    000,000,100,000,000
            BYTE    000,000,100,000,000

            BYTE    'O'+$80-64
            WORD   FVRE-FVRI
FVRI
            BYTE    001,005,000
            
            BYTE    000,000,$00,$00,000
            BYTE    000,000,$00,$00,000
            BYTE    000,000,$00,$00,000            
            BYTE    000,000,$00,$00,000
            BYTE    000,000,$00,$00,000
FVRE

TESORO      = $-512
            ARCHIVO "ARTE/LX_TESORO.BIN"       < GRAFICO COFRE
            
WSCARLET    = $-512
            ARCHIVO "ARTE/LX_WILLSCARLET.BIN"    < GRAFICO WILL SCARLET
      
LX_WSCARLETF WORD WSCARLET
            
            
CODIGO COMPORTAMIENTO
000 - NINGUNO / MUERTO / DESACTIVADO
001 - TESORO
002 - TARGET
003 - VAIVEN
004 - 
005 - ARQUERO
006 - MORTIANNA
007 - KNIGHT / SHERIFF
008 - CABALLO
009 - RATA
010 - WASP
192 - PUERTA ABIERTA
255 - FIN  

ESTRUCTURA
CODIGO COMPORTAMIENTO, L, C, SPECIAL

TABLA OBJETOS

TABOBJ      = $-1
            BYTE     LX_TO_SCR01 MOD 256
            BYTE     LX_TO_SCR02 MOD 256
            BYTE     LX_TO_SCR03 MOD 256
            BYTE     LX_TO_SCR04 MOD 256
            BYTE     LX_TO_SCR05 MOD 256
            
            BYTE     LX_TO_SCR06 MOD 256
            BYTE     LX_TO_SCR07 MOD 256
            BYTE     LX_TO_SCR08 MOD 256
            BYTE     LX_TO_SCR09 MOD 256
            BYTE     LX_TO_SCR10 MOD 256
            
            BYTE     LX_TO_SCR11 MOD 256
            BYTE     LX_TO_SCR12 MOD 256
            BYTE     LX_TO_SCR13 MOD 256
            BYTE     LX_TO_SCR14 MOD 256
            BYTE     LX_TO_SCR15 MOD 256
            
            BYTE     LX_TO_SCR16 MOD 256
            BYTE     LX_TO_SCR17 MOD 256
            BYTE     LX_TO_SCR18 MOD 256
            BYTE     LX_TO_SCR19 MOD 256
            BYTE     LX_TO_SCR20 MOD 256
            
            BYTE     LX_TO_SCR21 MOD 256
            BYTE     LX_TO_SCR22 MOD 256
            BYTE     LX_TO_SCR23 MOD 256
            BYTE     LX_TO_SCR24 MOD 256
            BYTE     LX_TO_SCR25 MOD 256
            
            BYTE     LX_TO_SCR26 MOD 256
            BYTE     LX_TO_SCR27 MOD 256
            BYTE     LX_TO_SCR28 MOD 256
            BYTE     LX_TO_SCR29 MOD 256
            BYTE     LX_TO_SCR30 MOD 256
            
            BYTE     LX_TO_SCR31 MOD 256
            BYTE     LX_TO_SCR32 MOD 256
            BYTE     LX_TO_SCR33 MOD 256
            BYTE     LX_TO_SCR34 MOD 256
            BYTE     LX_TO_SCR35 MOD 256
           
            BYTE     LX_TO_SCR36 MOD 256
            BYTE     LX_TO_SCR37 MOD 256
            BYTE     LX_TO_SCR38 MOD 256
            BYTE     LX_TO_SCR39 MOD 256
            BYTE     LX_TO_SCR40 MOD 256
             
            BYTE     LX_TO_SCR41 MOD 256
            BYTE     LX_TO_SCR42 MOD 256
            BYTE     LX_TO_SCR43 MOD 256
            BYTE     LX_TO_SCR44 MOD 256
            BYTE     LX_TO_SCR45 MOD 256
            
            BYTE     LX_TO_SCR46 MOD 256
            BYTE     LX_TO_SCR47 MOD 256
            BYTE     LX_TO_SCR48 MOD 256
            BYTE     LX_TO_SCR49 MOD 256
            BYTE     LX_TO_SCR50 MOD 256
            
            BYTE     LX_TO_SCR51 MOD 256
            BYTE     LX_TO_SCR52 MOD 256
            BYTE     LX_TO_SCR53 MOD 256
            BYTE     LX_TO_SCR54 MOD 256
            BYTE     LX_TO_SCR55 MOD 256
           
            BYTE     LX_TO_SCR56 MOD 256
            BYTE     LX_TO_SCR57 MOD 256
            BYTE     LX_TO_SCR58 MOD 256
            BYTE     LX_TO_SCR59 MOD 256
            BYTE     LX_TO_SCR60 MOD 256

            BYTE     LX_TO_SCR61 MOD 256
            BYTE     LX_TO_SCR62 MOD 256
            BYTE     LX_TO_SCR63 MOD 256
            BYTE     LX_TO_SCR64 MOD 256
            
TABOBJH     =   $-1
            BYTE     LX_TO_SCR01 /256
            BYTE     LX_TO_SCR02 /256
            BYTE     LX_TO_SCR03 /256
            BYTE     LX_TO_SCR04 /256
            BYTE     LX_TO_SCR05 /256
            
            BYTE     LX_TO_SCR06 /256
            BYTE     LX_TO_SCR07 /256
            BYTE     LX_TO_SCR08 /256
            BYTE     LX_TO_SCR09 /256
            BYTE     LX_TO_SCR10 /256
            
            BYTE     LX_TO_SCR11 /256
            BYTE     LX_TO_SCR12 /256
            BYTE     LX_TO_SCR13 /256
            BYTE     LX_TO_SCR14 /256
            BYTE     LX_TO_SCR15 /256
            
            BYTE     LX_TO_SCR16 /256
            BYTE     LX_TO_SCR17 /256
            BYTE     LX_TO_SCR18 /256
            BYTE     LX_TO_SCR19 /256
            BYTE     LX_TO_SCR20 /256
            
            BYTE     LX_TO_SCR21 /256
            BYTE     LX_TO_SCR22 /256
            BYTE     LX_TO_SCR23 /256
            BYTE     LX_TO_SCR24 /256
            BYTE     LX_TO_SCR25 /256
            
            BYTE     LX_TO_SCR26 /256
            BYTE     LX_TO_SCR27 /256
            BYTE     LX_TO_SCR28 /256
            BYTE     LX_TO_SCR29 /256
            BYTE     LX_TO_SCR30 /256
            
            BYTE     LX_TO_SCR31 /256 
            BYTE     LX_TO_SCR32 /256
            BYTE     LX_TO_SCR33 /256
            BYTE     LX_TO_SCR34 /256
            BYTE     LX_TO_SCR35 /256
           
            BYTE     LX_TO_SCR36 /256
            BYTE     LX_TO_SCR37 /256
            BYTE     LX_TO_SCR38 /256
            BYTE     LX_TO_SCR39 /256
            BYTE     LX_TO_SCR40 /256
            
            BYTE     LX_TO_SCR41 /256
            BYTE     LX_TO_SCR42 /256
            BYTE     LX_TO_SCR43 /256
            BYTE     LX_TO_SCR44 /256
            BYTE     LX_TO_SCR45 /256
            
            BYTE     LX_TO_SCR46 /256
            BYTE     LX_TO_SCR47 /256
            BYTE     LX_TO_SCR48 /256
            BYTE     LX_TO_SCR49 /256
            BYTE     LX_TO_SCR50 /256
            
            BYTE     LX_TO_SCR51 /256
            BYTE     LX_TO_SCR52 /256
            BYTE     LX_TO_SCR53 /256
            BYTE     LX_TO_SCR54 /256
            BYTE     LX_TO_SCR55 /256
           
            BYTE     LX_TO_SCR56 /256
            BYTE     LX_TO_SCR57 /256
            BYTE     LX_TO_SCR58 /256
            BYTE     LX_TO_SCR59 /256
            BYTE     LX_TO_SCR60 /256

            BYTE     LX_TO_SCR61 /256
            BYTE     LX_TO_SCR62 /256 
            BYTE     LX_TO_SCR63 /256
            BYTE     LX_TO_SCR64 /256

TO_TESORO       =   001
TO_DIANA        =   002

TO_ARQUERO      =   003
TO_KNIGHT       =   004
TO_MORTIANNA    =   005

TO_RESPAWNTOP   =   005
TO_VAIVEN       =   006
TO_WASP         =   007

TO_RATA         =   008

TO_HORSE        =   009
TO_WSCARLET     =   010
TO_RUSS         =   011

TO_PUERTA       =   064
       
 SHERWOOD SCHOOL           
LX_TO_SCR01           
            BYTE     TO_HORSE,014,000,000
            BYTE     TO_RUSS ,000,000,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR02
LX_TO_TRAIN
            BYTE     TO_KNIGHT,007,017,005
            
            BYTE     TO_DIANA,001,001,000
            BYTE     TO_DIANA,001,008,000
LX_TO_TRAINE            
            BYTE     TO_DIANA,001,015,000
            BYTE     TO_DIANA,001,022,000

            BYTE     TO_RUSS ,000,000,000

            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256
LX_TO_SCR03
            BYTE     TO_ARQUERO,002,027,(027/004)+(002/004)*8
            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256
LX_TO_SCR04
            BYTE     TO_ARQUERO,001,003,(003/004)+(001/004)*8
            BYTE     TO_ARQUERO,014,012,(012/004)+(014/004)*8
            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256
LX_TO_SCR05 
            BYTE     TO_ARQUERO,008,001,(001/004)+(008/004)*8
            BYTE     TO_ARQUERO,008,027,(027/004)+(008/004)*8
            BYTE     TO_ARQUERO,001,027,(027/004)+(001/004)*8
            BYTE     TO_VAIVEN,018,010,000
            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256  
LX_TO_SCR06 
            BYTE     TO_ARQUERO,001,001,(001/004)+(001/004)*8
            BYTE     TO_ARQUERO,005,028,(028/004)+(005/004)*8
            BYTE     TO_ARQUERO,007,008,(008/004)+(007/004)*8
            BYTE     TO_WASP,004,008,000
            BYTE     ARCHERPUZZLE1  /  256
            BYTE     ARCHERPUZZLE1 MOD 256 
LX_TO_SCR07
            BYTE     TO_TESORO,013,014,000
            BYTE     TO_ARQUERO,001,001,(001/004)+(001/004)*8
            BYTE     TO_ARQUERO,001,028,(028/004)+(001/004)*8
            BYTE     TO_ARQUERO,008,001,(001/004)+(008/004)*8
            BYTE     TO_ARQUERO,008,028,(028/004)+(008/004)*8
            BYTE     TO_WASP,004,004,000
            BYTE     ARCHERPUZZLE2  /  256
            BYTE     ARCHERPUZZLE2 MOD 256   
LX_TO_SCR08
            BYTE     TO_TESORO,014,028,000
            BYTE     TO_ARQUERO,001,001,(001/004)+(001/004)*8
            BYTE     TO_ARQUERO,007,001,(001/004)+(007/004)*8
            BYTE     TO_ARQUERO,001,015,(015/004)+(001/004)*8
            BYTE     TO_ARQUERO,003,026,(026/004)+(003/004)*8
            BYTE     TO_VAIVEN,018,020,000
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256  

 LOXLEY CASTLE
LX_TO_SCR09
            BYTE     TO_PUERTA,014,017,000  
            BYTE     TO_KNIGHT,015,020,010
            BYTE     TARGETPUZZLE2  /  256
            BYTE     TARGETPUZZLE2 MOD 256  
LX_TO_SCR10
            BYTE     TO_KNIGHT,001,005,005
            BYTE     TO_VAIVEN,018,010,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR11
            BYTE     TO_PUERTA,014,018,000  
            BYTE     TO_KNIGHT,001,015,003
            BYTE     TO_KNIGHT,015,010,003
            BYTE     TARGETPUZZLE3  /  256
            BYTE     TARGETPUZZLE3 MOD 256             
LX_TO_SCR12
            BYTE     TO_KNIGHT,015,010,003
            BYTE     TO_WASP,004,024,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256                
LX_TO_SCR13
            BYTE     TO_HORSE,014,027,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256  

 HATHERSAGE            
LX_TO_SCR14
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR15
            BYTE     TO_KNIGHT,015,010,005
            BYTE     TO_WSCARLET,000,000,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR16
            BYTE     TO_ARQUERO,005,012,(012/004)+(005/004)*8
            BYTE     TO_ARQUERO,005,024,(024/004)+(005/004)*8
            BYTE     TO_VAIVEN,018,015,000
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256          
LX_TO_SCR17
            BYTE     TO_ARQUERO,005,007,(007/004)+(005/004)*8
            BYTE     TO_HORSE,014,027,000
            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256
            
 CLIPSTONE        
LX_TO_SCR18
            BYTE     TO_ARQUERO,004,007,(007/004)+(004/004)*8
            BYTE     TO_ARQUERO,004,020,(020/004)+(004/004)*8
            BYTE     TO_HORSE  ,014,000,000          
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256               
LX_TO_SCR19
            BYTE     TO_ARQUERO,004,007,(007/004)+(004/004)*8
            BYTE     TO_ARQUERO,004,013,(013/004)+(004/004)*8
            BYTE     TO_ARQUERO,004,020,(020/004)+(004/004)*8
            BYTE     TO_ARQUERO,004,026,(026/004)+(004/004)*8
            BYTE     TO_WASP,004,004,000
            BYTE     ARCHER3  /  256
            BYTE     ARCHER3 MOD 256
LX_TO_SCR20
            BYTE     TO_ARQUERO,003,003,(003/004)+(003/004)*8
            BYTE     TO_ARQUERO,003,015,(015/004)+(003/004)*8
            BYTE     TO_ARQUERO,003,026,(026/004)+(003/004)*8
            BYTE     TO_VAIVEN,018,008,001
            BYTE     ARCHER3  /  256
            BYTE     ARCHER3 MOD 256
LX_TO_SCR21
            BYTE     TO_TESORO,003,001,000
            BYTE     TO_TESORO,003,029,000
            BYTE     TO_TESORO,009,029,000
            BYTE     TO_VAIVEN,005,007,001
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR22 
            BYTE     TO_TESORO,003,029,000
            BYTE     TO_VAIVEN,009,015,000
            BYTE     ARCHERPUZZLE3  /  256
            BYTE     ARCHERPUZZLE3 MOD 256           
LX_TO_SCR23
            BYTE     TO_TESORO,010,012,000
            BYTE     TO_TESORO,010,018,000
            BYTE     TO_VAIVEN,018,012,001
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
            
LX_TO_SCR24
            BYTE     TO_TESORO,016,007,000
            BYTE     TO_RATA,001,012,000
            BYTE     RATAPUZZLE1  /  256
            BYTE     RATAPUZZLE1 MOD 256

 MANSFIELD
LX_TO_SCR25
            BYTE     TO_TESORO,016,013,000
            BYTE     TO_TESORO,016,017,000
            BYTE     TO_ARQUERO,002,003,(003/004)+(002/004)*8
            BYTE     TO_ARQUERO,002,011,(011/004)+(002/004)*8
            BYTE     TO_ARQUERO,002,019,(019/004)+(002/004)*8
            BYTE     TO_VAIVEN,012,005,000
            BYTE     ARCHER5MAD  /  256
            BYTE     ARCHER5MAD MOD 256
LX_TO_SCR26
            BYTE     TO_TESORO,016,001,000
            BYTE     TO_ARQUERO,002,003,(003/004)+(002/004)*8
            BYTE     TO_ARQUERO,002,011,(011/004)+(002/004)*8
            BYTE     TO_ARQUERO,002,018,(018/004)+(002/004)*8
            BYTE     TO_ARQUERO,002,026,(026/004)+(002/004)*8 
            BYTE     TO_VAIVEN,018,005,000
            BYTE     ARCHER5MAD  /  256
            BYTE     ARCHER5MAD MOD 256
LX_TO_SCR27 
            BYTE     TO_TESORO,009,001,000
            BYTE     TO_RATA,001,012,000
            BYTE     RATAPUZZLE2  /  256
            BYTE     RATAPUZZLE2 MOD 256
LX_TO_SCR28
            BYTE     TO_TESORO,009,029,000
            BYTE     TO_ARQUERO,013,001,(000/004)+(012/004)*8
            BYTE     TO_ARQUERO,001,024,(024/004)+(000/004)*8
            BYTE     TO_ARQUERO,013,028,(028/004)+(012/004)*8
            BYTE     TO_VAIVEN,011,023,000
            BYTE     ARCHER5MAD  /  256
            BYTE     ARCHER5MAD MOD 256
LX_TO_SCR29
            BYTE     TO_KNIGHT,015,012,006
            BYTE     TO_WASP,004,004,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR30
            BYTE     TO_KNIGHT,015,015,003
            BYTE     TO_VAIVEN,006,015,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR31
            BYTE     TO_ARQUERO,004,009,(009/004)+(004/004)*8
            BYTE     TO_HORSE,014,027,000
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256
            
  PAPPLEWICK                 
LX_TO_SCR32
            BYTE     TO_TESORO,003,029,000
            BYTE     TO_VAIVEN,018,010,000
            BYTE     TARGETPUZZLE1  /  256
            BYTE     TARGETPUZZLE1 MOD 256
LX_TO_SCR33
            BYTE     TO_TESORO,003,004,000
            BYTE     TO_VAIVEN,005,016,001
            BYTE     ESCALFLECH1  /  256
            BYTE     ESCALFLECH1 MOD 256
LX_TO_SCR34
            BYTE     TO_TESORO,016,029,000
            BYTE     TO_RATA,014,014,000
            BYTE     RATAPUZZLE3  /  256
            BYTE     RATAPUZZLE3 MOD 256
LX_TO_SCR35
            BYTE     TO_TESORO,016,001,000
            BYTE     CRUZPUZZLE1  /  256
            BYTE     CRUZPUZZLE1 MOD 256
LX_TO_SCR36
            BYTE     TO_ARQUERO,004,017,(017/004)+(004/004)*8
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256
LX_TO_SCR37
            BYTE     TO_KNIGHT,013,010,003
            BYTE     TO_VAIVEN,016,014,001
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256
LX_TO_SCR38
            BYTE     TO_HORSE,014,027,000
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256

 WORKSOP
LX_TO_SCR39
            BYTE     TO_ARQUERO,003,010,(010/004)+(003/004)*8
            BYTE     TO_ARQUERO,003,027,(027/004)+(003/004)*8
            BYTE     TO_HORSE,014,000,000
            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256
LX_TO_SCR40
            BYTE     TO_ARQUERO,003,005,(005/004)+(003/004)*8
            BYTE     TO_ARQUERO,003,026,(026/004)+(003/004)*8
            BYTE     ARCHER4  /  256
            BYTE     ARCHER4 MOD 256
LX_TO_SCR41
            BYTE     TO_TESORO,003,001,000
            BYTE     TO_KNIGHT,015,016,003
            BYTE     TO_WASP,001,001,000
            BYTE     PINCHOS3 /  256
            BYTE     PINCHOS3 MOD 256 
LX_TO_SCR42
            BYTE     TO_TESORO,009,026,000
            BYTE     TO_KNIGHT,015,010,003
            BYTE     TO_KNIGHT,002,005,008
            BYTE     TO_VAIVEN,011,005,001
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256
            
LX_TO_SCR43
            BYTE     TO_TESORO,009,006,000
            BYTE     TO_KNIGHT,015,010,003
            BYTE     TO_KNIGHT,002,010,008
            BYTE     TO_WASP,013,015,000 
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256
RETFORD
LX_TO_SCR44
            BYTE     TO_TESORO,016,001,000
            BYTE     TO_ARQUERO,004,001,(001/004)+(004/004)*8
            BYTE     TO_ARQUERO,004,006,(006/004)+(004/004)*8
            BYTE     ARCHER4  /  256
            BYTE     ARCHER4 MOD 256
LX_TO_SCR45
            BYTE     TO_ARQUERO,010,004,(004/004)+(010/004)*8
            BYTE     TO_ARQUERO,010,010,(010/004)+(010/004)*8
            BYTE     TO_ARQUERO,010,016,(016/004)+(010/004)*8
            BYTE     ARCHER3  /  256
            BYTE     ARCHER3 MOD 256
LX_TO_SCR46
            BYTE     TO_KNIGHT,009,003,008
            BYTE     ARCHER3  /  256
            BYTE     ARCHER3 MOD 256
LX_TO_SCR47
            BYTE     TO_TESORO,016,029,000
            BYTE     TO_ARQUERO,010,008,(008/004)+(010/004)*8
            BYTE     TO_ARQUERO,010,014,(014/004)+(010/004)*8
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256
LX_TO_SCR48
            BYTE     TO_KNIGHT,005,001,003
            BYTE     TO_HORSE,014,027,000
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256

 TUXFORD
LX_TO_SCR49
            BYTE     TO_TESORO,004,001,000
            BYTE     TO_VAIVEN,018,018,000
            BYTE     TARGETPUZZLE4  /  256
            BYTE     TARGETPUZZLE4 MOD 256
LX_TO_SCR50
            BYTE     TO_TESORO,006,029,000
            BYTE     TO_VAIVEN,010,010,000
            BYTE     PINCHOS1  /  256
            BYTE     PINCHOS1 MOD 256 
LX_TO_SCR51
            BYTE     TO_TESORO,004,001,000
            BYTE     TO_KNIGHT,015,001,006
            BYTE     ARCHER5MAD  /  256
            BYTE     ARCHER5MAD MOD 256
LX_TO_SCR52
            BYTE     TO_KNIGHT,015,010,003
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256
LX_TO_SCR53
            BYTE     TO_ARQUERO,004,004,(004/004)+(004/004)*8
            BYTE     TO_HORSE,014,027,000
            BYTE     ARCHER2  /  256
            BYTE     ARCHER2 MOD 256

LX_RSPWN_TOP
 NOTTINGHAM
LX_TO_SCR54
            BYTE     TO_HORSE,014,000,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR55
            BYTE     TO_VAIVEN,018,025,000
            BYTE     TO_HORSE,014,000,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256 
LX_TO_SCR56
            BYTE     TO_VAIVEN,007,018,000
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR57
            BYTE     TO_VAIVEN,017,020,001
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256 
LX_TO_SCR58
            BYTE     TO_WASP,017,024,000
            BYTE     PINCHOS2  /  256
            BYTE     PINCHOS2 MOD 256 
LX_TO_SCR59
            BYTE     TO_MORTIANNA,009,015,000
            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256
LX_TO_SCR60
            BYTE     TO_KNIGHT,015,007,011
            BYTE     ARCHER1  /  256
            BYTE     ARCHER1 MOD 256 
            
LX_TO_SCR61
            BYTE     TO_ARQUERO,001,008,(008/004)+(000/004)*8
            BYTE     TO_ARQUERO,001,016,(016/004)+(000/004)*8
            BYTE     ARCHER9  /  256
            BYTE     ARCHER9 MOD 256
LX_TO_SCR62
            BYTE     TO_KNIGHT,008,007,013
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR63            
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256
LX_TO_SCR64
            BYTE     TO_KNIGHT,013,007,015
            BYTE     DUMMYRD  /  256
            BYTE     DUMMYRD MOD 256

LXT_MAP_PLC 
LXT_ES_MAP1
            BYTE    "A"
            WORD   LXT_ES_MAP2-($+2)
            BYTE    022,000,006
            BYTE    "VIAJAR A..."
LXT_ES_MAP2      
            BYTE    "B"
            WORD   LXT_ES_MAP3-($+2)
            BYTE    "LOXLEY"
LXT_ES_MAP3      
            BYTE    "C"
            WORD   LXT_ES_MAP4-($+2)
            BYTE    "HATHERSAGE"
LXT_ES_MAP4      
            BYTE    "D"
            WORD   LXT_ES_MAP5-($+2)
            BYTE    "SHERWOOD"
LXT_ES_MAP5      
            BYTE    "E"
            WORD   LXT_ES_MAP6-($+2)
            BYTE    "CLIPSTONE"
LXT_ES_MAP6      
            BYTE    "F"
            WORD   LXT_ES_MAP7-($+2)
            BYTE    "MANSFIELD"
LXT_ES_MAP7      
            BYTE    "G"
            WORD   LXT_ES_MAP8-($+2)
            BYTE    "PAPPELWICK"
LXT_ES_MAP8      
            BYTE    "H"
            WORD   LXT_ES_MAP9-($+2)
            BYTE    "WORKSOP"
LXT_ES_MAP9      
            BYTE    "I"
            WORD   LXT_ES_MAP10-($+2)
            BYTE    "RETFORD"
LXT_ES_MAP10      
            BYTE    "J"
            WORD   LXT_ES_MAP11-($+2)
            BYTE    "TUXFORD"
LXT_ES_MAP11
            BYTE    "K"
            WORD   LXT_ES_MAP12-($+2)
            BYTE    "NOTTINGHAM"
LXT_ES_MAP12
            BYTE    "L"
            WORD   LXT_ES_MAP13-($+2)
            BYTE    "CAVERNAS",006
LXT_ES_MAP13
            BYTE    "M"
            WORD   LXT_ES_MAP14-($+2)
            BYTE    006
            
LXT_ES_MAP14

            ESPACIOS  (LXT_MAP_PLC + 150)-LXT_ES_MAP14
LXT_MAP_PLC_END
 
LX_TAB_RND_RSPWN
            BYTE  002  
            BYTE  005  
            BYTE  001  
            BYTE  006  
            BYTE  003  
            BYTE  004  
            BYTE  000  
            
 
LX_TAB_RESPAWN


            BYTE  004,005,006,007,008,000  SHERWOOD
            BYTE  018,019,020,021,022,000  CLIPSTONE
            BYTE  025,026,028,029,030,000  MASFIELD
            BYTE  032,033,036,037,000,000  PAPPLEWICK
            BYTE  039,040,041,042,043,000  WORKSOP
            BYTE  044,045,046,047,048,000  RETFORD
            BYTE  050,051,052,053,000,000  TUXFORD

LX_PJP_PUERTAOFF
            WORD  LX_PJP_PUERTAOFFE-$-2
            BYTE   FIN
            BYTE   016,007,017,000,019,000,021,001
            BYTE   128,128,128,LSE,LOC,003,255,FIN
            BYTE   128,128,128,LSE,LOC,003,255,FIN
            BYTE   128,128,128,LSE,LOC,003,255,FIN
            BYTE   128,128,128,LSE,LOC,003,255,FIN
            BYTE   128,128,128,LSE,LOC,003,255,FIN
            BYTE   016,000,017,007
            BYTE   128,128,128
LX_PJP_PUERTAOFFE

LX_PJP_DIANA
LX_PJP_ARQUERO
            
            WORD LX_PJP_ARQUEROE-$-2
            BYTE  LOC,000,003
            BYTE  FIN
            BYTE  019,000,021,001
            BYTE  128,128
            BYTE  LSE,LOC,002,255,FIN,128,128,128
            BYTE  LSE,LOC,003,255,FIN,128,128,128
            BYTE  LSE,LOC,003,255,FIN,128,128,128
LX_PJP_ARQUEROE


LX_PJP_TESORO
            WORD LX_PJP_TESOROE-$-2
            BYTE  FIN
            BYTE  017,000,016,007,019,000,021,001,128,128
            BYTE  LSE,LOC,002,255,FIN,128,128
LX_PJP_TESOROE

LX_PJP_VARZONE
            WORD LX_PJP_VARZONEE-$-2
            BYTE  LDI
            WORD LX_VARZONE
            WORD VARS
            WORD 0002
            BYTE  FIN

LX_PJP_VARZONEE

LX_PJP_BARUP
            WORD LX_PJP_BARUPE-$-2
            BYTE  LDI
            WORD LX_MRK_BARSXW
            WORD CHARS
            WORD 0002
            BYTE  FIN
            BYTE  016,008,021,001
LX_PJP_BARUPE

LX_PJP_BARWORDN
            WORD LX_PJP_BARWORDNE-$-2
            BYTE  LDI
            WORD LX_MRK_BARSPW
            WORD CHARS
            WORD 0002
            BYTE  FIN
            BYTE  016,008,021,001
LX_PJP_BARWORDNE

LX_PJP_WSCARLET
            WORD LX_PJP_WSCARLETE-$-2
            BYTE  LDI
            WORD LX_WSCARLETF
            WORD CHARS
            WORD 0002
           
            BYTE  FIN
            BYTE  016,007
            BYTE  017,000
            BYTE  022,015,001
            BYTE  "@A"
            BYTE  016,000
            BYTE  017,007
            BYTE  022,016,001
            BYTE  "BC"
            BYTE  022,017,001
            BYTE  "DE"
            BYTE  022,018,002
            BYTE  "F"
            
LX_PJP_WSCARLETE
LX_SFX_DIS  ARCHIVO "SOUND/LOXLEY_SWDIS.SQW" < SONIDO ESPADA SWOSSHHH

 PUNTO INSERCION TEXTOS
LX_PITEXT1
LXT_ES1
            BYTE    "A"
            WORD   LXT_EN2-($+2)
            BYTE    016,007
            BYTE    022,010,002
            BYTE    "1 - ENGLISH"
            BYTE    022,012,002
            BYTE    "2 - ESPAOL"
            BYTE    022,014,002
            BYTE    "3 - knllecd"
            BYTE    022,019,001
            BYTE    016,001
            BYTE    "V1.0.",__DATE__ 
LXT_EN2     

                              
LXT_ES2
            BYTE    "B"
            WORD   LXT_ES3-($+2)
            
            BYTE    016,007
            BYTE    022,006,000
            BYTE    006,013,013
            BYTE    006,013
            BYTE    006,013
            BYTE    "  1.INICIO",006,013
            BYTE    006,013
            BYTE    "  2.NIVEL",006,013
            BYTE    006,013
            BYTE    "  3.CONTROLES",006,013
            BYTE    006,013
            BYTE    "  4.CR(DITOS",006,013
            BYTE    006,013
            BYTE    006
            
LXT_ES3
            BYTE    "C"
            WORD   LXT_ES4-($+2)            
            BYTE    022,008,000
            BYTE    016,007
            BYTE    006,013,013
            BYTE    "1.TECLADO",006,013,013
            BYTE    "2.SINCLAIR",006,013,013
            BYTE    "3.CURSOR",006,013,013
            BYTE    "4.KEMPSTON",006,013,013
            BYTE    "5.DEFINIR TECLAS"
            
LXT_ES4
            BYTE    "D"
            WORD   LXT_ES5-($+2)
            BYTE    022,006,000
            BYTE    016,007
            BYTE    124," IZQUIERDA",006,013,013
            BYTE    125," DERECHA",006,013,013
            BYTE    126," ARRIBA",006,013,013
            BYTE    127," ABAJO",006,013,013
            BYTE    "$ DISPARO",006,013,013
            BYTE    "% PAUSA",006,013,013
            BYTE    "X ABANDONAR",006

LXT_ES5
            BYTE    "E"
            WORD   LXT_ES6-($+2)
            BYTE    016,007
            BYTE    022,010,000,006,013,013
            BYTE    "  1.F&CIL",006,013,013
            BYTE    "  2.NORMAL",006,013,013
            BYTE    "  3.DIF<CIL",006
LXT_ES6
            BYTE    "F"
            WORD   LXT_ES7-($+2)
            BYTE    022,008,000
            BYTE    016,007
            BYTE    023,004,004
            BYTE    "M>SICA",006,013
            BYTE    "  * RICHARD",006,013
            BYTE    "'KULOR' ARMIJO",006,013,013
            BYTE    "TEXTOS EN RUSO:",006,013
            BYTE    "MIKHAIL SUDAKOV",006,013
            BYTE    023,004,004,"Y MAR<A",006,013
            BYTE    "KRASHENINNIKOVA",013
            BYTE    006,013
            BYTE    "DISEO Y C=DIGO",013
            BYTE    " * ARIEL RUIZ",006,013,13
           
            
LXT_ES7
            BYTE    "G"
            WORD   LXT_ES8-($+2)
            BYTE      016,000,017,006,019,000
            BYTE      022,010,000,006,006
            BYTE      023,004,000,"HAS MUERTO, CABALLERO...",006
            BYTE      023,005,000,"TU MUERTE PESAR& SOBRE",006
            BYTE      023,009,000,"TODA TU GENTE.",006
            BYTE      006,006
            
LXT_ES8
            BYTE    "H"
            WORD   LXT_ES9-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            
            BYTE    016,001
            BYTE    " WILL SCARLET:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " HOLA ROBIN, )BUSCAS ACCI=N?",006
            BYTE    " VE A ",006,006
         
            BYTE    006,006
            BYTE    022,004,006
            
LXT_ES9     
            BYTE    "I"
            WORD   LXT_ES10-($+2)
            
            BYTE    022,000,000
            BYTE    020,RLE
            WORD   LX_TLAY_DAT
            BYTE    LDI,000,088,000,160,000,003
            BYTE    FIN
            BYTE    022,004,000
            BYTE    LSE,RLE
            WORD   LX_TUCK_DAT
            BYTE    FIN  
            
            BYTE    022,000,000
            BYTE    016,001
            BYTE    017,006,019,000
            BYTE    006,006
            
            BYTE    "  FRAILE TUCK:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " HOLA, ROBIN, )QUE NECESITAS?",006
            BYTE    022,007,004
            BYTE    "POCI=N DE"
            BYTE    022,008,004
            BYTE    "SALUD"
            BYTE    022,009,013
            BYTE    "80"
            
            BYTE    022,007,020
            BYTE    "REPONER"
            BYTE    022,008,020
            BYTE    "PR&CTICA"
            BYTE    022,009,029
            BYTE    "20"
            
            BYTE    022,011,004
            BYTE    "MEJORAR"
            BYTE    022,012,004
            BYTE    "ARCO"
            BYTE    022,013,013
            BYTE    "30"
            
            BYTE    022,011,020
            BYTE    "MEJORAR"
            BYTE    022,012,020
            BYTE    "ESPADA"
            BYTE    022,013,029
            BYTE    "30"
            
            BYTE    022,015,004
            BYTE    "LISTO"
            
           
            BYTE    LSE
            BYTE    PAG,023
            BYTE    LDI,000,160,000,216,208,002
            BYTE    FIN
LXT_ES10
LXT_ES11
            BYTE    "K"
            WORD   LXT_ES12-($+2)
            BYTE    022,000,000
            BYTE    017,006,019,000
            BYTE    006,006
            BYTE    016,001
            BYTE    "  DUNCAN:",006,006
            BYTE    006,006
            BYTE    016,000
            BYTE    " )AMO ROBIN? )ES USTED?",006
            BYTE    006,006
            BYTE    " BENDITO SEA, PENS( QUE DIOS",006
            BYTE    " NOS HAB<A ABANDONADO.",006
            BYTE    006,006
            BYTE    " LE ENTREGO UNA PARTE DEL",006
            BYTE    " TESORO DE VUESTRO PADRE,",006
            BYTE    " QUE LOGR( RECUPERAR.",006
            BYTE    006,006
            
 # = ¡
 ) = ¿
 & = Á
 ( = É
 < = Í
 = = Ó
 > = Ú


LXT_DEPLOY_DES            
MPAGE7_END




LABELS LIST
-----------

BLOCK527END: EQU 0x0000F97D
BLOCK527INI: EQU 0x00005B00
BLOCK6INI: EQU 0x0000C000
BLOCK4END: EQU 0x0000FF00
BLOCK4INI: EQU 0x0000C000
BLOCK3END: EQU 0x0000FF31
BLOCK3INI: EQU 0x0000C000
BLOCK1END: EQU 0x0000FFF4
BLOCK0END: EQU 0x0000FFFE
BLOCK0INI: EQU 0x0000C000
BASICLOAD2END: EQU 0x000081E2
BASICLOAD2INI: EQU 0x00005C10
BASICLOAD1END: EQU 0x00008032
BASICLOAD1INI: EQU 0x00008000
MPAGE7_END: EQU 0x0000F97D
LXT_ES11: EQU 0x0000F8C4
LXT_ES10: EQU 0x0000F8C4
LXT_ES9: EQU 0x0000F7F9
LXT_ES8: EQU 0x0000F7AD
LXT_ES7: EQU 0x0000F755
LXT_ES6: EQU 0x0000F6C4
LXT_ES5: EQU 0x0000F694
LXT_ES4: EQU 0x0000F63B
LXT_ES3: EQU 0x0000F5EF
LXT_ES2: EQU 0x0000F5A3
LXT_EN2: EQU 0x0000F5A3
LX_SFX_DIS: EQU 0x0000F39F
LX_PJP_WSCARLETE: EQU 0x0000F39F
LX_PJP_WSCARLET: EQU 0x0000F37A
LX_PJP_BARDWNE: EQU 0x0000F37A
LX_PJP_BARUPE: EQU 0x0000F36C
LX_PJP_BARUP: EQU 0x0000F35E
LX_PJP_VARZONEE: EQU 0x0000F35E
LX_PJP_VARZONE: EQU 0x0000F354
LX_PJP_TESOROE: EQU 0x0000F354
LX_PJP_TESORO: EQU 0x0000F340
LX_PJP_ARQUEROE: EQU 0x0000F340
LX_PJP_ARQUERO: EQU 0x0000F31C
LX_PJP_PUERTAOFFE: EQU 0x0000F31C
LX_PJP_PUERTAOFF: EQU 0x0000F2E2
LX_TAB_RESPAWN: EQU 0x0000F2B8
LX_TAB_RND_RSPWN: EQU 0x0000F2B1
LXT_ES_MAP14: EQU 0x0000F2AD
LXT_ES_MAP13: EQU 0x0000F2A9
LXT_ES_MAP12: EQU 0x0000F29D
LXT_ES_MAP11: EQU 0x0000F290
LXT_ES_MAP10: EQU 0x0000F286
LXT_ES_MAP9: EQU 0x0000F27C
LXT_ES_MAP8: EQU 0x0000F272
LXT_ES_MAP7: EQU 0x0000F265
LXT_ES_MAP6: EQU 0x0000F259
LXT_ES_MAP5: EQU 0x0000F24D
LXT_ES_MAP4: EQU 0x0000F242
LXT_ES_MAP3: EQU 0x0000F235
LXT_ES_MAP2: EQU 0x0000F22C
LX_RSPWN_TOP: EQU 0x0000F1D5
LX_TO_TRAINE: EQU 0x0000EF4D
LX_TO_TRAIN: EQU 0x0000EF41
TO_PUERTA: EQU 0x00000040
TO_RUSS: EQU 0x0000000B
TO_WSCARLET: EQU 0x0000000A
TO_HORSE: EQU 0x00000009
TO_RATA: EQU 0x00000008
TO_WASP: EQU 0x00000007
TO_VAIVEN: EQU 0x00000006
TO_MORTIANNA: EQU 0x00000005
TO_KNIGHT: EQU 0x00000004
TO_ARQUERO: EQU 0x00000003
TO_DIANA: EQU 0x00000002
TO_TESORO: EQU 0x00000001
TABOBJH: EQU 0x0000EEF6
LX_TO_SCR64: EQU 0x0000F215
LX_TO_SCR63: EQU 0x0000F213
LX_TO_SCR61: EQU 0x0000F203
LX_TO_SCR60: EQU 0x0000F1FD
LX_TO_SCR59: EQU 0x0000F1F7
LX_TO_SCR58: EQU 0x0000F1F1
LX_TO_SCR57: EQU 0x0000F1EB
LX_TO_SCR56: EQU 0x0000F1E5
LX_TO_SCR55: EQU 0x0000F1DB
LX_TO_SCR54: EQU 0x0000F1D5
LX_TO_SCR53: EQU 0x0000F1CB
LX_TO_SCR52: EQU 0x0000F1C5
LX_TO_SCR51: EQU 0x0000F1BB
LX_TO_SCR50: EQU 0x0000F1B1
LX_TO_SCR49: EQU 0x0000F1A7
LX_TO_SCR48: EQU 0x0000F19D
LX_TO_SCR47: EQU 0x0000F18F
LX_TO_SCR46: EQU 0x0000F189
LX_TO_SCR45: EQU 0x0000F17B
LX_TO_SCR44: EQU 0x0000F16D
LX_TO_SCR43: EQU 0x0000F15B
LX_TO_SCR42: EQU 0x0000F149
LX_TO_SCR41: EQU 0x0000F13F
LX_TO_SCR40: EQU 0x0000F135
LX_TO_SCR39: EQU 0x0000F127
LX_TO_SCR38: EQU 0x0000F121
LX_TO_SCR37: EQU 0x0000F117
LX_TO_SCR36: EQU 0x0000F111
LX_TO_SCR35: EQU 0x0000F10B
LX_TO_SCR34: EQU 0x0000F101
LX_TO_SCR33: EQU 0x0000F0F7
LX_TO_SCR32: EQU 0x0000F0ED
LX_TO_SCR31: EQU 0x0000F0E3
LX_TO_SCR30: EQU 0x0000F0D9
LX_TO_SCR29: EQU 0x0000F0CF
LX_TO_SCR28: EQU 0x0000F0B9
LX_TO_SCR27: EQU 0x0000F0AF
LX_TO_SCR26: EQU 0x0000F095
LX_TO_SCR25: EQU 0x0000F07B
LX_TO_SCR24: EQU 0x0000F071
LX_TO_SCR23: EQU 0x0000F063
LX_TO_SCR22: EQU 0x0000F059
LX_TO_SCR21: EQU 0x0000F047
LX_TO_SCR20: EQU 0x0000F035
LX_TO_SCR19: EQU 0x0000F01F
LX_TO_SCR18: EQU 0x0000F011
LX_TO_SCR17: EQU 0x0000F007
LX_TO_SCR16: EQU 0x0000EFF9
LX_TO_SCR15: EQU 0x0000EFEF
LX_TO_SCR14: EQU 0x0000EFED
LX_TO_SCR13: EQU 0x0000EFE7
LX_TO_SCR12: EQU 0x0000EFDD
LX_TO_SCR11: EQU 0x0000EFCF
LX_TO_SCR10: EQU 0x0000EFC5
LX_TO_SCR09: EQU 0x0000EFBB
LX_TO_SCR08: EQU 0x0000EFA1
LX_TO_SCR07: EQU 0x0000EF8B
LX_TO_SCR06: EQU 0x0000EF79
LX_TO_SCR05: EQU 0x0000EF67
LX_TO_SCR04: EQU 0x0000EF5D
LX_TO_SCR03: EQU 0x0000EF57
LX_TO_SCR02: EQU 0x0000EF41
LX_TO_SCR01: EQU 0x0000EF37
TABOBJ: EQU 0x0000EEB6
LX_WSCARLETF: EQU 0x0000EEB5
WSCARLET: EQU 0x0000EC7D
TESORO: EQU 0x0000EC5D
FVRI: EQU 0x0000EE41
FVRE: EQU 0x0000EE5D
FSTVARSRST: EQU 0x0000EE25
ROOMNTSDE: EQU 0x0000EDE4
ROOMNTSIZ: EQU 0x0000EDDB
ROOMMAP: EQU 0x0000EE08
ROOMHORSE: EQU 0x0000EDFD
ROOMWARP: EQU 0x0000ED7E
ROOMDER: EQU 0x0000ED3F
ROOMIZQ: EQU 0x0000ED00
ROOMADDH: EQU 0x0000ECC0
ROOMADDL: EQU 0x0000EC80
ROOMPAG: EQU 0x0000EC40
MSTK_EXIT: EQU 0x0000EBED
MSTK_KEMP: EQU 0x0000EBC9
MSTK_AFG: EQU 0x0000EBC9
MSTK_AAB: EQU 0x0000EBA7
MSTK_AAR: EQU 0x0000EB85
MSTK_ADE: EQU 0x0000EB63
MSTK_AIZ: EQU 0x0000EB41
LX_KEMPSWI: EQU 0x0000EB23
LX_KEMPSTON: EQU 0x0000EC2B
LX_PAUSA: EQU 0x0000EBF3
MSTK_JMP: EQU 0x0000EBD9
LX_KEYBM: EQU 0x0000EABA
LX_KEYB: EQU 0x0000EA8F
LX_CTDFLT: EQU 0x0000EA7B
LX_MRK_BARSP: EQU 0x0000E7E6
LX_MRK_BARSPW: EQU 0x0000E924
LX_MRK_BARSX: EQU 0x0000E7A6
LX_MRK_BARSXW: EQU 0x0000E920
LX_CUEVA: EQU 0x0000E9A5
LX_MAP_LAYER: EQU 0x0000E9D2
CAVESLAYER: EQU 0x0000DA2D
CAVESLAYERD: EQU 0x0000EA3F
LX_CUEVA_DAT: EQU 0x0000E121
LXT_CVTXTE: EQU 0x0000DE63
LX_MAP_DAT: EQU 0x0000DF89
LX_MLAY_DAT: EQU 0x0000E0A9
LXT_MPEND: EQU 0x0000DE51
LXT_MAP: EQU 0x0000DE30
LX_MENU_DAT: EQU 0x0000DEDF
LXT_END: EQU 0x0000DE30
LX_MRK_DAT: EQU 0x0000DE64
LXT_TITULO: EQU 0x0000DE25
LXT_MRK: EQU 0x0000DE1A
LX_GRFAH: EQU 0x000000DE
LX_GRFAL: EQU 0x0000001A
LX_GRFADW: EQU 0x0000DE18
LX_FNTLW: EQU 0x0000DE16
LX_GRFAD: EQU 0x0000DE1A
LX_CURRLANGH: EQU 0x0000DE01
LX_CURRLANGL: EQU 0x0000DE00
LX_FNTLB: EQU 0x0000DA00
LX_FNTL: EQU 0x0000DB00
LXT_DEPLOY_LNG: EQU 0x00000632
LXT_DEPLOY_END: EQU 0x0000DAFC
LXT_ESZ: EQU 0x0000FFAF
LXT_ES24: EQU 0x0000FFAF
LXT_ES23: EQU 0x0000FF89
LXT_ES22: EQU 0x0000FF25
LXT_ES21: EQU 0x0000FEDA
LXT_ES20: EQU 0x0000FE4E
LXT_ES19: EQU 0x0000FDFD
LXT_ES18: EQU 0x0000FDA5
LXT_ES16: EQU 0x0000FC2D
LXT_ES15: EQU 0x0000FB39
LXT_ES14: EQU 0x0000FAA9
LXT_ES13: EQU 0x0000FA18
LXT_ES12: EQU 0x0000F97D
LXT_DEPLOY_DES: EQU 0x0000F97D
LXT_DEPLOY_INI: EQU 0x0000D4CA
LXT_SW_END: EQU 0x0000D4C9
LXT_ES_MAP1: EQU 0x0000F21B
LXT_ES_END: EQU 0x0000FFAF
LXT_ES1: EQU 0x0000F560
LXT_SW_RS: EQU 0x0000D4AF
LXT_MAP_PLC_END: EQU 0x0000F2B1
LX_PITEXT1: EQU 0x0000F560
LXT_SW_ES: EQU 0x0000D495
LXT_SWITCH: EQU 0x0000D47B
LXT_SWITCHDW: EQU 0x0000D479
LXT_RS_MAP13: EQU 0x0000D475
LXT_RS_MAP12: EQU 0x0000D46B
LXT_RS_MAP11: EQU 0x0000D45F
LXT_RS_MAP10: EQU 0x0000D454
LXT_RS_MAP9: EQU 0x0000D44A
LXT_RS_MAP8: EQU 0x0000D440
LXT_RS_MAP7: EQU 0x0000D436
LXT_RS_MAP6: EQU 0x0000D42B
LXT_RS_MAP5: EQU 0x0000D420
LXT_RS_MAP4: EQU 0x0000D417
LXT_RS_MAP3: EQU 0x0000D40A
LXT_RS_MAP2: EQU 0x0000D401
LXT_RS_MAP1: EQU 0x0000D3E9
LXT_RS_END: EQU 0x0000D3E9
LXT_RSZ: EQU 0x0000D3E8
LXT_RS24: EQU 0x0000D3E8
LXT_RS23: EQU 0x0000D3C2
LXT_RS22: EQU 0x0000D368
LXT_RS21: EQU 0x0000D325
LXT_RS20: EQU 0x0000D292
LXT_RS19: EQU 0x0000D241
LXT_RS18: EQU 0x0000D1EB
LXT_RS17: EQU 0x0000D196
LXT_RS16: EQU 0x0000D089
LXT_RS15: EQU 0x0000CFA9
LXT_RS14: EQU 0x0000CF01
LXT_RS13: EQU 0x0000CE7E
LXT_RS12: EQU 0x0000CE1A
LXT_RS11: EQU 0x0000CD62
LXT_RS10: EQU 0x0000CD62
LXT_RS9: EQU 0x0000CC91
LXT_RS8: EQU 0x0000CC2F
LXT_RS7: EQU 0x0000CBE7
LXT_RS6: EQU 0x0000CB58
LXT_RS5: EQU 0x0000CB26
LXT_RS4: EQU 0x0000CAD9
LXT_RS1: EQU 0x0000CA34
LXT_EN_MAP14: EQU 0x0000CA34
LXT_EN_MAP13: EQU 0x0000CA30
LXT_EN_MAP12: EQU 0x0000CA27
LXT_EN_MAP11: EQU 0x0000CA1A
LXT_EN_MAP10: EQU 0x0000CA10
LXT_EN_MAP9: EQU 0x0000CA06
LXT_EN_MAP8: EQU 0x0000C9FC
LXT_EN_MAP7: EQU 0x0000C9EF
LXT_EN_MAP6: EQU 0x0000C9E3
LXT_EN_MAP5: EQU 0x0000C9D7
LXT_EN_MAP4: EQU 0x0000C9CC
LXT_EN_MAP3: EQU 0x0000C9BF
LXT_EN_MAP2: EQU 0x0000C9B6
LXT_EN_MAP1: EQU 0x0000C9A4
LXT_EN_END: EQU 0x0000C9A4
LXT_ENZ: EQU 0x0000C9A3
LXT_EN24: EQU 0x0000C9A3
LXT_EN23: EQU 0x0000C97D
LXT_EN22: EQU 0x0000C920
LXT_EN21: EQU 0x0000C8D2
LXT_EN20: EQU 0x0000C831
LXT_EN19: EQU 0x0000C7E1
LXT_EN18: EQU 0x0000C794
LXT_EN17: EQU 0x0000C742
LXT_EN16: EQU 0x0000C63E
LXT_EN15: EQU 0x0000C55D
LXT_EN14: EQU 0x0000C4C4
LXT_EN13: EQU 0x0000C43A
LXT_EN12: EQU 0x0000C3BF
LXT_EN11: EQU 0x0000C302
LX_TUCK_DAT: EQU 0x0000E127
LX_TLAY_DAT: EQU 0x0000EA41
LXT_EN10: EQU 0x0000C302
LXT_EN9: EQU 0x0000C23E
LXT_EN8: EQU 0x0000C1EF
LXT_EN7: EQU 0x0000C199
LXT_EN6: EQU 0x0000C107
LXT_EN5: EQU 0x0000C0DB
LXT_EN4: EQU 0x0000C096
LXT_EN3: EQU 0x0000C049
LXT_EN1: EQU 0x0000C000
MPAGE7_INI: EQU 0x0000C000
MPAGE6_END: EQU 0x0000FFFD
LX_AYS_SWORDB: EQU 0x0000FFEF
LXT_RS3: EQU 0x0000CA89
LX_AYS_SWORDA: EQU 0x0000FFE2
LX_AYS_IRRUPBM: EQU 0x0000FFC4
LX_IVEZ: EQU 0x0000FFC1
LX_IVEO: EQU 0x0000FFB3
LX_IVEN: EQU 0x0000FFA4
LX_IVEM: EQU 0x0000FF95
LX_IVEL: EQU 0x0000FF86
LX_IVEK: EQU 0x0000FF77
LX_IVEI: EQU 0x0000FF45
LX_IVEH: EQU 0x0000FF2C
LX_IVEG: EQU 0x0000FEF9
LXT_ES17: EQU 0x0000FD51
LX_AYS_IRRUP6_05: EQU 0x0000FFD3
LX_AYS_IRRUP6_21: EQU 0x0000FFD9
LX_IVEF: EQU 0x0000FEA2
LX_AYS_IRRUP6_28: EQU 0x0000FFDC
LX_IVEE: EQU 0x0000FE3E
LX_AYS_IRRUP6_31: EQU 0x0000FFDF
LX_AYS_IRRUP6_10: EQU 0x0000FFD6
LX_IVED: EQU 0x0000FDDF
LX_AYS_IRRUPB: EQU 0x0000FFC2
LX_IVEC: EQU 0x0000FD98
LX_IVEB: EQU 0x0000FD58
LX_IVEA: EQU 0x0000FD1B
LX_IRRUPVENTDW: EQU 0x0000FCDC
LX_ISAZ: EQU 0x0000FCDB
LX_ISAO: EQU 0x0000FCD7
LX_ISAN: EQU 0x0000FCA1
LX_ISAM: EQU 0x0000FC67
LX_ISAL: EQU 0x0000FC27
LX_ISAK: EQU 0x0000FBE1
LX_ISAJ: EQU 0x0000FB88
LX_ISAI: EQU 0x0000FB3F
LX_ISAH: EQU 0x0000FB03
LX_ISAG: EQU 0x0000FAD4
LX_ISAF: EQU 0x0000FAA5
LX_ISAE: EQU 0x0000FA7A
LX_ISAD: EQU 0x0000FA59
LX_ISAC: EQU 0x0000FA3C
LX_ISAB: EQU 0x0000FA23
LX_ISAA: EQU 0x0000FA00
LX_IRRUPSALTO: EQU 0x0000F9F2
LX_SFX_TECLA: EQU 0x0000F9E2
LX_SFX_AHHIT: EQU 0x0000F9CD
LX_SFX_COIN: EQU 0x0000F9B2
LX_FALLDED: EQU 0x0000F9AA
LX_ENEMSWDEDW: EQU 0x0000F994
LX_RATAANI: EQU 0x0000F98E
LX_RATATAB: EQU 0x0000F982
LX_IVENT8: EQU 0x0000F942
LX_IVENT7: EQU 0x0000F8E2
LX_IVENT6: EQU 0x0000F882
LX_IVENT5: EQU 0x0000F7E2
LX_IVENT4: EQU 0x0000F752
LX_IVENT3: EQU 0x0000F6F2
LX_IVENT2: EQU 0x0000F6D2
LX_IVENT1: EQU 0x0000F65A
LX_IRRUP5: EQU 0x0000F5DA
IRRUP4_7: EQU 0x000000A8
IRRUP4_6: EQU 0x00000096
IRRUP4_5: EQU 0x00000076
IRRUP4_4: EQU 0x00000056
IRRUP4_3: EQU 0x00000044
IRRUP4_2: EQU 0x00000024
IRRUP4_1: EQU 0x00000020
IRRUP4_0: EQU 0x00000000
LX_IRRUP4: EQU 0x0000F520
LX_IRRUP3: EQU 0x0000F48A
LX_IRRUP2: EQU 0x0000F3FA
LX_IRRUP1: EQU 0x0000F3FA
MORTIFIRE: EQU 0x0000F3EA
MORTIWALL: EQU 0x0000F1E2
LXSPCUR: EQU 0x0000F3AE
DIANA: EQU 0x0000F18E
LX_RATA_11: EQU 0x00000100
LX_RATA_10: EQU 0x000000DC
LX_RATA_9: EQU 0x000000B8
LX_RATA_8: EQU 0x000000B0
LX_RATA_7: EQU 0x000000A8
LX_RATA_6: EQU 0x00000084
LX_RATA_5: EQU 0x00000060
LX_RATA_4: EQU 0x00000058
LX_RATA_3: EQU 0x00000050
LX_RATA_1: EQU 0x00000008
LX_RATA_0: EQU 0x00000000
RATA: EQU 0x0000F206
HORSE: EQU 0x0000F0BC
PUEOFFB: EQU 0x0000F01C
PUEOFFA: EQU 0x0000EFBC
LX_SHERDED: EQU 0x0000EF3C
LX_ENEMSWDED: EQU 0x0000EEBC
LX_SHERSWWFALL: EQU 0x0000EE3A
LX_ENEMSWWFALL: EQU 0x0000EDB8
LX_PROTFALL_9: EQU 0x000000FE
LX_PROTFALL_8: EQU 0x000000CC
LX_PROTFALL_7: EQU 0x000000A8
LX_PROTFALL_6: EQU 0x000000A0
LX_PROTFALL_5: EQU 0x00000098
LX_PROTFALL_4: EQU 0x00000066
LX_PROTFALL_3: EQU 0x00000034
LX_PROTFALL_2: EQU 0x00000010
LX_PROTFALL_1: EQU 0x00000008
LX_PROTFALL_0: EQU 0x00000000
LX_PROTFALL: EQU 0x0000EC88
LX_SWDUMMYDED: EQU 0x0000EC40
LX_ENEMBOW_DED: EQU 0x0000EBFE
LX_PROTDED_7: EQU 0x000000E0
LX_PROTDED_6: EQU 0x000000A0
LX_PROTDED_5: EQU 0x00000098
LX_PROTDED_4: EQU 0x00000090
LX_PROTDED_3: EQU 0x00000050
LX_PROTDED_2: EQU 0x00000010
LX_PROTDED_1: EQU 0x00000008
LX_PROTDED_0: EQU 0x00000000
LX_PROTDED: EQU 0x0000EADE
SHERSWM2_23: EQU 0x00000426
SHERSWM2_21: EQU 0x000003C6
SHERSWM2_19: EQU 0x00000366
SHERSWM2_18: EQU 0x00000336
SHERSWM2_17: EQU 0x00000306
SHERSWM2_15: EQU 0x000002A6
SHERSWM2_14: EQU 0x00000284
SHERSWM2_13: EQU 0x00000254
SHERSWM2_11: EQU 0x000001F4
SHERSWM2_10: EQU 0x000001C4
SHERSWM2_9: EQU 0x00000194
SHERSWM2_7: EQU 0x00000134
SHERSWM2_6: EQU 0x00000104
SHERSWM2_5: EQU 0x000000D4
SHERSWM2_3: EQU 0x00000082
SHERSWM2_2: EQU 0x00000052
SHERSWM2_1: EQU 0x00000022
SHERSWM1_23: EQU 0x00000418
SHERSWM1_22: EQU 0x000003E8
SHERSWM1_21: EQU 0x000003B8
SHERSWM1_19: EQU 0x00000358
SHERSWM1_18: EQU 0x00000328
SHERSWM1_17: EQU 0x000002F8
SHERSWM1_15: EQU 0x000002A6
SHERSWM1_14: EQU 0x00000276
SHERSWM1_13: EQU 0x00000246
SHERSWM1_11: EQU 0x000001F4
SHERSWM1_10: EQU 0x000001C4
SHERSWM1_9: EQU 0x00000194
SHERSWM1_7: EQU 0x00000134
SHERSWM1_6: EQU 0x00000112
SHERSWM1_5: EQU 0x000000E2
SHERSWM1_2: EQU 0x00000052
SHERSWM1_1: EQU 0x00000022
SHERSWORD_15: EQU 0x000002D2
SHERSWORD_14: EQU 0x000002AE
SHERSWORD_13: EQU 0x0000027C
SHERSWORD_11: EQU 0x00000226
SHERSWORD_10: EQU 0x000001F4
SHERSWORD_9: EQU 0x000001C2
SHERSWORD_7: EQU 0x00000150
SHERSWORD_6: EQU 0x0000011E
SHERSWORD_5: EQU 0x000000DE
SHERSWORD_3: EQU 0x00000088
SHERSWORD_2: EQU 0x00000056
SHERSWORD_1: EQU 0x00000024
ENEMSWM2_23: EQU 0x00000418
ENEMSWM2_22: EQU 0x000003E8
ENEMSWM2_19: EQU 0x00000358
ENEMSWM2_17: EQU 0x000002F8
ENEMSWM2_15: EQU 0x00000298
ENEMSWM2_13: EQU 0x00000246
ENEMSWM2_11: EQU 0x000001E6
ENEMSWM2_10: EQU 0x000001B6
ENEMSWM2_9: EQU 0x00000186
ENEMSWM2_7: EQU 0x00000134
ENEMSWM2_6: EQU 0x00000104
ENEMSWM2_5: EQU 0x000000D4
ENEMSWM2_3: EQU 0x00000082
ENEMSWM2_2: EQU 0x00000052
ENEMSWM2_1: EQU 0x00000022
ENEMSWM1_23: EQU 0x000003FC
ENEMSWM1_22: EQU 0x000003CC
ENEMSWM1_21: EQU 0x0000039C
ENEMSWM1_19: EQU 0x0000034A
ENEMSWM1_18: EQU 0x0000031A
ENEMSWM1_17: EQU 0x000002EA
ENEMSWM1_15: EQU 0x00000298
ENEMSWM1_14: EQU 0x00000268
ENEMSWM1_13: EQU 0x00000238
ENEMSWM1_11: EQU 0x000001E6
ENEMSWM1_10: EQU 0x000001B6
ENEMSWM1_9: EQU 0x00000186
ENEMSWM1_7: EQU 0x00000134
ENEMSWM1_6: EQU 0x00000112
ENEMSWM1_5: EQU 0x000000E2
ENEMSWM1_3: EQU 0x00000082
ENEMSWM1_2: EQU 0x00000052
ENEMSWM1_1: EQU 0x00000022
ENEMSWORD_15: EQU 0x000002C4
ENEMSWORD_14: EQU 0x000002A0
ENEMSWORD_13: EQU 0x0000026E
ENEMSWORD_11: EQU 0x00000218
ENEMSWORD_10: EQU 0x000001E6
ENEMSWORD_9: EQU 0x000001B4
ENEMSWORD_7: EQU 0x00000150
ENEMSWORD_6: EQU 0x0000011E
ENEMSWORD_5: EQU 0x000000DE
ENEMSWORD_3: EQU 0x00000088
ENEMSWORD_2: EQU 0x00000056
ENEMSWORD_1: EQU 0x00000024
PROTSWB_10: EQU 0x000001D2
PROTSWB_9: EQU 0x000001A2
PROTSWB_7: EQU 0x00000142
PROTSWB_6: EQU 0x00000112
PROTSWB_3: EQU 0x00000082
PROTSWB_2: EQU 0x00000060
PROTSWB_1: EQU 0x00000030
PROTSWHL_11: EQU 0x000001F4
PROTSWHL_10: EQU 0x000001C4
PROTSWHL_9: EQU 0x00000194
PROTSWHL_7: EQU 0x00000134
PROTSWHL_6: EQU 0x00000104
PROTSWHL_5: EQU 0x000000D4
PROTSWHL_3: EQU 0x00000082
PROTSWHL_2: EQU 0x00000052
PROTSWHL_1: EQU 0x00000022
PROTSWHM_11: EQU 0x00000202
PROTSWHM_10: EQU 0x000001D2
PROTSWHM_9: EQU 0x000001A2
PROTSWHM_7: EQU 0x00000142
PROTSWHM_6: EQU 0x00000112
PROTSWHM_5: EQU 0x000000E2
LXT_RS_MAP14: EQU 0x0000D479
PROTSWHM_3: EQU 0x00000082
PROTSWHM_2: EQU 0x00000052
PROTSWHH_11: EQU 0x000001F4
PROTSWHH_10: EQU 0x000001C4
PROTSWHH_9: EQU 0x00000194
PROTSWHH_7: EQU 0x00000134
PROTSWHH_5: EQU 0x000000E2
PROTSWHH_3: EQU 0x00000082
PROTSWHH_1: EQU 0x00000022
PROTSWORD_15: EQU 0x00000318
PROTSWORD_14: EQU 0x000002F4
PROTSWORD_13: EQU 0x000002C2
PROTSWORD_11: EQU 0x0000025E
PROTSWORD_10: EQU 0x0000022C
PROTSWORD_9: EQU 0x000001FA
PROTSWORD_7: EQU 0x00000188
PROTSWORD_6: EQU 0x00000148
PROTSWORD_5: EQU 0x00000108
PROTSWORD_3: EQU 0x000000A4
PROTSWORD_2: EQU 0x00000072
PROTSWORD_1: EQU 0x00000032
LX_AYSOUND_BUK: EQU 0x0000C694
LX_CLX_BLK: EQU 0x0000C65C
LX_CLX_TRUE: EQU 0x0000C672
LX_CLX_SPR: EQU 0x0000C638
LX_CLX_CNT1: EQU 0x0000C646
LX_CLX_BORD: EQU 0x0000C66A
LX_CLX_CLEAR: EQU 0x0000C680
LX_BLCOPY_BUK6: EQU 0x0000C512
RUTALT6: EQU 0x0000C50A
LX_CLENEM6: EQU 0x0000C400
JPUPDANIM6: EQU 0x0000C3C4
LX_DIMXY6: EQU 0x0000C3A8
LX_GAB6: EQU 0x0000C302
LX_COLCAE6: EQU 0x0000C2E8
LX_COLDETAR6: EQU 0x0000C2B2
LX_COLDEPELD6: EQU 0x0000C2AC
LX_COLDRBRD6: EQU 0x0000C2A8
LX_COLDEPASE6: EQU 0x0000C2A8
LX_COLDECERCA6: EQU 0x0000C2A0
LX_COLDETC6: EQU 0x0000C1CE
LX_COLDET6: EQU 0x0000C1AC
LX_SPRCRIP: EQU 0x0000C094
LX_ORIORI6: EQU 0x0000C08E
LX_ORIDES6: EQU 0x0000C08C
LX_SPR_BUK6: EQU 0x0000C068
LX_SPRITE6: EQU 0x0000C03C
LX_SPRITE_O6: EQU 0x0000C02C
LX_SPRITE_D6: EQU 0x0000C016
LX_SPRITE_OO6: EQU 0x0000C000
MPAGE6_INI: EQU 0x0000C000
MPAGE4_END: EQU 0x0000FF00
PINCHOS6: EQU 0x0000FEFC
PINCHOS5: EQU 0x0000FEF8
PINCHOS4: EQU 0x0000FEF4
PINCHOS3: EQU 0x0000FEF0
PINCHOS2: EQU 0x0000FEEC
PINCHOS1: EQU 0x0000FEE8
CRUZPUZZLE1: EQU 0x0000FEDD
ESCALFLECH1: EQU 0x0000FEDB
RATAPUZZLE3: EQU 0x0000FED0
RATAPUZZLE2: EQU 0x0000FEC5
RATAPUZZLE1: EQU 0x0000FEBA
TARGETPUZZLE4: EQU 0x0000FEAF
TARGETPUZZLE3: EQU 0x0000FEA4
TARGETPUZZLE2: EQU 0x0000FE99
TARGETPUZZLE1: EQU 0x0000FE8E
ARCHERPUZZLE3: EQU 0x0000FE83
ARCHERPUZZLE2: EQU 0x0000FE78
ARCHERPUZZLE1: EQU 0x0000FE6C
ARCHER5MAD: EQU 0x0000FE66
ARCHER9: EQU 0x0000FE60
ARCHER4: EQU 0x0000FE5A
ARCHER3: EQU 0x0000FE53
ARCHER2: EQU 0x0000FE4D
ARCHER1: EQU 0x0000FE47
DUMMYRD: EQU 0x0000FE47
LX_SCD_R51: EQU 0x0000FB7B
LX_SCD_R50: EQU 0x0000FA65
LX_SCD_R49: EQU 0x0000F8E0
LX_SCD_R43: EQU 0x0000F795
LX_SCD_R42: EQU 0x0000F68D
LX_SCD_R41: EQU 0x0000F539
LX_SCD_R59: EQU 0x0000EC26
LX_SCD_R58: EQU 0x0000EAF0
LX_SCD_R57: EQU 0x0000E9F2
LX_SCD_R56: EQU 0x0000E8FC
LX_SCD_R35: EQU 0x0000E76E
LX_SCD_R34: EQU 0x0000E623
LX_SCD_R33: EQU 0x0000E4C7
LX_SCD_R32: EQU 0x0000E36C
LX_SCD_R28: EQU 0x0000E223
LX_SCD_R27: EQU 0x0000E0D1
LX_SCD_R26: EQU 0x0000DF60
LX_SCD_R25: EQU 0x0000DDFD
LX_SCD_R24: EQU 0x0000DC97
LX_SCD_R23: EQU 0x0000DB4A
LX_SCD_R22: EQU 0x0000D9E3
LX_SCD_R21: EQU 0x0000D880
LX_SCD_R14: EQU 0x0000D7A8
LX_SCD_R02: EQU 0x0000D696
LX_SCD_R38: EQU 0x0000CC10
LX_SCD_R37: EQU 0x0000CAD5
LX_SCD_R36: EQU 0x0000C8DC
LX_SCD_R31: EQU 0x0000C746
LX_SCD_R30: EQU 0x0000C5B3
LX_SCD_R29: EQU 0x0000C453
LX_SCD_R20: EQU 0x0000C2DD
LX_SCD_R19: EQU 0x0000C196
LX_SCG_RICH: EQU 0x0000CD9E
LX_SCD_R18: EQU 0x0000C000
MPAGE4_INI: EQU 0x0000C000
MPAGE3_END: EQU 0x0000FF31
LX_SCD_R55: EQU 0x0000F60A
LX_SCD_R53: EQU 0x0000F43D
LX_SCD_R48: EQU 0x0000F108
LX_SCD_R47: EQU 0x0000EF8A
LX_SCD_R46: EQU 0x0000EE11
LX_SCD_R45: EQU 0x0000EC89
LX_SCD_R44: EQU 0x0000EB37
LX_SCD_R40: EQU 0x0000E9E0
LX_SCD_R39: EQU 0x0000E8F3
LX_SCD_R17: EQU 0x0000E7EA
LX_SCD_R16: EQU 0x0000E6C7
LX_SCG_MKTOWN: EQU 0x0000F7B3
LX_SCD_R15: EQU 0x0000E580
LX_SCD_R62: EQU 0x0000DDE2
LX_SCD_R61: EQU 0x0000DC31
LX_SCD_R60: EQU 0x0000DAB6
LX_SCD_R12: EQU 0x0000D942
LX_SCD_R11: EQU 0x0000D7AA
LX_SCD_R10: EQU 0x0000D667
LX_SCG_CASTLE: EQU 0x0000DF73
LX_SCD_R09: EQU 0x0000D4AF
LX_SCD_R08: EQU 0x0000CB27
LX_SCD_R07: EQU 0x0000C94A
LX_SCD_R06: EQU 0x0000C775
LX_SCD_R05: EQU 0x0000C563
LX_SCD_R04: EQU 0x0000C35E
LX_SCD_R03: EQU 0x0000C1B3
MPAGE3_INI: EQU 0x0000C000
MPAGE52_END: EQU 0x0000BFD8
MSTACKEND: EQU 0x0000BFD8
LX_LDIRNBY: EQU 0x0000BFB0
LX_LDIRDES: EQU 0x0000BFAC
LX_LDIRORI: EQU 0x0000BFAA
LX_RLE_XIT: EQU 0x0000BF5C
LX_RLE_BUK: EQU 0x0000BF42
LX_RLE_CHAR: EQU 0x0000BF44
LX_RLE_RET: EQU 0x0000BF42
LX_TILE: EQU 0x0000BEB2
LX_SCRLE_BUK: EQU 0x0000BEA4
LX_TILEDIR: EQU 0x0000BEB6
LX_SNWSND_RLEB: EQU 0x0000BD82
LX_SNWSND_RLE: EQU 0x0000BD74
LX_SQWSND_CONT: EQU 0x0000BCDA
LX_SND_EXIT: EQU 0x0000BCBA
LX_SQWSNDBUK: EQU 0x0000BCC6
LX_SNWSNDBUK: EQU 0x0000BCF6
POK: EQU 0x00000097
PJP: EQU 0x00000096
CLX: EQU 0x00000094
AYS: EQU 0x00000093
MUS: EQU 0x00000092
SND: EQU 0x00000091
COP: EQU 0x00000090
GAB: EQU 0x0000008F
CLE: EQU 0x0000008E
SPD: EQU 0x0000008D
LDI: EQU 0x0000008C
SPO: EQU 0x0000008B
FLE: EQU 0x0000008A
ESC: EQU 0x00000089
FIN: EQU 0x00000088
PAG: EQU 0x00000087
LOC: EQU 0x00000086
DXY: EQU 0x00000085
LX_SCG_INT2: EQU 0x0000FCBA
DIR: EQU 0x00000084
ENEMSWM2_14: EQU 0x00000276
CLD: EQU 0x00000083
RLE: EQU 0x00000082
SPR: EQU 0x00000081
LSE: EQU 0x00000014
LX_K_SPRT2: EQU 0x0000BC58
MSTK_CTRL_P7: EQU 0x0000EAE5
MSTK_CTRL_P: EQU 0x0000BC31
LX_L_ANTIBREAK: EQU 0x0000BE5C
LX_7_RETURN: EQU 0x0000BE4C
LX_B_GOSUB: EQU 0x0000BE0E
LX_9_CBUCLE: EQU 0x0000BE3A
LX_K_SPRT: EQU 0x0000BC3E
LX_SWGESTF: EQU 0x0000BBB6
LX_SWGEST: EQU 0x0000BBC6
TABTECJMP: EQU 0x0000BBA6
LX_MORTARMTAB: EQU 0x0000BB9E
LX_MORTITAB: EQU 0x0000BB96
WASP: EQU 0x0000F07C
LX_ADDSPANI: EQU 0x0000BB8C
LX_ADDSPTAB: EQU 0x0000BB74
SWORD: EQU 0x0000EA1E
LX_SWORDTAB: EQU 0x0000BB64
SHERSWM2_20: EQU 0x00000396
SHERSWM2_16: EQU 0x000002D6
SHERSWM2_12: EQU 0x00000224
SHERSWM2_8: EQU 0x00000164
SHERSWM2_4: EQU 0x000000B2
SHERSWM2_0: EQU 0x00000000
SHERSWM2: EQU 0x0000E5C8
SHERSWM1_20: EQU 0x00000388
SHERSWM1_16: EQU 0x000002D6
SHERSWM1_12: EQU 0x00000224
SHERSWM1_8: EQU 0x00000164
SHERSWM1_4: EQU 0x000000B2
SHERSWM1_0: EQU 0x00000000
SHERSWM1: EQU 0x0000E180
ENEMSWM2_20: EQU 0x00000388
ENEMSWM2_16: EQU 0x000002C8
ENEMSWM2_12: EQU 0x00000216
ENEMSWM2_8: EQU 0x00000164
ENEMSWM2_4: EQU 0x000000B2
ENEMSWM2: EQU 0x0000DA34
ENEMSWM1_20: EQU 0x0000037A
ENEMSWM1_16: EQU 0x000002C8
ENEMSWM1_12: EQU 0x00000216
ENEMSWM1_8: EQU 0x00000164
ENEMSWM1_4: EQU 0x000000B2
ENEMSWM1_0: EQU 0x00000000
ENEMSWM1: EQU 0x0000D608
LX_ESWHBTAB: EQU 0x0000BB26
SWDUMMY: EQU 0x0000D2AC
SHERSWORD_12: EQU 0x00000258
SHERSWORD_8: EQU 0x00000190
SHERSWORD_4: EQU 0x000000BA
SHERSWORD: EQU 0x0000DE7C
ENEMSWORD_12: EQU 0x0000024A
ENEMSWORD_8: EQU 0x00000190
ENEMSWORD_4: EQU 0x000000BA
ENEMSWORD_0: EQU 0x00000000
ENEMSWORD: EQU 0x0000D312
LX_ESWWTABA: EQU 0x0000BB12
LX_ESWWTAB: EQU 0x0000BB10
PROTSWB_8: EQU 0x00000172
PROTSWB_4: EQU 0x000000B2
PROTSWB_0: EQU 0x00000000
PROTSWB: EQU 0x0000D07A
PROTSWHL_8: EQU 0x00000164
PROTSWHL_4: EQU 0x000000B2
PROTSWHL_0: EQU 0x00000000
ENEMSWM2_0: EQU 0x00000000
PROTSWHL: EQU 0x0000CE56
PROTSWHM_8: EQU 0x00000172
PROTSWHM_4: EQU 0x000000B2
PROTSWHM_0: EQU 0x00000000
PROTSWHM: EQU 0x0000CC24
PROTSWHH_8: EQU 0x00000164
PROTSWHH_4: EQU 0x000000B2
PROTSWHH_0: EQU 0x00000000
PROTSWHH: EQU 0x0000CA00
LX_SWWHBANI: EQU 0x0000BAF0
LX_PSWHBTAB: EQU 0x0000BAD2
LX_PROTQUIETO: EQU 0x0000BACA
LX_PROTCAETABAN: EQU 0x0000BAC6
ENEMSWM2_21: EQU 0x000003B8
LX_PROTCAETAB: EQU 0x0000BABA
LX_FLECHATAB: EQU 0x0000BAA6
LX_EBSHTTAB: EQU 0x0000BA90
LX_EBAIMTAB: EQU 0x0000BA7A
LX_PBSHTTAB: EQU 0x0000BA66
LX_PBAIMTAB: EQU 0x0000BA52
LX_SDTAB: EQU 0x0000BA2C
LX_SDANIM: EQU 0x0000BA1B
LX_SIANIM: EQU 0x0000BA1B
LX_SITAB: EQU 0x0000B9F5
LX_RDTAB: EQU 0x0000B9DF
LX_RIANIM: EQU 0x0000B9D6
LX_RITAB: EQU 0x0000B9C0
LX_TABANIE: EQU 0x0000B9C0
SWR: EQU 0x000000B5
LX_SWWR: EQU 0x000000B5
SWL: EQU 0x000000B7
LX_SWWL: EQU 0x000000B7
PROTSWORD_12: EQU 0x00000290
PROTSWORD_8: EQU 0x000001C8
PROTSWORD_4: EQU 0x000000D6
PROTSWORD_0: EQU 0x00000000
PROTSWORD: EQU 0x0000C6B6
LX_SWW: EQU 0x0000B9B5
LX_PSWWTABA: EQU 0x0000B9AB
ESD: EQU 0x0000009F
LX_ESCD: EQU 0x0000009F
ESQ: EQU 0x000000A0
LX_ESCQ: EQU 0x000000A0
ESU: EQU 0x000000A1
LX_ESCU: EQU 0x000000A1
LX_ESCANIM: EQU 0x0000B99F
LX_ESCTABA: EQU 0x0000B98D
LX_ESCTAB: EQU 0x0000B98B
LX_TABANII: EQU 0x0000B98B
PADDING: EQU 0x0000B98B
VARS_END: EQU 0x0000B98B
LX_CQU_PRT: EQU 0x0000EB0B
LX_CPA_PRT: EQU 0x0000EAF5
LX_CFG_PRT: EQU 0x0000EBAF
LX_CAB_PRT: EQU 0x0000EB8D
LX_CAR_PRT: EQU 0x0000EB6B
LX_CDE_PRT: EQU 0x0000EB49
LX_CIZ_PRT: EQU 0x0000EB27
POKKEYINI: EQU 0x0000B948
POKKEYEND: EQU 0x0000B96E
VARL_X: EQU 0x0000B8F1
VARL_P: EQU 0x0000B8D9
LX_UNO: EQU 0x0000B8C7
LX_CERO: EQU 0x0000B8BF
TABSPRAEND: EQU 0x0000B8BE
FVRDEST: EQU 0x0000B886
TABSPRLINI: EQU 0x0000B883
TABSPRLEND: EQU 0x0000B89F
TABSPRCINI: EQU 0x0000B864
TABSPRCEND: EQU 0x0000B880
VARL_N: EQU 0x0000B839
FLECEPH: EQU 0x0000B828
FLECEP: EQU 0x0000B827
LX_CURRLANG: EQU 0x0000DE00
VAR: EQU 0x000000B8
MSTACKSINI: EQU 0x0000B7C0
LX_IAZEE_END: EQU 0x0000B7B4
LX_IAZR06: EQU 0x0000B7B4
LX_IAZR05: EQU 0x0000B7A3
LX_IAZR04: EQU 0x0000B792
LX_IAZR03: EQU 0x0000B780
LX_IAZR02: EQU 0x0000B75F
LX_IAZS06: EQU 0x0000B58E
LX_IAZS05: EQU 0x0000B57D
LX_IAZS04: EQU 0x0000B56E
LX_IAZS03: EQU 0x0000B55D
LX_IAZS02: EQU 0x0000B53C
LX_IAZEE_ES1: EQU 0x0000B353
LX_IAZE06: EQU 0x0000B353
LX_IAZE05: EQU 0x0000B345
LX_IAZE04: EQU 0x0000B335
LX_IAZE03: EQU 0x0000B325
LX_IAZE02: EQU 0x0000B304
LX_IAZEE_EN1: EQU 0x0000B14B
LX_IAZEE: EQU 0x0000B14B
TSTMENUEND: EQU 0x0000B14B
LX_LEG2_FNT: EQU 0x0000ABAB
LX_LEG1_FNT: EQU 0x0000A3DC
LX_MENU_FNT: EQU 0x0000A1F2
RESTVARE: EQU 0x0000A19F
VARL_F: EQU 0x0000B833
RESTVAR: EQU 0x0000A193
LX_TST6L_KMSK: EQU 0x0000A166
LX_TST6_LOOP: EQU 0x0000A14E
LX_LEG2_DAT: EQU 0x0000AA8A
LX_TSTMENU_RET3: EQU 0x0000A14E
LX_LEG1_DAT: EQU 0x0000A2AF
LX_TSTMENU_RET2: EQU 0x0000A126
LX_TST3_KMSK: EQU 0x0000A0A3
LX_TST2_KMSK: EQU 0x0000A0A2
LX_TST6: EQU 0x0000A0F8
LX_TST6_KMSK: EQU 0x0000A0A5
LX_TST5: EQU 0x0000A0C8
LX_TST5_KMSK: EQU 0x0000A0A5
LX_TST4: EQU 0x0000A0A6
LX_TST4_KMSK: EQU 0x0000A0A4
LX_TST_MEN_EXIT: EQU 0x0000A167
LX_TSTMENU_LOOP: EQU 0x0000A05C
LX_PJP_BARDWN: EQU 0x0000F36C
LX_TMEN_DAT: EQU 0x0000A19F
LX_TSTMENU_RET: EQU 0x0000A05C
LX_RLE_RETS: EQU 0x0000BF24
LX_TST_MEN_DEP: EQU 0x0000A02E
LX_TST_KMSK: EQU 0x0000A02D
LX_TST_MEN_SK: EQU 0x0000A016
LX_TST_KMSM: EQU 0x0000A02C
PRAMT: EQU 0x00005CB4
RAMTOP: EQU 0x00005CB2
NMIADD: EQU 0x00005CB0
MEMBOT: EQU 0x00005C92
PFLAG: EQU 0x00005C91
MASKT: EQU 0x00005C90
ATTRT: EQU 0x00005C8F
MASKP: EQU 0x00005C8E
ATTRP: EQU 0x00005C8D
SCRCT: EQU 0x00005C8C
SPOSNL: EQU 0x00005C8A
SPOSNH: EQU 0x00005C89
DFCCL: EQU 0x00005C86
DFCC: EQU 0x00005C84
ECHOE: EQU 0x00005C82
PRCC: EQU 0x00005C80
PPOSN: EQU 0x00005C7F
COORDS: EQU 0x00005C7D
UDG: EQU 0x00005C7B
SEED: EQU 0x00005C76
TADDR: EQU 0x00005C74
STRLEN: EQU 0x00005C72
FLAGX: EQU 0x00005C71
OSPPC: EQU 0x00005C70
OLDPPCH: EQU 0x00005C6F
OLDPPC: EQU 0x00005C6E
STOP: EQU 0x00005C6C
DFSZ: EQU 0x00005C6B
FLAGS2: EQU 0x00005C6A
MEM: EQU 0x00005C68
BREG: EQU 0x00005C67
STKEND: EQU 0x00005C65
STKBOT: EQU 0x00005C63
WORKSP: EQU 0x00005C61
XPTR: EQU 0x00005C5F
CHADD: EQU 0x00005C5D
KCUR: EQU 0x00005C5B
BASICPRGFIN: EQU 0x00009F9A
ELINE: EQU 0x00005C59
DATADD: EQU 0x00005C57
NXTLIN: EQU 0x00005C55
PROG: EQU 0x00005C53
CURCHL: EQU 0x00005C51
PROTSWB_5: EQU 0x000000E2
CHANS: EQU 0x00005C4F
DEST: EQU 0x00005C4D
VARS: EQU 0x00005C4B
EPPC: EQU 0x00005C49
SUBPPC: EQU 0x00005C47
PPC: EQU 0x00005C45
NSPPC: EQU 0x00005C44
NEWPPC: EQU 0x00005C42
MODE: EQU 0x00005C41
MSTK_CTRL: EQU 0x0000BC2E
LX_ERRSP: EQU 0x0000BBE8
ERRSP: EQU 0x00005C3D
TVFLAG: EQU 0x00005C3C
FLAGS: EQU 0x00005C3B
ERRNR: EQU 0x00005C3A
NEW_CHANSE: EQU 0x00005C3A
PIP: EQU 0x00005C39
RASP: EQU 0x00005C38
STRMS: EQU 0x00005C10
TVDATA: EQU 0x00005C0E
KDATA: EQU 0x00005C0D
DEFADD: EQU 0x00005C0B
REPPER: EQU 0x00005C0A
REPDEL: EQU 0x00005C09
CTRL_READ: EQU 0x00005C08
CTRL_SIDE: EQU 0x00005C07
KSTATE: EQU 0x00005C00
LX_RUSS_GFXW: EQU 0x00005BD5
LX_POKE: EQU 0x0000BFB8
LX_PRINTJMP: EQU 0x0000BDBC
LX_COLEXX_INI: EQU 0x0000C5E6
LX_COLEXX: EQU 0x0000C5F2
LX_AYSOUND: EQU 0x0000C684
LX_SOUND: EQU 0x0000BC7E
LX_BLCOPY6: EQU 0x0000C50A
LX_LDIR: EQU 0x0000BF66
LX_SPEXIT: EQU 0x0000BC6A
LX_SPAG: EQU 0x0000BDA4
LX_ATREL: EQU 0x0000BDEC
LX_CHRABS: EQU 0x0000BDD0
LX_SCRLE: EQU 0x0000BE6A
SHERSWORD_0: EQU 0x00000000
LX_K_TABLAJP: EQU 0x00005BA5
SPECESCC: EQU 0x00005BA4
SPECESCL: EQU 0x00005BA3
SPECRDC: EQU 0x00005B9F
SPECRDL_D: EQU 0x00005B9E
SPECRDL_C: EQU 0x00005B9D
SPECRDL_B: EQU 0x00005B9C
SPECRDL_A: EQU 0x00005B9B
SPECRDL: EQU 0x00005B9B
TIPOBJ: EQU 0x00005B9A
TABCHANS: EQU 0x00005B85
ESWBESTM: EQU 0x00005B6D
LX_FLEHITPRO: EQU 0x00005B6C
TMP_S: EQU 0x00005B6A
BTMPESPOSNH: EQU 0x00005B69
BTMPESPOSN: EQU 0x00005B68
BTMPEDFCC: EQU 0x00005B66
TMPESPOSNH: EQU 0x00005B65
TMPESPOSN: EQU 0x00005B64
TMPEDFCC: EQU 0x00005B62
LX_IRRUPVENT: EQU 0x0000FCDE
QKINC: EQU 0x00005B5C
LX_VAR_B_F: EQU 0x00005B58
LX_CONT_WAT: EQU 0x00005B55
LX_CONT_WAO: EQU 0x00005B53
LX_CONT_WAS: EQU 0x00005B51
LX_CONT_MOR: EQU 0x00005B4F
LX_CONT_SWO: EQU 0x00005B4D
LX_CONT_BOW: EQU 0x00005B4B
LX_CONT_VAI: EQU 0x00005B49
LX_CONT_FRE: EQU 0x00005B47
LXT_MAP_PLC: EQU 0x0000F21B
LXT_MAP_PLW: EQU 0x00005B45
BASICPRGINI: EQU 0x00005CB6
LX_PROG: EQU 0x00005B43
LX_IRRUPVARS: EQU 0x0000F9F2
LX_IRRUPVL: EQU 0x00005B41
VARS_MAIN: EQU 0x0000B800
LX_VARZONE: EQU 0x00005B3F
RESPAWN_SCR: EQU 0x00005B3E
PAGKEY_SW: EQU 0x00005B3D
PAGKEY_AR: EQU 0x00005B3C
LX_MUS_INI: EQU 0x00005B2A
LX_CLX_SPRFLAG: EQU 0x00005B28
LX_CLX_BLKFLAG: EQU 0x00005B27
LX_CLX_BORFLAG: EQU 0x00005B26
LX_CLX_TRUFLAG: EQU 0x00005B25
MS_CTRL_QU: EQU 0x00005B12
MS_CTRL_PA: EQU 0x00005B11
MS_CTRL_FG: EQU 0x00005B10
MS_CTRL_AB: EQU 0x00005B0F
MS_CTRL_AR: EQU 0x00005B0E
MS_CTRL_DE: EQU 0x00005B0D
ANI: EQU 0x00000080
MS_CTRL_IZ: EQU 0x00005B0C
LX_KEYMSK: EQU 0x00005B0C
LXSTOP: EQU 0x00005B0A
LXLANG: EQU 0x00005B09
LX_MAINBUKH: EQU 0x00005B08
LX_MAINBUKL: EQU 0x00005B07
CTRL_QUI: EQU 0x00005B06
CTRL_PAU: EQU 0x00005B05
CTRL_FUE: EQU 0x00005B04
CTRL_ABA: EQU 0x00005B03
CTRL_ARR: EQU 0x00005B02
CTRL_DER: EQU 0x00005B01
CTRL_IZQ: EQU 0x00005B00
MPAGE52_INI: EQU 0x00004000
MPAGE1_END: EQU 0x0000FFF4
LXMUSCNT: EQU 0x00005B2A
LX_RUSS_OC: EQU 0x0000A13B
LX_RUSS_OB: EQU 0x0000A0F3
LX_RUSS_OA: EQU 0x0000A000
PANTFONDO: EQU 0x0000A000
LX_RUSS_LC: EQU 0x00000024
LX_RUSS_LB: EQU 0x00000048
LX_RUSS_LA: EQU 0x000000F3
LX_RUSS_DC: EQU 0x0000ED62
LX_SCG_INT1: EQU 0x0000ED4F
LX_RUSS_DB: EQU 0x0000CD05
LX_SCG_WILD: EQU 0x0000CCF2
LX_RUSS_DA: EQU 0x0000E1C7
LX_MRK_FNT: EQU 0x0000E1B4
LX_RUSS_GFXL: EQU 0x0000015F
LX_RUSS_GFX: EQU 0x0000FE95
LX_ARCHAIMC: EQU 0x0000FB30
LX_ARCHAIM: EQU 0x0000F804
LX_END_FNT: EQU 0x0000EF15
LX_FINAL_DAT: EQU 0x0000ED8B
LX_SCD_R64: EQU 0x0000E2EB
LX_SCD_R63: EQU 0x0000DC9A
LX_SCD_R54: EQU 0x0000DADD
LX_SCG_WILDC: EQU 0x0000DE73
LX_SCD_R13: EQU 0x0000D94C
LX_SFX_HORS: EQU 0x0000D38C
LX_SFX_CAID: EQU 0x00001000
LX_SFX_JUMP: EQU 0x0000D366
LX_SFX_CHIT: EQU 0x0000D05A
LX_SFX_HIT: EQU 0x000016C0
LX_SFX_SHT: EQU 0x0000CDFA
LXFINR_CHC: EQU 0x0000CC86
LXFINR_CHB: EQU 0x0000CB3E
LXFINR_CHA: EQU 0x0000CA6D
LXFIN_CHC: EQU 0x0000CC86
LXFIN_CHB: EQU 0x0000CB3E
LXFIN_CHA: EQU 0x0000CA6D
FINAL_R: EQU 0x0000CA67
FINAL_I: EQU 0x0000CA61
LXMUSFIND: EQU 0x0000CA4B
LXOM_RPC: EQU 0x0000CA4A
LXOM_RPB: EQU 0x0000CA3C
LXOM_RPA: EQU 0x0000CA2E
LXGO_CHC: EQU 0x0000CA3D
LXGO_CHB: EQU 0x0000CA30
LXGO_CHA: EQU 0x0000CA21
GOVER_R: EQU 0x0000CA1B
GOVER_I: EQU 0x0000CA15
LXMUSGOVERD: EQU 0x0000C9FF
SIL_CHA: EQU 0x0000C9FD
SILENCIO_R: EQU 0x0000C9F7
SILENCIO_I: EQU 0x0000C9F1
LXMUSSILD: EQU 0x0000C9DF
LXS: EQU 0x000000DF
LXM_RPC: EQU 0x0000C843
LXM_RPA: EQU 0x0000C45E
LXM_CHC: EQU 0x0000C843
LXM_CHB: EQU 0x0000C603
LXM_CHA: EQU 0x0000C45E
HOOD_R: EQU 0x0000C458
HOOD_I: EQU 0x0000C452
LXMUSMEND: EQU 0x0000C43C
LX_TST_MEN: EQU 0x0000A000
LX_TST_FLAG: EQU 0x00005B34
LX_MUS_REP: EQU 0x00005B2C
LX_MUS_RUNCX_RET: EQU 0x0000C33C
LX_MUS_RUNC_RET: EQU 0x0000C336
LX_MUS_RLC_RET: EQU 0x0000C336
PROTSWHH_6: EQU 0x00000112
LX_MUS_SOSTC: EQU 0x0000C3A8
LX_MUS_RLC: EQU 0x0000C39A
LX_MUS_RUNC: EQU 0x0000C400
LX_MUS_PUC: EQU 0x00005B32
LX_MUS_NORUNC_CONT: EQU 0x0000C2C6
LX_MUS_RUNCX: EQU 0x0000C412
LX_MUS_NORUNC: EQU 0x0000C2C6
LX_MUS_CNC: EQU 0x00005B38
LX_MUS_RUNBX_RET: EQU 0x0000C2B2
LX_MUS_RUNB_RET: EQU 0x0000C2AC
LX_MUS_RLB_RET: EQU 0x0000C2AC
LX_MUS_SOSTB: EQU 0x0000C392
LX_MUS_RLB: EQU 0x0000C384
LX_MUS_RUNB: EQU 0x0000C3D8
LX_MUS_PUB: EQU 0x00005B30
LX_MUS_NORUNB_CONT: EQU 0x0000C23C
LX_MUS_RUNBX: EQU 0x0000C3EA
LX_MUS_NORUNB: EQU 0x0000C23C
LX_MUS_CNB: EQU 0x00005B37
LX_MUS_RUNAX_RET: EQU 0x0000C228
VARL_W: EQU 0x0000B81B
LX_MUS_RUNA_RET: EQU 0x0000C222
LX_MUS_RLA_RET: EQU 0x0000C222
LX_MUS_SOSTA: EQU 0x0000C37C
LX_MUS_RLA: EQU 0x0000C36E
LX_MUS_RUNA: EQU 0x0000C3B0
LX_MUS_LOOP: EQU 0x0000C356
LX_MUS_PUA: EQU 0x00005B2E
LX_MUS_NORUNA_CONT: EQU 0x0000C1AA
LX_MUS_RUNAX: EQU 0x0000C3C2
LX_MUS_NORUNA: EQU 0x0000C1AA
LX_MUS_CNA: EQU 0x00005B36
LX_MUS_TEM: EQU 0x00005B34
LX_MUS_TEMPO: EQU 0x0000C18C
LX_MUS_CON: EQU 0x00005B35
LX_MUS_SAMXIT: EQU 0x0000C176
LX_MUS_SAMC: EQU 0x00005B3B
LX_MUS_SAMCX: EQU 0x0000C14E
LX_MUS_SAMB: EQU 0x00005B3A
LX_MUS_SAMBX: EQU 0x0000C126
LX_MUS_SAMA: EQU 0x00005B39
LX_MUS_EXIT: EQU 0x0000C428
LX_MUS_ON: EQU 0x00005B29
LX_MUS_CNT: EQU 0x0000C0F0
LX_MUSIC: EQU 0x0000C0F0
AYDATA: EQU 0x0000BFFD
AYCTRL: EQU 0x0000FFFD
MPAGE1_INI: EQU 0x0000C000
MPAGE0_END: EQU 0x0000FFFE
LX_COLDETER: EQU 0x00005B1D
LX_COLDETER1: EQU 0x0000FFE0
LX_COLDETESC: EQU 0x0000FF9A
WASPX: EQU 0x0000FF8C
CROSSBOW: EQU 0x0000F30E
LX_RDANIM: EQU 0x0000B9D6
LX_FLECHATABENEM: EQU 0x0000FF77
LX_RATA_2: EQU 0x0000002C
GENPOWMORT: EQU 0x0000FF75
GENFLECHAICM: EQU 0x0000FF72
GENFLECHAICE: EQU 0x0000FF6D
GENFLECHAILE: EQU 0x0000FF65
GENFLECHAEC: EQU 0x0000FF5D
GENFLECHAEL: EQU 0x0000FF55
GENFLECHAIC: EQU 0x0000FF4E
GENFLECHAIL: EQU 0x0000FF46
GENFLECHAL: EQU 0x0000FF36
GENFLECHA: EQU 0x0000FF2E
LX_FLCH: EQU 0x0000FF0E
LX_FLCH_ATT: EQU 0x0000FF16
LX_FLENEMSG: EQU 0x0000FF15
GRFBBRICK: EQU 0x0000FF06
GRFESC: EQU 0x0000FEE6
LXSPBLK: EQU 0x0000FEC6
MORTIRARM: EQU 0x0000FEA6
MORTILARM: EQU 0x0000FE86
LX_MORTIANNA_7: EQU 0x000000FC
LX_MORTIANNA_6: EQU 0x000000D8
LX_MORTIANNA_5: EQU 0x000000B4
LX_MORTIANNA_4: EQU 0x00000090
LX_MORTIANNA_3: EQU 0x0000006C
LX_MORTIANNA_2: EQU 0x00000048
LX_MORTIANNA_1: EQU 0x00000024
LX_MORTIANNA_0: EQU 0x00000000
MORTIANNA: EQU 0x0000FD66
PIPISTRELLE: EQU 0x0000FCA6
ADDER: EQU 0x0000FBE6
ADDSPRITES: EQU 0x0000FBE6
LX_FLECHA_23: EQU 0x000001BE
LX_FLECHA_22: EQU 0x0000019C
LX_FLECHA_21: EQU 0x00000196
LXM_RPB: EQU 0x0000C603
LX_FLECHA_20: EQU 0x00000190
LX_FLECHA_19: EQU 0x0000016E
LX_FLECHA_18: EQU 0x00000168
LX_FLECHA_17: EQU 0x00000162
LX_FLECHA_16: EQU 0x00000140
LX_FLECHA_15: EQU 0x0000011E
LX_FLECHA_14: EQU 0x00000118
LX_FLECHA_13: EQU 0x00000104
LX_FLECHA_12: EQU 0x000000F0
LX_FLECHA_11: EQU 0x000000EA
LX_FLECHA_10: EQU 0x000000C8
LX_FLECHA_9: EQU 0x000000A6
LX_FLECHA_8: EQU 0x000000A0
LX_FLECHA_7: EQU 0x0000007E
LX_FLECHA_6: EQU 0x00000078
LX_FLECHA_5: EQU 0x00000056
LX_FLECHA_4: EQU 0x00000034
LX_FLECHA_3: EQU 0x0000002E
LX_FLECHA_2: EQU 0x0000001A
LX_FLECHA_1: EQU 0x00000006
LX_FLECHA_0: EQU 0x00000000
FLECHA: EQU 0x0000FA06
ENEMBRLDT: EQU 0x0000F9C6
ENEMBRLD: EQU 0x0000F986
ENEMBSHT_31: EQU 0x000004FE
ENEMBSHT_30: EQU 0x000004CE
ENEMBSHT_29: EQU 0x000004AC
ENEMBSHT_26: EQU 0x00000454
ENEMBSHT_25: EQU 0x00000424
ENEMBSHT_24: EQU 0x00000402
ENEMBSHT_23: EQU 0x000003D2
ENEMBSHT_22: EQU 0x000003A2
ENEMBSHT_21: EQU 0x00000372
ENEMBSHT_20: EQU 0x00000350
ENEMBSHT_19: EQU 0x00000320
ENEMBSHT_18: EQU 0x000002F0
ENEMBSHT_17: EQU 0x000002C0
PROTSWHH_2: EQU 0x00000052
ENEMBSHT_16: EQU 0x00000290
ENEMBSHT_15: EQU 0x00000260
ENEMBSHT_13: EQU 0x00000200
ENEMBSHT_12: EQU 0x000001DE
ENEMBSHT_11: EQU 0x000001BC
TABSPRAINI: EQU 0x0000B8A2
ENEMBSHT_10: EQU 0x0000018C
ENEMBSHT_9: EQU 0x0000015C
ENEMBSHT_8: EQU 0x0000013A
ENEMBSHT_7: EQU 0x0000010A
ENEMBSHT_6: EQU 0x000000DA
ENEMBSHT_5: EQU 0x000000B8
ENEMBSHT_4: EQU 0x000000B2
ENEMBSHT_3: EQU 0x00000082
ENEMBSHT_2: EQU 0x00000052
ENEMBSHT_1: EQU 0x00000022
ENEMBSHT_0: EQU 0x00000000
ENEMBSHT: EQU 0x0000F458
LX_QUIT: EQU 0x0000EC1B
ENEMBAIM_31: EQU 0x000004FE
ENEMBAIM_30: EQU 0x000004CE
ENEMBAIM_29: EQU 0x000004AC
ENEMBAIM_28: EQU 0x000004A6
ENEMBAIM_27: EQU 0x00000484
ENEMBAIM_26: EQU 0x00000454
ENEMBAIM_25: EQU 0x00000424
ENEMBAIM_24: EQU 0x00000402
ENEMBAIM_23: EQU 0x000003D2
ENEMBAIM_22: EQU 0x000003A2
ENEMBAIM_21: EQU 0x00000372
ENEMBAIM_20: EQU 0x00000350
ENEMBAIM_19: EQU 0x00000320
ENEMBAIM_18: EQU 0x000002F0
ENEMBAIM_17: EQU 0x000002C0
ENEMBAIM_16: EQU 0x00000290
ENEMBAIM_15: EQU 0x00000260
ENEMBAIM_14: EQU 0x00000230
ENEMBAIM_13: EQU 0x00000200
ENEMBAIM_12: EQU 0x000001DE
ENEMBAIM_11: EQU 0x000001BC
ENEMBAIM_10: EQU 0x0000018C
ENEMBAIM_9: EQU 0x0000015C
ENEMBAIM_8: EQU 0x0000013A
ENEMBAIM_7: EQU 0x0000010A
ENEMBAIM_6: EQU 0x000000DA
ENEMBAIM_5: EQU 0x000000B8
ENEMBAIM_4: EQU 0x000000B2
ENEMBAIM_3: EQU 0x00000082
ENEMBAIM_2: EQU 0x00000052
ENEMBAIM_1: EQU 0x00000022
GENFLECHAC: EQU 0x0000FF3E
ENEMBAIM_0: EQU 0x00000000
ENEMBAIM: EQU 0x0000EF2A
PROTBSHT_31: EQU 0x0000052E
PROTBSHT_30: EQU 0x000004FC
PROTBSHT_29: EQU 0x000004D8
LX_SCG_CHAPEL: EQU 0x0000E493
PROTBSHT_28: EQU 0x000004D0
PROTBSHT_27: EQU 0x0000049E
PROTBSHT_26: EQU 0x0000046C
PROTBSHT_25: EQU 0x0000043A
PROTBSHT_24: EQU 0x00000416
PROTBSHT_23: EQU 0x000003E4
PROTBSHT_22: EQU 0x000003B2
PROTBSHT_21: EQU 0x00000380
PROTBSHT_20: EQU 0x0000035C
PROTBSHT_19: EQU 0x00000338
PROTBSHT_18: EQU 0x00000314
PROTBSHT_17: EQU 0x000002F0
PROTBSHT_16: EQU 0x000002BE
PROTBSHT_15: EQU 0x0000028C
PROTBSHT_14: EQU 0x0000025A
PROTBSHT_12: EQU 0x00000204
PROTBSHT_11: EQU 0x000001D2
PROTBSHT_10: EQU 0x000001A0
PROTBSHT_9: EQU 0x0000016E
PROTBSHT_8: EQU 0x0000014A
PROTBSHT_7: EQU 0x00000118
PROTBSHT_6: EQU 0x000000E6
PROTBSHT_5: EQU 0x000000C2
PROTBSHT_4: EQU 0x000000BA
PROTBSHT_3: EQU 0x00000088
PROTBSHT_2: EQU 0x00000056
PROTBSHT_1: EQU 0x00000024
PROTBSHT_0: EQU 0x00000000
PROTBSHT: EQU 0x0000E9CA
PROTBOWAIM_39: EQU 0x000006A2
PROTBOWAIM_38: EQU 0x00000670
PROTBOWAIM_37: EQU 0x0000063E
PROTBOWAIM_36: EQU 0x0000061A
PROTBOWAIM_35: EQU 0x00000612
PROTBOWAIM_34: EQU 0x000005EE
PROTBOWAIM_33: EQU 0x000005BC
PROTBOWAIM_32: EQU 0x0000058A
PROTBOWAIM_31: EQU 0x00000558
PROTBOWAIM_30: EQU 0x00000534
PROTBSHT_13: EQU 0x00000228
PROTBOWAIM_29: EQU 0x00000502
PROTBOWAIM_28: EQU 0x000004D0
PROTBOWAIM_27: EQU 0x0000049E
PROTBOWAIM_26: EQU 0x0000046C
PROTBOWAIM_25: EQU 0x00000448
PROTBOWAIM_24: EQU 0x00000416
PROTBOWAIM_23: EQU 0x000003F2
PROTBOWAIM_22: EQU 0x000003CE
PROTBOWAIM_21: EQU 0x0000039C
PROTBOWAIM_20: EQU 0x0000036A
PROTBOWAIM_19: EQU 0x00000338
PROTBOWAIM_18: EQU 0x00000306
PROTBOWAIM_17: EQU 0x000002D4
PROTBOWAIM_16: EQU 0x000002A2
PROTBOWAIM_15: EQU 0x0000027E
PROTBOWAIM_14: EQU 0x0000025A
PROTBOWAIM_13: EQU 0x00000228
PROTBOWAIM_12: EQU 0x000001F6
PROTBOWAIM_11: EQU 0x000001C4
PROTBOWAIM_10: EQU 0x000001A0
PROTBOWAIM_9: EQU 0x0000017C
PROTBOWAIM_8: EQU 0x0000014A
PROTBOWAIM_7: EQU 0x00000118
PROTBOWAIM_6: EQU 0x000000F4
PROTBOWAIM_5: EQU 0x000000EC
PROTBOWAIM_4: EQU 0x000000BA
PROTBOWAIM_3: EQU 0x00000088
PROTBOWAIM_2: EQU 0x00000056
PROTBOWAIM_1: EQU 0x00000024
PROTBOWAIM_0: EQU 0x00000000
PROTBOWAIM: EQU 0x0000E304
PROTBDES: EQU 0x0000E244
PROTBIES: EQU 0x0000E184
PROTSDES: EQU 0x0000E0C4
PROTSBES: EQU 0x0000E004
PROTSWB_11: EQU 0x00000202
PROTESC: EQU 0x0000DC04
LX_PROTCAE_9: EQU 0x00000128
LX_PROTCAE_8: EQU 0x00000104
LX_PROTCAE_7: EQU 0x000000E0
LX_PROTCAE_6: EQU 0x000000AE
LX_PROTCAE_5: EQU 0x000000A6
LX_PROTCAE_4: EQU 0x00000082
LX_PROTCAE_3: EQU 0x0000005E
LX_PROTCAE_2: EQU 0x0000003A
LX_PROTCAE_1: EQU 0x00000008
CLI: EQU 0x00000095
LX_PROTCAE_0: EQU 0x00000000
PROTCAE: EQU 0x0000DAB8
PROTSALT_31: EQU 0x0000060E
PROTSALT_30: EQU 0x000005DC
PROTSALT_29: EQU 0x000005AA
PROTSALT_28: EQU 0x00000578
PROTSALT_27: EQU 0x00000546
PROTSALT_26: EQU 0x00000514
PROTSALT_25: EQU 0x000004E2
PROTSALT_24: EQU 0x000004B0
PROTSALT_23: EQU 0x0000047E
PROTSALT_22: EQU 0x0000044C
ROOMWARPDP: EQU 0x0000EDBD
PROTSALT_21: EQU 0x0000041A
PROTSALT_20: EQU 0x000003E8
PROTSALT_19: EQU 0x000003B6
PROTSALT_18: EQU 0x00000384
PROTSALT_17: EQU 0x00000352
PROTSALT_15: EQU 0x000002EE
PROTSALT_14: EQU 0x000002BC
PROTSALT_13: EQU 0x0000028A
PROTSALT_12: EQU 0x00000258
PROTSALT_11: EQU 0x00000226
PROTSALT_10: EQU 0x000001F4
PROTSALT_9: EQU 0x000001C2
PROTSALT_8: EQU 0x00000190
PROTSALT_7: EQU 0x0000015E
PROTSALT_6: EQU 0x0000012C
PROTSALT_5: EQU 0x000000FA
ENEMSWM2_18: EQU 0x00000328
PROTSALT_4: EQU 0x000000C8
LX_RLE: EQU 0x0000BF1A
PROTSALT_3: EQU 0x00000096
PROTSALT_2: EQU 0x00000064
PROTSALT_1: EQU 0x00000032
PROTSALT_0: EQU 0x00000000
PROTSALT: EQU 0x0000D478
PROTQUID: EQU 0x0000D3CC
ENEMBSHT_14: EQU 0x00000230
PROTQUII: EQU 0x0000CC1C
PROTROAM_71: EQU 0x00000F12
PROTROAM_70: EQU 0x00000EE0
PROTROAM_69: EQU 0x00000EBC
PROTROAM_68: EQU 0x00000E8A
PROTROAM_67: EQU 0x00000E58
PROTROAM_66: EQU 0x00000E18
PROTROAM_65: EQU 0x00000DE6
PROTROAM_64: EQU 0x00000DA6
PROTROAM_63: EQU 0x00000D74
PROTROAM_62: EQU 0x00000D42
PROTROAM_61: EQU 0x00000D10
PROTROAM_60: EQU 0x00000CDE
PROTROAM_59: EQU 0x00000C9E
PROTROAM_58: EQU 0x00000C5E
PROTROAM_57: EQU 0x00000C1E
PROTROAM_56: EQU 0x00000BDE
PROTROAM_55: EQU 0x00000BAC
PROTROAM_54: EQU 0x00000B7A
PROTROAM_53: EQU 0x00000B48
PROTROAM_52: EQU 0x00000B16
PROTROAM_51: EQU 0x00000AD6
PROTROAM_50: EQU 0x00000A96
PROTROAM_49: EQU 0x00000A56
PROTROAM_48: EQU 0x00000A16
PROTROAM_47: EQU 0x000009E4
PROTROAM_46: EQU 0x000009B2
PROTROAM_45: EQU 0x00000980
PROTROAM_44: EQU 0x0000094E
PROTROAM_43: EQU 0x0000090E
PROTROAM_42: EQU 0x000008CE
PROTROAM_41: EQU 0x0000088E
PROTROAM_40: EQU 0x0000084E
PROTROAM_39: EQU 0x0000081C
PROTROAM_38: EQU 0x000007EA
PROTSIES: EQU 0x0000E004
PROTROAM_37: EQU 0x000007B8
PROTROAM_36: EQU 0x00000786
PROTROAM_35: EQU 0x00000762
PROTROAM_34: EQU 0x00000730
PROTROAM_33: EQU 0x0000070C
PROTROAM_32: EQU 0x000006DA
PROTROAM_31: EQU 0x000006A8
PROTROAM_30: EQU 0x00000676
PROTROAM_29: EQU 0x00000644
PROTROAM_28: EQU 0x00000612
PROTROAM_27: EQU 0x000005EE
PROTROAM_26: EQU 0x000005AE
PROTROAM_24: EQU 0x0000052E
PROTROAM_23: EQU 0x000004FC
PROTROAM_22: EQU 0x000004CA
PROTROAM_21: EQU 0x00000498
PROTROAM_20: EQU 0x00000466
PROTROAM_19: EQU 0x00000426
PROTROAM_18: EQU 0x000003F4
LX_IAZEE_RS1: EQU 0x0000B58E
PROTROAM_17: EQU 0x000003B4
PROTROAM_16: EQU 0x00000374
PROTROAM_15: EQU 0x00000342
PROTROAM_14: EQU 0x00000310
PROTROAM_13: EQU 0x000002DE
PROTROAM_12: EQU 0x000002AC
PROTROAM_11: EQU 0x0000026C
PROTROAM_10: EQU 0x0000022C
PROTROAM_9: EQU 0x000001EC
PROTROAM_8: EQU 0x000001AC
PROTROAM_7: EQU 0x0000017A
PROTROAM_6: EQU 0x00000148
BLOCK1INI: EQU 0x0000C000
PROTROAM_5: EQU 0x00000116
PROTROAM_4: EQU 0x000000E4
LX_PSWWTAB: EQU 0x0000B9A9
ENEMBSHT_27: EQU 0x00000484
PROTROAM_3: EQU 0x000000B2
PROTROAM_2: EQU 0x00000080
PROTROAM_1: EQU 0x00000040
PROTROAM_0: EQU 0x00000000
PROTROAM: EQU 0x0000C542
LX_FLECOR: EQU 0x0000C534
FLECP: EQU 0x0000B845
LX_FLEDBOR: EQU 0x0000C50A
RUTALT0: EQU 0x0000C50A
LX_COLENEMI_PROTA: EQU 0x0000C4F8
LX_COLENEMD: EQU 0x00005B18
LX_COLENEMDBRD: EQU 0x0000C4AE
LX_COLENEMIBRD: EQU 0x0000C486
VARL_D: EQU 0x0000B807
LX_PJP_DIANA: EQU 0x0000F31C
LX_SCD_R52: EQU 0x0000F26D
LX_CLE_VARD_RET: EQU 0x0000C446
VARL_C: EQU 0x0000B813
LX_CLE_VARC_RET: EQU 0x0000C428
LX_COLENEMP: EQU 0x00005B19
LX_COLENEMI: EQU 0x00005B17
LX_CLENEM: EQU 0x0000C400
JPUPDANIM: EQU 0x0000C3C4
LX_DIMXY: EQU 0x0000C3A8
LX_GAB_RBUILD_DEST: EQU 0x0000C39C
LX_VAR_B: EQU 0x00005B5A
VARL_B: EQU 0x0000B801
LX_GAB_VARB_RET: EQU 0x0000C33E
TANOTA: EQU 0x0000C000
SPOSN: EQU 0x00005C88
LX_VAR_A: EQU 0x00005B57
VARL_A: EQU 0x0000B80D
LX_GAB_RBUILD_EXE: EQU 0x0000C36A
LX_GAB_VARA_RET: EQU 0x0000C31A
LX_GAB_RET: EQU 0x0000C3A4
LX_GAB: EQU 0x0000C302
LX_SALTANDO: EQU 0x0000B8E2
LX_COLCAER: EQU 0x00005B21
LX_COLABAR: EQU 0x00005B23
LX_COLARRR: EQU 0x00005B22
LX_COLDETAR: EQU 0x0000C2B2
LX_COLDERR: EQU 0x00005B20
LX_COLDEPELD: EQU 0x0000C2AC
LX_COLDEP2NO: EQU 0x0000C296
LX_COLDEP2: EQU 0x0000C28E
LX_COLDECERCA: EQU 0x0000C2A0
LX_COLDEPASE: EQU 0x0000C2A8
LX_COLDRBRD: EQU 0x0000C2A8
LX_COLIZQR: EQU 0x00005B1F
LX_COLIZPELD: EQU 0x0000C23A
LX_COLPELDR: EQU 0x00005B1C
LX_COLIZP2NO: EQU 0x0000C224
LX_COLIZP2: EQU 0x0000C21C
LX_COLIZCERCA: EQU 0x0000C22E
LX_COLIZPASE: EQU 0x0000C236
LX_COLIZBRD: EQU 0x0000C236
LX_COLDETC: EQU 0x0000C1CE
LX_COLCAE: EQU 0x0000C2E8
LX_COLAREAFIN: EQU 0x00005B24
LX_COLAREA: EQU 0x00005B1B
LX_COLDET: EQU 0x0000C1AC
SHERSWM2_22: EQU 0x000003F6
LX_K_SPRTBUK1: EQU 0x0000BC50
LX_SPRRETSK: EQU 0x0000C11C
LX_SPR_SKIPC: EQU 0x0000C14E
CHARS: EQU 0x00005C36
SPRDIMXYC: EQU 0x00005B13
ENEMBSHT_28: EQU 0x000004A6
SPRDIMXYP: EQU 0x00005B15
LX_SPR_BUK: EQU 0x0000C068
LISTSP: EQU 0x00005C3F
LX_ORIORISK: EQU 0x0000C168
LX_ORIDESSK: EQU 0x0000C166
LX_SPRITE_O: EQU 0x0000C02C
LX_SPRITE_D: EQU 0x0000C016
LX_SPRITE: EQU 0x0000C03C
LX_ORIORI: EQU 0x0000C08E
LX_ORIDES: EQU 0x0000C08C
LX_SPRITE_OO: EQU 0x0000C000
MPAGE0_INI: EQU 0x0000C000
BL9984_312: EQU 0x00009F98
BL9941_311: EQU 0x00009F6B
BL9940_310: EQU 0x00009F17
BL9930_309: EQU 0x00009F09
BL9920_308: EQU 0x00009EEE
BL9910_307: EQU 0x00009ECF
BL9908_306: EQU 0x00009EC9
BL9906_305: EQU 0x00009E8A
LX_PROTDEDW: EQU 0x0000F994
BL9905_304: EQU 0x00009E58
LX_IVEJ: EQU 0x0000FF5E
BL9900_303: EQU 0x00009E45
BL9000_302: EQU 0x00009E31
BL8999_301: EQU 0x00009E1B
BL8720_300: EQU 0x00009DFB
BL8710_299: EQU 0x00009DAD
BL8629_298: EQU 0x00009D76
BL8620_297: EQU 0x00009D4C
PROTSWHM_1: EQU 0x00000022
BL8602_296: EQU 0x00009D04
BL8601_295: EQU 0x00009CC9
BL8600_294: EQU 0x00009CAC
BL8500_293: EQU 0x00009C32
LX_LSTORD: EQU 0x00005B9A
BL8450_292: EQU 0x00009BC3
BL8401_291: EQU 0x00009B7A
BL8400_290: EQU 0x00009B24
BL261_289: EQU 0x00009AE0
BL260_288: EQU 0x00009AD3
BL259_287: EQU 0x00009AC6
BL259_286: EQU 0x00009AB0
BL258_285: EQU 0x00009A5A
BL257_284: EQU 0x00009A16
BL256_283: EQU 0x000099D2
BL255_282: EQU 0x00009977
BL192_281: EQU 0x00009920
BL191_280: EQU 0x0000990A
BL10_279: EQU 0x000098F8
BL9_278: EQU 0x000098C9
BL8_277: EQU 0x00009891
BL7_276: EQU 0x00009882
BL7_275: EQU 0x00009810
BL6_274: EQU 0x00009801
BL6_273: EQU 0x000097A1
BL5_272: EQU 0x000096C4
BL4_271: EQU 0x000096B5
TO_RESPAWNTOP: EQU 0x00000005
BL4_270: EQU 0x0000961A
BL3_269: EQU 0x0000957A
BL2_268: EQU 0x00009516
BL1_267: EQU 0x000094A6
BL8010_266: EQU 0x00009482
BL8005_265: EQU 0x000093CD
BL8000_264: EQU 0x0000939C
BL7920_263: EQU 0x0000938F
BL7920_262: EQU 0x00009319
PROTSALT_16: EQU 0x00000320
BL7912_261: EQU 0x00009291
BL7911_260: EQU 0x00009242
BL7910_259: EQU 0x000091DB
BL7905_258: EQU 0x000091CE
BL7903_257: EQU 0x00009196
BL7902_256: EQU 0x00009145
BL7901_255: EQU 0x000090F3
BL7900_254: EQU 0x000090D3
BL7870_253: EQU 0x000090C6
BL7860_252: EQU 0x000090A5
BL7860_251: EQU 0x0000906D
BL7850_250: EQU 0x00009030
BL7810_249: EQU 0x0000902A
BL7731_248: EQU 0x00008F78
BL7730_247: EQU 0x00008F52
BL7700_246: EQU 0x00008F1B
BL7630_245: EQU 0x00008E72
BL7621_244: EQU 0x00008E2D
BL7620_243: EQU 0x00008DD2
BL7612_242: EQU 0x00008DC5
BL7611_241: EQU 0x00008DA6
BL7611_240: EQU 0x00008D29
BL7611_239: EQU 0x00008CE3
BL7610_238: EQU 0x00008CA6
BL7605_237: EQU 0x00008C33
BL7601_236: EQU 0x00008C0F
BL7530_235: EQU 0x00008B3D
BL7520_234: EQU 0x00008B16
BL7510_233: EQU 0x00008A5B
BL7400_232: EQU 0x000089CE
BL7210_231: EQU 0x00008978
BL7204_230: EQU 0x00008960
BL7204_229: EQU 0x000088FE
BL7203_228: EQU 0x000088CD
BL7202_227: EQU 0x000088BC
BL7201_226: EQU 0x000088AB
BL7201_225: EQU 0x00008857
BL7200_224: EQU 0x00008816
BL7140_223: EQU 0x000087E3
BL7130_222: EQU 0x000087D7
BL7130_221: EQU 0x000087AA
BL7130_220: EQU 0x00008791
BL7109_219: EQU 0x0000877B
BL7104_218: EQU 0x00008766
BL7104_217: EQU 0x0000874D
BL7103_216: EQU 0x0000872D
BL7102_215: EQU 0x00008714
BL7101_214: EQU 0x000086D1
BL7070_213: EQU 0x000086C4
BL7070_212: EQU 0x000086A2
BL7070_211: EQU 0x00008665
BL7065_210: EQU 0x00008658
BL7063_209: EQU 0x0000864F
BLOCK6END: EQU 0x0000FFFD
BL7063_208: EQU 0x000085D8
BL7060_207: EQU 0x000085BC
BL7050_206: EQU 0x00008573
BL7050_205: EQU 0x0000853D
BL7049_204: EQU 0x00008505
BL7049_203: EQU 0x000084EE
BL7020_202: EQU 0x000084E1
BL7020_201: EQU 0x000084D8
BL7020_200: EQU 0x00008461
BL7010_199: EQU 0x00008430
BL7000_198: EQU 0x000083E6
BL7000_197: EQU 0x000083AD
BL6999_196: EQU 0x00008376
BL6999_195: EQU 0x0000835F
BL6506_194: EQU 0x00008347
BL6505_193: EQU 0x000082F8
BL6504_192: EQU 0x000082C5
BL6490_191: EQU 0x0000827E
BL6480_190: EQU 0x0000826D
BL6452_189: EQU 0x00008236
BL6450_188: EQU 0x00008211
BL6450_187: EQU 0x000081E1
BL6402_186: EQU 0x000081A1
BL6400_185: EQU 0x00008174
BL6400_184: EQU 0x00008144
BL6025_183: EQU 0x00008137
BL6010_182: EQU 0x00008116
BL6000_181: EQU 0x000080B0
BL5695_180: EQU 0x000080A3
BL5693_179: EQU 0x0000807B
BL5692_178: EQU 0x00008056
BL5608_177: EQU 0x00008039
BL5607_176: EQU 0x00007FF6
BL5606_175: EQU 0x00007FE5
BL5605_174: EQU 0x00007FCD
BL5602_173: EQU 0x00007FBD
BL5601_172: EQU 0x00007F94
BL5600_171: EQU 0x00007F4B
BL5595_170: EQU 0x00007F3E
BL5593_169: EQU 0x00007F16
BL5592_168: EQU 0x00007EF1
BL5508_167: EQU 0x00007EE4
BL5507_166: EQU 0x00007EA7
BL5506_165: EQU 0x00007E96
BL5505_164: EQU 0x00007E7E
BL5502_163: EQU 0x00007E6E
BL5501_162: EQU 0x00007E45
BL5500_161: EQU 0x00007DFC
BL5262_160: EQU 0x00007DCD
BL5261_159: EQU 0x00007D80
BL5260_158: EQU 0x00007D60
BL5252_157: EQU 0x00007D38
BL5251_156: EQU 0x00007CEB
BL5250_155: EQU 0x00007CC8
BL5203_154: EQU 0x00007C99
BL5203_153: EQU 0x00007C6C
BL5202_152: EQU 0x00007C33
BL5201_151: EQU 0x00007C07
BL5201_150: EQU 0x00007BDD
BL5200_149: EQU 0x00007B7A
BL5198_148: EQU 0x00007B5E
BL5140_147: EQU 0x00007B1E
BL5130_146: EQU 0x00007B11
BL5130_145: EQU 0x00007AD0
BL5122_144: EQU 0x00007ACA
BL5120_143: EQU 0x00007A4B
BL5100_142: EQU 0x00007A45
BL4810_141: EQU 0x00007A38
BL4805_140: EQU 0x00007A03
BL4801_139: EQU 0x000079A7
BL4800_138: EQU 0x00007983
BL4605_137: EQU 0x00007969
BL4605_136: EQU 0x00007959
BL4603_135: EQU 0x00007880
BL4602_134: EQU 0x00007800
PROTROAM_25: EQU 0x0000056E
BL4601_133: EQU 0x000077BB
BL4600_132: EQU 0x000077AA
BL4600_131: EQU 0x0000774D
BL4506_130: EQU 0x0000773C
BL4505_129: EQU 0x0000769B
BL4504_128: EQU 0x0000768A
BL4504_127: EQU 0x0000764C
BL4504_126: EQU 0x00007631
BL4502_125: EQU 0x0000762B
BL4502_124: EQU 0x000075BD
BL4501_123: EQU 0x00007557
BL4501_122: EQU 0x000074E1
SHERSWM1_3: EQU 0x00000082
BL4500_121: EQU 0x00007482
BL4404_120: EQU 0x00007401
BL4402_119: EQU 0x000073CA
BL4401_118: EQU 0x0000738E
BL4400_117: EQU 0x00007323
BORDCR: EQU 0x00005C48
BL4314_116: EQU 0x000072FF
BL4311_115: EQU 0x000072DB
BL4310_114: EQU 0x000072AD
BL4306_113: EQU 0x00007281
BL4303_112: EQU 0x0000725D
BL4302_111: EQU 0x0000722F
BL4210_110: EQU 0x00007222
BL4201_109: EQU 0x00007200
BL4200_108: EQU 0x000071A6
BL4060_107: EQU 0x00007174
BL4050_106: EQU 0x00007167
LX_TO_SCR62: EQU 0x0000F20D
BL4041_105: EQU 0x00007113
BL4040_104: EQU 0x000070F1
FRAMES: EQU 0x00005C78
BL4030_103: EQU 0x000070E4
BL4030_102: EQU 0x000070B5
BL4020_101: EQU 0x000070A8
BL4020_100: EQU 0x00007079
BL4010_99: EQU 0x00007070
BL3999_98: EQU 0x00007058
BL1525_97: EQU 0x0000703E
BL1520_96: EQU 0x00007022
BL1515_95: EQU 0x00006FF6
BL1505_94: EQU 0x00006FB3
BL1500_93: EQU 0x00006F93
BL1450_92: EQU 0x00006F3E
BL1410_91: EQU 0x00006DAC
BL1400_90: EQU 0x00006D75
BL1260_89: EQU 0x00006D33
BL1250_88: EQU 0x00006D02
BL1240_87: EQU 0x00006C9D
BL1190_86: EQU 0x00006C45
BL1185_85: EQU 0x00006C3F
BL1185_84: EQU 0x00006C02
BL1184_83: EQU 0x00006B7D
BL1183_82: EQU 0x00006B39
BL1182_81: EQU 0x00006B21
BL1182_80: EQU 0x00006AC7
BL1181_79: EQU 0x00006AC1
BL1181_78: EQU 0x00006AAA
BL1180_77: EQU 0x00006A7D
BL1179_76: EQU 0x00006A5F
BL1163_75: EQU 0x000069DE
BL1160_74: EQU 0x000069B0
BL1158_73: EQU 0x00006996
BL1155_72: EQU 0x0000694F
BL1150_71: EQU 0x0000693D
BL1085_70: EQU 0x00006930
BL1085_69: EQU 0x000068FD
BL1084_68: EQU 0x00006884
BL1083_67: EQU 0x0000682E
BL1082_66: EQU 0x00006811
BL1081_65: EQU 0x000067FF
BL1080_64: EQU 0x000067D4
LASTK: EQU 0x00005C08
BL1060_63: EQU 0x00006776
BL1031_62: EQU 0x0000675E
BL1030_61: EQU 0x00006722
BL1020_60: EQU 0x00006715
BL1020_59: EQU 0x000066DF
BL1010_58: EQU 0x000066D9
BL1009_57: EQU 0x000066AD
BL1008_56: EQU 0x0000666B
BL1001_55: EQU 0x000065AC
BL1000_54: EQU 0x0000654D
BL725_53: EQU 0x00006547
BL721_52: EQU 0x0000650D
BL720_51: EQU 0x000064D8
BL710_50: EQU 0x000064CB
BL703_49: EQU 0x000064C5
BL703_48: EQU 0x0000646C
BL702_47: EQU 0x00006466
BL702_46: EQU 0x0000640D
BL701_45: EQU 0x00006407
BL701_44: EQU 0x000063F5
BL700_43: EQU 0x000063EF
BL700_42: EQU 0x000063BF
BL699_41: EQU 0x000063B4
BL653_40: EQU 0x000063AE
BL652_39: EQU 0x00006376
BL651_38: EQU 0x0000634A
BL650_37: EQU 0x00006341
BL641_36: EQU 0x0000633B
BL641_35: EQU 0x0000631B
BL640_34: EQU 0x00006309
BL630_33: EQU 0x000062F1
BL620_32: EQU 0x000062DD
BL610_31: EQU 0x000062CC
BL600_30: EQU 0x00006293
BL599_29: EQU 0x0000625B
BL515_28: EQU 0x00006230
BL510_27: EQU 0x000061DA
BL500_26: EQU 0x000061AD
BL81_25: EQU 0x0000614A
BL80_24: EQU 0x000060C5
BL70_23: EQU 0x00006047
BL50_22: EQU 0x00006016
BL45_21: EQU 0x00005FFA
BL45_20: EQU 0x00005FEA
BL42_19: EQU 0x00005F8D
BL33_18: EQU 0x00005F47
BL32_17: EQU 0x00005F25
BL32_16: EQU 0x00005EFA
BL31_15: EQU 0x00005EE3
BL30_14: EQU 0x00005ECE
BL20_13: EQU 0x00005EBE
BL20_12: EQU 0x00005EA7
BL17_11: EQU 0x00005E92
BL16_10: EQU 0x00005E6D
BL15_9: EQU 0x00005E5E
BL13_8: EQU 0x00005E50
BL12_7: EQU 0x00005E39
BL11_6: EQU 0x00005E24
BL10_5: EQU 0x00005DD4
BL5_4: EQU 0x00005D7C
BL4_3: EQU 0x00005D69
BL2_2: EQU 0x00005D57
BL1_1: EQU 0x00005D1E
ROM_CEROS: EQU 0x00003CE0
SET_STACK: EQU 0x0000B800
MUSICAON: EQU 0x00000000
LX_SCD_R01: EQU 0x0000C000
