Moderador: Sir Cilve Sinclair
wilco2009 escribió:Por cierto, eso de viajar al futuro podría resultar en que los mojones viven en una ventana de güindows, en donde fabrican inmensos programas de miles de megas, devoradores de memoria.
na_th_an escribió:Ay, no, cirjuanos plásticos no, que las tetas de goma me dan una grima increíble
anjuel escribió:También pueden ser mayoristas de ultramarinos.
na_th_an escribió:Sí, siempre se puede meter, pero con lo que hay es más que suficiente.
wilco2009 escribió:na_th_an escribió:Sí, siempre se puede meter, pero con lo que hay es más que suficiente.
Como tutorial, una pasada, aunque supongo que habrás dejado a mucha gente esperando el próximo capítulo que has prometido.
Acabo de completarlo y me he quedado con ganas de más.
¿Hay bibliotecas para gestionar el sonido o tenemos que apañarnos a base de beeps?
Bueno, en todo caso creo que ahora ya me atrevo a leerme el código de vuestro último juego para aprender un poquito más.
EDITO: No se que está pasando pero si compilo el código fuente de vuestro programa y lo ejecuto con spectaculator se me cuelga después de pulsar una tecla en la primera pantalla quedando de esta manera:
¿Hay algo especial que hacer para compilarlo o es que el fuente no es correcto?
Código: Seleccionar todo
#include once "subacolib.bas"
#include once "behaviours.bas"
#include once "sound.bas"
#include once "engine.bas"
#include once "mapdraw.bas"
#include once "beepmusic.bas"
Dim flag1 as uByte
Dim flag2 as uByte
Dim looper as uByte
Dim state as uByte
initRestorableTiles ()
Border 0: Paper 0: Ink 7: Cls
title ()
drawFrame()
Do Loop
Código: Seleccionar todo
' To compile (1.2.9)
'
' zxb -t -B -a -S 29000 -H 256 maritrini.bas
Alxinho escribió:Hola chachos!! Que he estado desconectado un tiempo y no me había enterado de la sorpresita! ...
La idea del juego con el rollito homenaje me ha dejado pasmado como a la mayoría supongo. Me he partido la caja como nunca cuando me he tropezado con la nave del Freddy jajaja ... Los gráficos sublimes y super simpáticos, el desarrollo bueno ... jodido como un buen juego ochentero y el resto como la música etc, perfecto.
Las cosas malas que le veo al juego es básicamente que tienes tan poco espacio para moverte que la jugabilidad queda afectada y no tienes ningún control sobre el juego para evitar perder energia (cabrones!! haced los malos de 8x8!!!) ...
Enhorabuena de verdad y seguid así que estáis haciendo historia ...
----
Por cierto ... ¿Os funciona a vosotros el PAUSE en el ZX BASIC? Yo tengo que ponerle un bucle con una variable porque no me hace ni puto caso.
Chau!!
Código: Seleccionar todo
Asm
halt
End Asmna_th_an escribió:Seguramente no lo compilarás en la dirección correcta. Hay que generar el ejecutable en 29000. Si lo generas más arriba no hay sitio y se cuelga. Además, hay que limitar muchísimo la memoria que ZX Basic emplea para operaciones con cadenas. Yo no hago apenas nada con cadenas y no necesito los 4Kb que, por defecto, reserva ZX Basic, así que lo dejo en 256.
En el código fuente aparece cómo hay que compilar el juego, al principio de maritrini.bas:Código: Seleccionar todo
' To compile (1.2.9)
'
' zxb -t -B -a -S 29000 -H 256 maritrini.bas
Acabo de comprobarlo y todo ha funcionado a las mil maravillas
Para sonido puedes usar BeepFX para los efectos y Beepola para las músicas, pero hay que hacer adaptaciones a mano para poder usar el resultado en un programa ZX Basic directamente. No es complicado, pero sí laborioso, y tampoco es trivial, por lo que me lo apunto en la lista de cosas que estaría bien explicarle a la gente. En el Maritrini empleamos ambas aplicaciones. En beepmusic.bas está el código que genera beepola, adaptado. En sound.bas, el que genera BeepFX, también adaptado.
na_th_an escribió:Gracias, tío, me alegro de que te haya gustado
Sobre el PAUSE, ten en cuenta que sólo pausa hasta que pase el tiempo que le indicas (que se mide en frames, o sea, 50=1 segundo) o hasta que pulses una tecla, por lo que no te sirve para temporizar un bucle del juego (ya que el jugador pulsará teclas y te joderá los PAUSEs).
Para ello, un:Código: Seleccionar todo
Asm
halt
End Asm
Equivale a un PAUSE 1, pero sin interrumpirse por teclas ni por nada. Pon mas halts y se esperará más.
Código: Seleccionar todo
Sub MiPause (frames As Integer)
Dim i As Integer
For i = 1 To frames
Asm
halt
End Asm
Next i
End Subwilco2009 escribió:No se si ponerme directamente a investigar el funcionamiento de las rutinas que citas, o refrescar primero el ensamblador del Z80.
¿que me recomiendas?
Fíjate en subacolib.bas, el módulo donde está la biblioteca que usa el juego: está escrita entera en ASM, pero embebida en BASIC. Es lo mejor del compilador. Puedes combinar lo mejor de cada casa.Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 32 invitados