es:simply_mazing
Diferencias
Muestra las diferencias entre dos versiones de la página.
es:simply_mazing [2022/07/01 02:34] – creado jevicac | es:simply_mazing [2022/07/01 02:44] (actual) – borrado jevicac | ||
---|---|---|---|
Línea 1: | Línea 1: | ||
- | ====== SIMPLY MAZING! ====== | ||
- | {{: | ||
- | |||
- | ===== Ficha ===== | ||
- | ^ Autor | Hamish McFee | | ||
- | ^ Computadora | Amstrad PCW 8256 / 8512 / 9512 | | ||
- | ^ Año | 1987 | | ||
- | ^ Género | Arcade | ||
- | ^ Controles | Teclado | ||
- | ^ Lenguajes | Inglés | ||
- | ^ Estado | [[preservado|Preservado]] | | ||
- | |||
- | ===== Capturas ===== | ||
- | |||
- | {{: | ||
- | |||
- | ===== Descripción ===== | ||
- | |||
- | TRAPPER es un juego de acción rápida en el que tu objetivo es acorralar al malvado monstruo laberinto lo más rápido posible. La única forma de hacer esto es para arrinconarlo para que no pueda moverse en ninguna de las cuatro direcciones. | ||
- | |||
- | El monstruo es inteligente y hará que tu tarea sea más difícil evitando situaciones más difíciles siempre que sea posible, pero es posible que pueda engañarlo para que entre en un callejón sin salida. | ||
- | |||
- | Tienes tres bombas que se pueden hacer estallar en cualquier momento para eliminar todo los bloques a tu alrededor. | ||
- | La puntuación se calculará y actualizará al final de cada pantalla, pero sea rápido, ya que solo tiene una cantidad de tiempo limitada. | ||
- | |||
- | ===== Listado ===== | ||
- | |||
- | * **__Listado - SIMPLYMA.BAS__** | ||
- | |||
- | < | ||
- | |||
- | 10 REM | ||
- | 20 REM (c) Computing with the Amstrad | ||
- | 30 REM ------------PCW--------------- | ||
- | 40 DEFINT a-z:DEF FNat$(x, | ||
- | 50 m$=CHR$(189): | ||
- | 60 DIM map$(20, | ||
- | 70 PRINT cls$: | ||
- | 80 PRINT FNat$(36, | ||
- | 90 PRINT FNat$(36, | ||
- | 100 PRINT FNat$(24, | ||
- | 110 n=1: | ||
- | 120 RANDOMIZE n:PRINT a$; | ||
- | 130 PRINT FNat$(27, | ||
- | 140 map$(1, | ||
- | 150 FOR a=2 TO 19:FOR b=2 TO 69: | ||
- | 160 FOR a=2 TO 69: | ||
- | 170 FOR a=2 TO 19: | ||
- | 180 FOR a=1 TO 170*lev: | ||
- | 190 PRINT cls$:PRINT FNat$(10, | ||
- | 200 FOR a=1 TO 20: | ||
- | 210 REM generate initial positions | ||
- | 220 mx=INT(RND*68)+2: | ||
- | 230 yx=INT(RND*68)+2: | ||
- | 240 bonus=1000 | ||
- | 250 PRINT FNat$(mx+10, | ||
- | 260 POKE 64503!, | ||
- | 270 trap=0: | ||
- | 280 IF trap=1 THEN GOSUB 600:GOTO 130 | ||
- | 290 PRINT FNat$(mx+10, | ||
- | 300 GOSUB 440 : REM move adventurer | ||
- | 310 map$(yy, | ||
- | 320 WEND | ||
- | 330 FOR a=10 TO 1 STEP-1: | ||
- | 340 FOR b=1 TO a*a: | ||
- | 350 PRINT FNat$(33, | ||
- | 360 PRINT FNat$(30, | ||
- | 370 IF INKEY$=CHR$(13) THEN RUN ELSE 370 | ||
- | 380 IF map$(my+1, | ||
- | 390 ty=0: | ||
- | 400 IF map$(my+ty, | ||
- | 410 IF my+ty<2 OR my+ty>19 OR mx+tx<2 OR mx+tx>69 THEN RETURN | ||
- | 420 PRINT FNat$(mx+10, | ||
- | 430 map$(my, | ||
- | 440 a$=INKEY$: | ||
- | 450 IF bonus>0 THEN bonus=bonus-1 | ||
- | 460 a=ASC(a$): | ||
- | 470 IF a=46 THEN 540 | ||
- | 480 IF a=120 OR a=88 THEN 560 | ||
- | 490 IF a=98 OR a=66 THEN GOSUB 700:RETURN | ||
- | 500 IF a=122 OR a=90 THEN 580 ELSE RETURN | ||
- | 510 IF yy=2 OR map$(yy-1, | ||
- | 520 GOSUB 530: | ||
- | 530 PRINT FNat$(yx+10, | ||
- | 540 IF yy=19 OR map$(yy+1, | ||
- | 550 GOSUB 530: | ||
- | 560 IF yx=69 OR map$(yy, | ||
- | 570 GOSUB 530: | ||
- | 580 IF yx=2 OR map$(yy, | ||
- | 590 GOSUB 530: | ||
- | 600 REM monster has been trapped | ||
- | 610 PRINT FNat$(0, | ||
- | 620 PRINT FNat$(31, | ||
- | 630 mi=PEEK(64503!): | ||
- | 640 se=PEEK(64504!): | ||
- | 650 PRINT FNat$(26, | ||
- | 660 IF bonus>1 THEN PRINT FNat$(27, | ||
- | 670 PRINT FNat$(28, | ||
- | 680 score=score+INT(bonus/ | ||
- | 690 IF INKEY$<> | ||
- | 700 IF bombs=0 THEN RETURN | ||
- | 710 bombs=bombs-1 | ||
- | 720 PRINT FNat$(37, | ||
- | 730 RESTORE 770:FOR i=1 TO 8:READ tx,ty | ||
- | 740 IF yx+tx>69 OR yx+tx<2 OR yy+ty>19 OR yy+ty<2 THEN 760 | ||
- | 750 map$(yy+ty, | ||
- | 760 NEXT:RETURN | ||
- | 770 DATA -1, | ||
- | |||
- | </ | ||
- | |||
- | ===== Controles ===== | ||
- | |||
- | Z = IZQUIERDA | ||
- | X = DERECHA | ||
- | ; = ARRIBA | ||
- | . = ABAJO | ||
- | B = BOMBA | ||
- | | ||
- | | ||
- | ===== Carga del programa ===== | ||
- | |||
- | 1.- Introducir el disco CP/M por la cara 2 | ||
- | 2.- Escribir BASIC y esperar a que cargue | ||
- | 3.- Retirar el disco CP/M e introducir el disco que contiene el juego Simply Mazing! | ||
- | 4.- Teclear run " | ||
- | |||
- | ===== Extras ===== | ||
- | |||
- | * Listado del programa en revista de gran tirada de la época | ||
- | |||
- | {{: | ||
- | |||
- | ===== Descarga ===== | ||
- | |||
- | * {{: |
es/simply_mazing.1656632092.txt.gz · Última modificación: 2022/07/01 02:34 por jevicac