Autor Tema: Tenliners  (Leído 948 veces)

javierglez

  • Commodore Master
  • *****
  • Mensajes: 453
  • terminator not seen
    • Ver Perfil
Tenliners
« en: Noviembre 28, 2022, 22:52:05 »
Un tenliner es un programa en BASIC de menos de 10 lineas. Se hacen concursos. Este es un tenliner del tipico juego de la serpiente que destaca por ser especialmente corto.

Al comer los roscos (al pasar por encima) la serpiente crece. Si choca contra los bordes o contra una cruz el juego se acaba. La puntuacion es el numero de roscos comidos. La letra A gira a la izquierda y la D a la derecha.

Adjunto un listado y una captura del juego en marcha (he puesto el emulador al 10% de velocidad porque soy lento).

* listado.jpg (40.15 kB . 479x163 - visto 255 veces)

* snake.png (2.6 kB . 384x272 - visto 269 veces)
« última modificación: Diciembre 03, 2022, 19:54:09 por javierglez »

javierglez

  • Commodore Master
  • *****
  • Mensajes: 453
  • terminator not seen
    • Ver Perfil
Re:Tenliners
« Respuesta #1 en: Diciembre 03, 2022, 19:59:47 »
Aquí otro tenliner, este tiene 10 líneas, es de algún concurso, se llama firefighter. Es un listado más difícil de seguir.
Funciona un poco como el blitz, el cursor se mueve de izquierda a derecha y de arriba abajo y al apretar el botón del joystick sueltas "agua" (pintando el edificio de azul). El "agua" hay que soltarlo sobre todo donde hay "llamas" (celdas del edificio en color rojo), porque está limitada y se gasta.

* listadof.bmp (18.63 kB . 480x317 - visto 183 veces)

* firef.png (2 kB . 384x272 - visto 253 veces)


« última modificación: Diciembre 03, 2022, 20:01:23 por javierglez »

josepzin

  • Administrador
  • Commodore Master
  • *****
  • Mensajes: 13630
  • Commodoreador web
    • Ver Perfil
    • Mi blog
Re:Tenliners
« Respuesta #2 en: Enero 29, 2023, 21:37:56 »
No tiene 10 lineas pero tiene 11 ;)

How about explaining what it does?
https://www.reddit.com/r/c64/comments/10l4id9/interesting_basic_program/


Spoiler
www.retroinvaders.com | www.commodoreplus.org  | josepzin.blogspot.com

javierglez

  • Commodore Master
  • *****
  • Mensajes: 453
  • terminator not seen
    • Ver Perfil
Re:Tenliners
« Respuesta #3 en: Febrero 05, 2023, 23:52:05 »
Aquí otro tenliner que genera un laberinto, un punto de entrada y otro de salida y hay que mover una bola de la entrada a la salida con las letras abcd. Cada vez que se ejecuta el programa cambia el laberinto.

* listado.jpg (60.58 kB . 480x132 - visto 174 veces)

* laberinto.gif (113.05 kB . 384x272 - visto 192 veces)
(por cierto que no es demasiado difícil de modificar para que funcione en el PET)
« última modificación: Febrero 06, 2023, 00:09:49 por javierglez »

briefer

  • Commodorero
  • **
  • Mensajes: 29
  • SYS 0
    • Ver Perfil
    • https://www.youtube.com/briefer666
Re:Tenliners
« Respuesta #4 en: Febrero 06, 2023, 20:17:24 »
Aquí otro tenliner que genera un laberinto, un punto de entrada y otro de salida y hay que mover una bola de la entrada a la salida con las letras abcd. Cada vez que se ejecuta el programa cambia el laberinto.
 [ Invalid Attachment ]
 [ Invalid Attachment ]
(por cierto que no es demasiado difícil de modificar para que funcione en el PET)
Recursividad sin recursividad

javierglez

  • Commodore Master
  • *****
  • Mensajes: 453
  • terminator not seen
    • Ver Perfil
Re:Tenliners
« Respuesta #5 en: Febrero 20, 2023, 20:03:06 »
Aqui un juego bastante interesante de un youtuber llamado Josip Retrobits, que lo ha presentado al concurso de este año. El tipo parece estar orgulloso de haber encontrado la manera que el kernal le haga el scroll (de arriba abajo, que es al revés del que normalmente activa el editor).
https://www.youtube.com/watch?v=Z-esqeC9Jws

En este otro video explica en que momento se activa esa funcion del kernal, haciendo cierta utilizacion del editor.
https://www.youtube.com/watch?v=zkR64TdpTSE

Lo he probado en VICE y curiosamente esa misma conducta se consigue en el editor del VIC20 y del CBM -II, pero sadly no en el editor del PET.
« última modificación: Febrero 20, 2023, 21:25:49 por javierglez »

josepzin

  • Administrador
  • Commodore Master
  • *****
  • Mensajes: 13630
  • Commodoreador web
    • Ver Perfil
    • Mi blog
Re:Tenliners
« Respuesta #6 en: Febrero 20, 2023, 21:33:38 »
Increible lograr esa velocidad de scroll con el BASIC!!!
www.retroinvaders.com | www.commodoreplus.org  | josepzin.blogspot.com

javierglez

  • Commodore Master
  • *****
  • Mensajes: 453
  • terminator not seen
    • Ver Perfil
Re:Tenliners
« Respuesta #7 en: Abril 14, 2023, 17:16:25 »
Ya han salido los resultados del concurso de este año.

https://gkanold.wixsite.com/homeputerium/results-2023

En la categoria principal de 80 caracteres/linea gana un Pacman para Oric

https://bunsen.itch.io/pacman-by-rax

Lo mas espectacular esta como siempre en la categoria de 256 caracteres/linea en Atari aunque este año les ha ganado el MSX.

https://bunsen.itch.io/jumpman-by-eric-carr

https://bunsen.itch.io/10-lines-princess-by-honoppe

Este año había mas entradas de ordenadores raros como el Alice, el Enterprise, el TI99, y en la categoría wild cosas para Amiga y Pico 8.