198meneos
10 PRINT "Feliz cumpleaños basic!"
www.wired.com/science/discoveries/news/2008/04/dayintech_0501 por IOsobar el 01-05-2008 19:01 UTC, publicado el 01-05-2008 19:40 UTC
Tal día como hoy a estas horas, el primer programa en BASIC fue ejecutado en 1964 por los matemáticos John G. Kemeny y Thomas E. Kurtz, el lenguaje interpretado mas criticado había nacido. [Eng]
20 LOCATE 24* RND(), 80 * RND()
30 PRINT "Gracias" + chr$(8)+ chr$(8)+ chr$(8)+ chr$(8)+ chr$(8)+ chr$(8)+ chr$(8)
40 BEEP
50 PRINT " "
60 GOTO 20
Tengo el código varios programas inconclusos (de hace 25 años) en BASIC...
20 LET B = "un "
40 LET C = "friki :-P"
50 FOR I = 1 TO 5
60 PRINT "#" + I + ", " + A + B + C
70 PRINT " "
80 NEXT I
90 END
meneame.net/story/para-nostalgicos-no-ya-puedes-jugar-juegos-amstrad-ca
Estaba probando este emulador, y después de echar un vistazo a los juegos de mi infancia, se me dio por probar cuantas instrucciones de BASIC recordaba, y al cerrarlo veo este 10 PRINT "Feliz cumpleaños basic!"
run
*Break*
*Break*
END Comentarios frikis()
20 print "SWEET"
30 goto 10
Feliz Cumple, grande entre los grandes de alto nivel :-D
20 goto 10
#6 A mi me pasaba igual. No me gustaban los juegos y usaba el 464 para programar. ¿Se podrán leer de alguna manera los diskettes que usaba el Amstrad?
Echalé un vistazo a esto:
es.wikipedia.org/wiki/Compilador#Historia
C: Nonsense In Basic
(Para los Spectrumeros)
Creo que lo tuve que corregir unas 8 veces para que funcionase... menudo fin de semana.... Que tiempos aquellos...
www.ciunga.it/jxspeccy/gamesfull.html
P.D.: ya que estamos con programillas en Basic, aquí os dejo uno que discurrí cuando niño, a ver si alguien adivina para qué servía:
10 CLS:PRINT "Nº";:INPUT N:D=1
20 D=D+1
30 IF D>N THEN 60
40 IF N/D=INT(N/D) THEN 50 ELSE 20
50 PRINT N,D:N=N/D:GOTO 40
60 PRINT N,N:PRINT 1
Bueno, yo llegué tarde a esto del BASIC, me regalaron mi primer CPC464... cuando tenía 16 años... en 1.996 (sí, no os ríais, que ya existía Windows 95, he dicho que llegué tarde). Mucho tiempo después, cuando en la Uni aprendí C, me dio por copiar el programa de base de datos en BASIC que venía en el manual... y me dediqué medio verano a mejorarlo: estructuré las funciones con líneas REM ************, le metí algoritmos de programación estructurada... E incluso conseguí entender cómo funcionaba la dichosa cintita.
Y ahora veo Windows... y me echo a llorar.
-Mi programa en basic del que más orgulloso me siento: un juego de kárate para el mismo Vic 20. Se tenía que cargar en 2 partes, y al terminar, si ponías "print free(0)" te contestaba "3 bytes free", joer, 3 bytes de memoria libres que quedaban.
-El programa con el que más me he reido: el que tecleaba en los ordenadores de los centros comerciales. A saber:
10 let n=10
20 cls: input "PULSA UNA TECLA"; a$
30 print "Felicidades, eres el";n;" tonto que pica"
40 let n=n+1
50 goto 20
-A fecha de hoy, sigo usando el Basic. ¡Viva el Blitz Basic 3D!
Las variables alfanumericas van precedidas del $, así que serían
10 LET A$="Eres " y así
Y luego tendrías otro error en la linea 60, pues la sentencia PRINT usaba el signo + como suma, pero para imprimir distintos "campos" se usaba el ";", así que sería
60 PRINT "#";I;", ";A;B;C
Y la linea 90 sobra. No hacía falta decía que habías acabao, la ultima linea se acababa y yatta. Tu programa sería, corregido:
10 LET A$ = "Eres "
20 LET B$ = "un "
40 LET C$ = "friki "
50 FOR I = 1 TO 5
60 PRINT "#";I;", ";A$;B$;C$
70 PRINT " "
80 NEXT I
Siento decírtelo, pero no eres lo suficientemente friki...
#42 Yo no iría tan allá. El BASIC; aunque tuvo grandes ventajas también tuvo muchos inconvenientes: al ser interpretado era mucho más lento y menos óptimo en recursos que las alternativas compiladas; se creó como un estándar, pero era completamente distinto en cada plataforma; y no tenía soporte real de funciones, aunque se hacía el apaño con las subrutinas, y eso creaba grandes vicios que la vino a combatir programación estructurada... ¡ay, ese GOTO, cuánto le queríamos pero cuánto daño nos ha hecho! :-P
#40: muy bueno también tu post, jeje
P.D.: he dicho "señor" porque me he asegurado del sexo de TheGoOse
Sniff, sniff...Y ahora aprendiendo a programar con el XNA Game Studio.
10 for pos=35000 to 37000
20 read n
30 poke pos,n
40 next pos
50 sys 35000
60 data 232,123,2,32,32,32,222,115,233
...3 horas más tarde
1250 data 32,34,76,234
#48 Será todo lo "portable" que tu quieras, pero los juegos antiguos no tengo más remedio que ejecutarlos en DOSBOX, (y eso funciona en arquitecturas no intel, como cualquier emulador). Es lo que tiene que cada programa tuviera que llevar su propio driver de video y sonido.
¿Sólo lo he leido yo?
Cuanto código tecleado... cuando programar era programar de verdad y no tenías que saber Economía, ni ciencias políticas... y podías programar lo que quisieras que toda la familia te miraba como a un genio... "programa" decían, como si entraras en un trance místico y hablaras con Dios...
#52, estaba preocupado que nadie parecía acordarse de las fantásticas lineas DATA, esas que después de copiar un juego de una revista, comenzaba a dar problemas... ahí empezamos a tener contacto con lo que sería nuestro futuro y real trabajo en la programación...
y un Abrazo al Basic, podrán criticarte, pero cumpliste la función para la que fuiste diseñado a la perfección, algo que no se puede decir de ningún lenguaje de programación moderno, y curiosamente sí de todos los antiguos (cobol, fortran, etc...).
...
098 rem ESTO YA SE ACABA
099 ' esto también era un comentario
100 END
¡ Felicidades a Todos/as los/as Basic-queros/as !
Salu2
PD: Es el cumpleaños feliz en Basic.
ale xD
en mi casa y en mi pueblo se pensaban que era poco menos que un genio.
Luego aprobé 2º de BUP por los pelos, repeti 3º,repeti COU y las espectativas se fueron al garete.