Teleport l6 5n6 *************  TELEPORT v1.0 ************* compiuter soft Carlos Monroe Roig  21/10/2005 1,8  L=1  SM=0 (T=529:S=T/23 *!X=0:Y=0:W=0 ,&AX=5:BX=11 :CX=17 .&AY=30:BY=2:CY=30 0&AI=-1:BI=1:CI=-1 4M=17:N=3 6SM=0418 8L=10526 :!L=2Y=1:X=1 <,L=3W=1:Y=1:X=1 > 102f @ 130 HN$= J&N$="0"0:7:0770 L 0578B N (M,N+1)="`"0760 P (M,N-1)="`"0760 R_(M,N-1)"#"N$="Z"N$="z"8;M,N;" ":N=N-1:8;5;M,N;"*" T_(M,N+1)"#"N$="X"N$="x"8;M,N;" ":N=N+1:8;5;M,N;"*" VZ=(M-4,N):166 W$A:B:A=255546":A:B X 0696 YA/255,B Z 072H d hd0:0:4::F=031:0,F;"#";19,F;"#";21,F;"#":F j7F=021:F,0;"#";F,31;"#":F l8;5;M,N;"*" n)2;6;13 ,5;">" p40;1;7;4,25;"@" rm20,1;1;1;"Tiempo:";20,8;5;0;"***********************" tFF=15:F,8;"X";F,16;"X";F,24;"X":F vGF=711 :F,8;"X";F,16;"X";F,24;"X":F xHF=13 17:F,8;"X";F,16;"X";F,24;"X":F zN1;2;4;6,1;"______________________________" |O1;2;4;12 ,1;"______________________________" ~O1;2;4;18,1;"______________________________"  0;13 ,7;"A";13 ,9 ;"B";13 ,15;"C";13 ,17;"D";13 ,23;"E";13 ,25;"F" 0;7,7;"G";7,9 ;"H";7,15;"I";7,17;"J";7,23;"K";7,25;"L" 0;1,7;"M";1,9 ;"N";1,15;"O";1,17;"P";1,23;"Q";1,25;"R"  L=20256 L=30328H ?Z=65AM,N;" ":N=N+3:M,N;9 ;5;"*" ?Z=66BM,N;" ":N=N-3:M,N;9 ;5;"*" MZ=67CM,N;" ":N=N+3:M=M-12 :M,N;9 ;5;"*" ?Z=81QM,N;" ":N=N-5:M,N;9 ;5;"*" ?Z=80PM,N;" ":N=N-3:M,N;9 ;5;"*" NZ=78NM,N;" ":N=N+13 :M=M+12 :M,N;9 ;5;"*" MZ=68DM,N;" ":N=N-11 :M=M-6:M,N;9 ;5;"*" @Z=71GM,N;" ":N=N+11 :M,N;9 ;5;"*" ?Z=75KM,N;" ":N=N+3:M,N;9 ;5;"*" LZ=79OM,N;" ":N=N-5:M=M+6:M,N;9 ;5;"*" MZ=76LM,N;" ":N=N-19:M=M-6:M,N;9 ;5;"*" NZ=77MM,N;" ":N=N+19:M=M+12 :M,N;9 ;5;"*" @Z=70FM,N;" ":N=N-19:M,N;9 ;5;"*" LZ=74JM,N;" ":N=N+5:M=M+6:M,N;9 ;5;"*" MZ=69EM,N;" ":N=N-22:M=M-6:M,N;9 ;5;"*" @Z=73IM,N;" ":N=N+11 :M,N;9 ;5;"*" MZ=72HM,N;" ":N=N+21:M=M-6:M,N;9 ;5;"*" XZ=82R642:M,N;" ":N=N+21:M=M-6:M,N;9 ;5;"*" L=1 MZ=65AM,N;" ":M=M-12 :N=N+3:M,N;9 ;5;"*"  NZ=79OM,N;" ":M=M+12 :N=N+11 :M,N;9 ;5;"*" LZ=70FM,N;" ":M=M-6:N=N+5:M,N;9 ;5;"*" ?Z=78NM,N;" ":N=N-3:M,N;9 ;5;"*" @Z=77MM,N;" ":N=N+11 :M,N;9 ;5;"*" ?Z=80PM,N;" ":N=N+5:M,N;9 ;5;"*" MZ=81QM,N;" ":N=N-13 :M=M+6:M,N;9 ;5;"*" "MZ=76LM,N;" ":N=N-11 :M=M+6:M,N;9 ;5;"*" &@Z=73IM,N;" ":N=N-14:M,N;9 ;5;"*" *?Z=71GM,N;" ":N=N+3:M,N;9 ;5;"*" .LZ=72HM,N;" ":N=N-3:M=M+6:M,N;9 ;5;"*" 2LZ=67CM,N;" ":N=N+3:M=M-6:M,N;9 ;5;"*" 6NZ=66BM,N;" ":N=N+13 :M=M-12 :M,N;9 ;5;"*" :MZ=75KM,N;" ":N=N-22:M=M-6:M,N;9 ;5;"*" >MZ=74JM,N;" ":N=N+13 :M=M-6:M,N;9 ;5;"*" @YZ=82R0642:M,N;" ":N=N+21:M=M-6:M,N;9 ;5;"*" D L=2 NMZ=65AM,N;" ":M=M-6:N=N+19:M,N;9 ;5;"*" R?Z=76LM,N;" ":N=N-3:M,N;9 ;5;"*" VMZ=75KM,N;" ":M=M+6:N=N-22:M,N;9 ;5;"*" ZLZ=74JM,N;" ":M=M-6:N=N+5:M,N;9 ;5;"*" ^?Z=80PM,N;" ":N=N+5:M,N;9 ;5;"*" bMZ=81QM,N;" ":N=N-22:M=M+6:M,N;9 ;5;"*" fMZ=71GM,N;" ":N=N+11 :M=M+6:M,N;9 ;5;"*" jMZ=69EM,N;" ":N=N-22:M=M-6:M,N;9 ;5;"*" n?Z=68DM,N;" ":N=N-3:M,N;9 ;5;"*" rMZ=66BM,N;" ":M=M-12 :N=N+5:M,N;9 ;5;"*" v@Z=67CM,N;" ":N=N+11 :M,N;9 ;5;"*" zMZ=70FM,N;" ":M=M-6:N=N-11 :M,N;9 ;5;"*" ~?Z=72HM,N;" ":N=N-3:M,N;9 ;5;"*" MZ=73IM,N;" ":M=M-6:N=N-14:M,N;9 ;5;"*" MZ=79OM,N;" ":M=M+6:N=N+11 :M,N;9 ;5;"*" MZ=77MM,N;" ":M=M+6:N=N+19:M,N;9 ;5;"*" @Z=78NM,N;" ":N=N+21:M,N;9 ;5;"*" "Z=82R0642:M,N;" "    0412  F=129:1/1000,F:F::0:0:1::F=031:1;0,F;"#";21,F;"#":F 7F=021:F,0;"#";F,31;"#":F 0F=120:F,3;5;"#":F 0F=120:F,6;5;"#":F 0F=120:F,9 ;5;"#":F 1F=120:F,12 ;5;"#":F 1F=120:F,15;5;"#":F 1F=120:F,17;5;"#":F 1F=120:F,19;5;"#":F 1F=120:F,21;5;"#":F 1F=120:F,23;5;"#":F 1F=120:F,25;5;"#":F 1F=120:F,28;5;"#":F 0F=130:8,F;5;"#":F 1F=130:10 ,F;5;"#":F 1F=130:12 ,F;5;"#":F 'F=120:F,1;" ":F 'F=9 20:F,2;" ":F NF=17:F,3;" ":F:F=13 20:F,3;" ":F 'F=9 20:F,4;" ":F 'F=120:F,5;" ":F NF=17:F,6;" ":F:F=13 20:F,6;" ":F 'F=120:F,8;" ":F NF=17:F,9 ;" ":F:F=13 20:F,9 ;" ":F (F=111 :F,10 ;" ":F (F=120:F,11 ;" ":F PF=17:F,12 ;" ":F:F=13 20:F,12 ;" ":F (F=120:F,14;" ":F PF=17:F,15;" ":F:F=13 20:F,15;" ":F )F=12 20:F,16;" ":F PF=17:F,17;" ":F:F=11 20:F,17;" ":F (F=120:F,18;" ":F PF=17:F,19;" ":F:F=13 20:F,19;" ":F 10 ,20;" " PF=17:F,21;" ":F:F=13 20:F,21;" ":F (F=120:F,22;" ":F PF=17:F,23;" ":F:F=13 20:F,23;" ":F )F=12 20:F,24;" ":F hF=17:F,25;" ":F:10 ,25;" ":F=13 20:F,25;" ":F (F=120:F,26;" ":F )F=12 20:F,26;" ":F )F=10 20:F,27;" ":F PF=17:F,28;" ":F:F=13 20:F,28;" ":F )F=10 20:F,29;" ":F (F=120:F,30;" ":F <20,12 ;7;1;"compiuter soft 2005" 716,3;7;0;"Pulsa una tecla"  0   2:0:0 MQ=812 :F=229:Q,f;" ":1/700,Q:F:Q *2,3;"*** Instrucciones ***" 94,3;6;"Tras haber huido de Silurya" 95,3;6;"llegaste a la megaciudad de" :6,3;6;"Teleport. Tu mision consiste" :7,3;6;"en atravesar las puertas del" 98,3;6;"laberinto hasta llegar a la"  :9 ,3;6;"camara de lanzamiento, donde" "410 ,3;6;"conseguiras la llave." $X13 ,3;6;"Evita los ";13 ,13 ;1;"librastreadores." &;11 ,3;6;"Cojela antes de que acabe el" (812 ,3;6;"tiempo y sal de Teleport." *B18,3;7;0;"Controles: Z-izqda X-drcha" ,:15,3;3;"Hay tres niveles sucesivos." .<16,3;1;7;"Pulsa tecla Espacio." 0X=1:L=1 2N$= 4N$=" "0572< 6N$="O" 8 0 : 05622 <6F=290-1:1/1000,F:F >2:0:0 @ DT=T-1:S=T/23 H$S=2220,30;" " J$S=2120,29;" " L$S=2020,28;" " N$S=1920,27;" " P$S=1820,26;" " R$S=1720,25;" " T$S=1620,24;" " V$S=1520,23;" " X$S=1420,22;" " Z$S=13 20,21;" " \$S=12 20,20;" " ^$S=11 20,19;" " `$S=10 20,18;" " b#S=9 20,17;" " d#S=820,16;" " f#S=720,15;" " h#S=620,14;" " j#S=520,13 ;" " l#S=420,12 ;" " n#S=320,11 ;" " p#S=220,10 ;" " r"S=120,9 ;" " t.S=020,9 ;" ":0634z v zW19,8;1;1;7;0;"Se acabo el tiempo":L=1 |T=989:S=T/43+ ~ 0680 :0:0:7 ,L=1SM=1:L=2:34"  L=2L=3:34" Q1:7:21,0;1;"Felicidades, saliste de Teleport" J=19 (G=(*28):G30652 'FINK=(*7)+1:0666 J  0680 JF=20FINK+3-1:F,G;"!":1/100d,2:F 7F=20FINK+3-1-1:F,G;" ":F ZF=F+2:F,G;FINK;"*":1/500,5:F-1,G-1;FINK;"< /" F,G-1;FINK;"-*-" +F,G;FINK;" ";F+1,G-1;"/ >" 1/502,3:  L=1:SM=1:1:5:20,0;1;"Pulsa Break para recomenzar. Pulsa 0 para salir. " N$= N$=" ":034" N$="0"0768 N$="1"  0682  1  X=10708 Y=10726 W=10744  1L=121,13 ;1;"Nivel1" AY=1AI=1 AY=30AI=-1 AX,AY;0;" "  AY=AY+AI (AX,AY)="X"AY=AY+AI AX,AY;6;"`"  1L=221,13 ;1;"Nivel2" BY=1BI=1 BY=30BI=-1 BX,BY;0;" "  BY=BY+BI (BX,BY)="X"BY=BY+BI BX,BY;6;"`"  1L=321,13 ;1;"Nivel3" CY=1CI=1 CY=30CI=-1 CX,CY;0;" "  CY=CY+CI (CX,CY)="X"CY=CY+CI CX,CY;6;"`"  Q19,0;6;1;1;"Has sido Librastreado. Se acabo."  0680  1,0,1,2,1,4,2,7,2,7,1,9 ,1,7,1,4,1,4:1,0,1,2,1,4,2,4,2,2,2,0,2,2:1,0,1,2,1,4,2,7,2,7,1,9 ,1,7,1,4,1,4:1,0,1,2,1,4,2,4,2,2,2,2,2,0,255,255  lts8xyw mn