Code Golf: "dibuja los aros olímpicos en ASCII art"

(Casi) cualquier cosa que quieras compartir será bienvenida por la comunidad

Moderador: Sir Cilve Sinclair

Responder
Avatar de Usuario
mcleod_ideafix
Johnny Jones
Mensajes: 3984
Registrado: Vie Sep 21, 2007 1:26 am
Ubicación: Jerez de la Frontera
Contactar:

Code Golf: "dibuja los aros olímpicos en ASCII art"

Mensaje por mcleod_ideafix » Jue Ene 23, 2014 11:57 am

Mi propuesta, usando BASIC del Spectrum :D
http://codegolf.stackexchange.com/quest ... 9057#19057

Hay otra propuesta, usando BASIC del C64

¿Se podría hacer en menos bytes?
Web: ZX Projects | Twitter: @zxprojects

Avatar de Usuario
Metalbrain
Freddy Hardest
Mensajes: 590
Registrado: Lun May 07, 2007 8:17 am
Ubicación: Sevilla
Contactar:

Re: Code Golf: "dibuja los aros olímpicos en ASCII art"

Mensaje por Metalbrain » Jue Ene 23, 2014 12:41 pm

mcleod_ideafix escribió:¿Se podría hacer en menos bytes?


Línea 20: elimina el LET a = VAL "84": y cambia a por a+a y a+a por a+a+a+a

3 bytes menos

PD: Se elimina también el LET b= VAL "87": y se cambia b por VAL "87", otro byte menos.

PPD: Otros dos bytes menos. Cambiando en la línea 5 el VAL "7" por INT PI, y luego en la línea 30 se cambia el "63" por "59".

Ya estamos en 255, la longitud cabe en 8 bits.

PPPD: El INT no hace falta realmente en la línea 5, se quita y otro byte menos.
SevenuP se escribe con u minúscula y P mayúscula.

Avatar de Usuario
Metalbrain
Freddy Hardest
Mensajes: 590
Registrado: Lun May 07, 2007 8:17 am
Ubicación: Sevilla
Contactar:

Re: Code Golf: "dibuja los aros olímpicos en ASCII art"

Mensaje por Metalbrain » Jue Ene 23, 2014 4:28 pm

Por último, uniendo las 4 primeras líneas en una sola, se ahorran otros 12 bytes en total. El tamaño quedaría en 242 bytes.
SevenuP se escribe con u minúscula y P mayúscula.

Responder

¿Quién está conectado?

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