Microhobby 21. Año II, del 26 de marzo al 1 de abril de 1985

— Luis García Lleo

Luis García Lleo nos manda un truco de gran utilidad en el que se mencionan los comandos POKE y PEEK.

Con ellos podremos obtener el reloj que posee el Spectrum, realizando el siguiente programa:

(65536 * PEEK 23674 + 256 * PEEK 23673 + PEEK 23672)/50

La posición 23672 cuenta los cincuenteavos de segundo y, como el mayor número que puede contener una única posición es 255, aquélla cuenta 255 cincuenteavos de segundo, volviendo después a cero.

La segunda posición, la 23673, cuenta las veces que la primera posición ha pasado a cero de nuevo, es decir, contará en unidades de 256 cincuenteavos de segundo.

De igual modo, la tercera de las posiciones, la 23674, cuenta el número de veces que la anterior posición ha vuelto de nuevo a cero, lo que significa que cuenta en unidades de 256*256 cincuenteavos de segundo.

Igualmente, puedes poner el reloj en hora utilizando el comando POKE. Si quieres ponerlo a cero, por ejemplo, tendrás que emplear POKE 23674,0: POKE 23673,0 : POKE 23672,0.

— Leopoldo Fuentes Muñoz

Si en vuestro video-juego queréis incluir un buen efecto sonoro, una rutina en código máquina os servirá, según nos ha escrito Leopoldo Fuentes Muñoz.

Para ello, se activa con RANDOMIZE USR 32400.

10 CLEAR 32399
20 FOR A = 32400 TO 32425
30 READ b: POKE a, b
40 NEXT a
50 DATA 6, 5, 197, 33, 0, 3, 17, 1, 0, 229, 205, 181, 3, 225, 17, 16, 0, 167, 237, 82, 32, 240, 193, 16, 233, 201

— Joaquín Mateos Lagos

Joaquín Mateos Lagos nos ha escrito para decir que el truco «Las siete llaves», publicado en el número 16 de nuestra revista, es fácilmente soslayable. La solución que nos da es la de cargar el programa que ha sido salvado en forma de CODE, de esta forma:

CLEAr 28999: LOAD «nombre» CODE 29000

una vez transcurridos unos 15 segundos de la carga, interrumpirla pulsando BREAK y teclear el siguiente programa:

10 FOR n = 29000 TO 30000
20 IF PEEK n>31 THEN PRINT CHR$ (PEEK n);
30 IF PEEK n<32 THEN PRINT " "
40 NEXT n

Esto permitirá ver claramente cual es la clave que debe ser introducida. A continuación, simplemente cargar bien el programa y, cuando se autoejecute y pida la clave, darle la correcta que hemos anotado anteriormente.

— Rafael Mellado Fernández

Rafael Mellado Fernández nos ha enviado un truco para hacer scroll simplificando la sentencia POKE 23692, 255.

Consiste en introducir en una sentencia seguida de un PRINT, la cantidad de «'» o especie de comilla que se encuentra en la tecla con el núm. 7, tantas veces como se quiera subir la pantalla.

Para aquellos despistados que se olviden de incluir la sentencia POKE, no tienen más que recurrir a este truco para solventarlo.

Otra de las ventajas que aporta este sistema es que se puede subir la imagen o la línea tantas veces como se quiera, mientras que en la sentencia POKE 23692,255, el scroll se produce en toda la pantalla.

— José A. Val García

Con este truco que nos ha mandado José A. Val García, podrás superponer sonidos en tu Spectrum.

El funcionamiento es muy sencillo, y el efecto se consigue mediante varios bucles que comienzan en las lineas 10, 11 y 12.

En la linea 20 está la clave del programa y podemos modificarla consiguiendo buenos efectos, de la siguiente forma:

1. Cargar lineas 11 y 22.
2. Poner, en el FOR de la línea 12, un número entre 1 y 20.
3. Sustituir la última letra de la linea 20 por:
   • d - d+b
   • d+d - d+c
   • d+c

10 FOR b = 0 TO 50
20 FOR c = 0 TO 40
30 FOR d = 0 TO 20
40 BEEP .01, d: BEEP .01,c
50 NEXT d
60 NEXT c
70 NEXT b