Juegos "Super Mario"-Style

Juegos, aplicaciones, ROMs;
todo lo que se pueda ejecutar en un Spectrum

Moderador: Sir Cilve Sinclair

Juegos "Super Mario"-Style

Notapor K.O.D. el Lun Abr 10, 2017 4:03 pm

Hola, le he estado dando un vistazo al WOS buscando juegos estilo Super Mario (scroll horizontal, plataformas...), me sorprende no haber encontrado demasiados, aunque me ha llamado mucho la atención Turbo The Tortoise (http://www.worldofspectrum.org/infoseek ... id=0005466). Con estilo plataformero japo, creo que podríamos rescatar también The New Zealand History (http://www.worldofspectrum.org/infoseek ... id=0003399) y Rainbow Islands (http://www.worldofspectrum.org/infoseek ... id=0000724).

Dejando de lado las demos rusas, alguien conoce algún otro título interesante?

Un saludo
K.O.D.
Herbert
 
Mensajes: 61
Registrado: Mar Sep 30, 2008 8:45 am
Ubicación: Valencia

Re: Juegos "Super Mario"-Style

Notapor radastan el Mar Abr 11, 2017 2:45 pm

Mi Fantastic Adventure es una mezcla de Super Mario Bros y Alex Kidd, pero creo que no te va a gustar porque lo hice en BASIC. Es de la época, ojo, no es actual, y fue rechazado por Microhobby debido a que en esa época ya estaban todos en ensamblador y no veían bien meter un juego BASIC puro en sus cintas.

Eso si, si le das una oportunidad creo que puedes encontrar algo muy peculiar, tenía tres mundos distintos (uno bajo el agua), y hasta secuencia final.
_________________________________________
Hay otras páginas.... pero no son Bytemaniacos
http://www.bytemaniacos.com
Orgullo de 8 bits
_________________________________________
Avatar de Usuario
radastan
Phantomas
 
Mensajes: 2126
Registrado: Lun May 07, 2007 5:34 pm

Re: Juegos "Super Mario"-Style

Notapor K.O.D. el Dom Abr 16, 2017 4:59 pm

radastan escribió:Mi Fantastic Adventure es una mezcla de Super Mario Bros y Alex Kidd, pero creo que no te va a gustar porque lo hice en BASIC.


Ya lo tenía descargado, habré jugado hasta la pantalla 5 o así. Me parece muy chulo, me gusta el tema de la programación en Sinclair BASIC y sus límites. Hace no mucho precisamente estaba modificando el código de https://tcyr.wordpress.com/2007/11/26/programacion-3-mejorando-el-motor-de-plataformas-basic-y-otras-coserias/, haciendo el sprite más grande y añadiendo cosas, aunque mi idea era compilar con HiSoft.

Para el tema del scroll, he visto un código útil, pero no sé muy bien de donde lo he copiado:

Código: Seleccionar todo
   4 PLOT 75,50: DRAW 75,0: DRAW 0,100: DRAW -75,0: DRAW 0,-100
   5 PRINT FLASH 1;AT 0,0;"Espere..."
  10 LET xm=12: LET ym=15: LET xw=8: LET yw=11: LET xt=10: LET yt=4: DIM m$(ym,xm): FOR r=1 TO ym: FOR s=1 TO xm: READ m$(r,s): NEXT s: NEXT r
  11 PRINT AT 0,0;"         "
  12 LET xd=1: LET yd=1: LET xp=8: LET yp=8: GO SUB 90: PRINT AT yp+yt-1,xp+xt-1; INVERSE 1;" "
  20 PAUSE 0: LET c= CODE INKEY$
  21 LET xk=(c=9)-(c=8): LET xk=xk AND (xp+xk>=1 AND xp+xk<=xm)
  22 LET yk=(c=10)-(c=11): LET yk=yk AND (yp+yk>=1 AND yp+yk<=ym)
  23 LET xp=xp+xk: LET yp=yp+yk: LET xx=xd+xw-1: LET yy=yd+yw-1: LET xz=xm-xw+1: LET yz=ym-yw+1
  30 IF xp<xd OR xp>xx OR yp<yd OR yp>yy THEN LET xd=xd-(xp<xd)+(xp>xx): LET yd=yd-(yp<yd)+(yp>yy): LET xd=xd+NOT xd: LET yd=yd+NOT yd: LET xd=xd-(xd-xz AND xp>xd+xx): LET yd=yd-(yd-yz AND yp>yd+yy): GO SUB 90
  50 LET xs=xp+xt-xd: LET ys=yp+yt-yd: PRINT AT ys-yk,xs-xk;m$(yp-yk,xp-xk);AT ys,xs; INVERSE 1;" ": GO TO 20: REM m$(yp,xp)
  90 FOR r=yd TO yd+yw-1: PRINT AT r-yd+yt,xt;m$(r,xd TO xd+xw-1): NEXT r: RETURN
 100 DATA "0","0","0","0","0","0","0","0","0","0","0","0"
 110 DATA "0"," "," "," "," "," "," "," "," "," "," "," "
 120 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 130 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 140 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 150 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 160 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 170 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 180 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 190 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 200 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 210 DATA "0"," "," "," ","5","6","7","8","9","0","1","2"
 220 DATA "0"," ","3","4","5","6","7","8","9","0","1","2"
 230 DATA "0"," "," "," "," "," ","7","8","9","0","1","2"
 240 DATA "0","0","0","0","0","0","7","8","9","0","1","2"


Quizá esto debiera ir en el foro de programación.

En cualquier caso, muy bueno tu programa, a ver cuando vuelven los concursos de BASIC (http://www.bytemaniacos.com/?page_id=2) :D

Un saludo.
K.O.D.
Herbert
 
Mensajes: 61
Registrado: Mar Sep 30, 2008 8:45 am
Ubicación: Valencia

Re: Juegos "Super Mario"-Style

Notapor radastan el Dom Abr 16, 2017 11:23 pm

Los concursos BASIC se pueden dar por muertos ahora mismo a menos que le demos otro formato, el último casi se queda desierto. La gente ya se ha pasado al C, de echo mi kit de Z88DK es prácticamente programar en C como si fuera BASIC y sin preocuparte por las rutinas gráficas.

Los concursos, además, tuvieron un cometido en una época determinada (antes no había los desarrollos ni la escena que tenemos ahora). Yo sólo canalizo soluciones a necesidades según van viniendo. :D
_________________________________________
Hay otras páginas.... pero no son Bytemaniacos
http://www.bytemaniacos.com
Orgullo de 8 bits
_________________________________________
Avatar de Usuario
radastan
Phantomas
 
Mensajes: 2126
Registrado: Lun May 07, 2007 5:34 pm


Volver a Juegos

¿Quién está conectado?

Usuarios navegando este Foro: No hay usuarios registrados visitando el Foro y 1 invitado