Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros temas > La Taberna
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

 
 
Herramientas Buscar en Tema Desplegado
  #3  
Antiguo 02-06-2008
Avatar de Ñuño Martínez
Ñuño Martínez Ñuño Martínez is offline
Moderador
 
Registrado: jul 2006
Ubicación: Ciudad Catedral, Españistán
Posts: 6.025
Poder: 27
Ñuño Martínez Tiene un aura espectacularÑuño Martínez Tiene un aura espectacular
Totalmente de acuerdo.

Aunque yo empecé a programar con uno de esos lenguajes interpretados: el MSX-BASIC. Claro que eran otros tiempos...
Código:
1 ' Saludos...
5 DEFINT A-Z
10 SCREEN 2, 1
20 OPEN "GRP:" AS #1
30 Tmp$ = "": FOR n = 1 TO 8: Tmp$ = Tmp$ + CHR$(n): NEXT n
35 SPRITE$(0) = Tmp$
40 PRESET (19, 20): PRINT #1, "Hola a todos"
50 FOR x = 0 TO 240: PUT SPRITE 0, (x, 100), 10, 0: NEXT x
60 FOR x = 240 TO 0 STEP (-1): PUT SPRITE 0, (x, 100), 10, 0: NEXT x
70 GOTO 50
Me pregunto si funcionaría...

Última edición por Ñuño Martínez fecha: 03-06-2008 a las 08:44:32. Razón: Pues no, no funcionaba. Ahora creo que sí ;)
Responder Con Cita
 


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
uso de punteros David OOP 19 14-12-2009 09:48:37
Punteros a objetos chinchan C++ Builder 4 06-05-2008 14:22:26
Punteros davitcito Varios 2 25-04-2005 22:46:24
Punteros rafadrover OOP 8 18-09-2003 10:09:47


La franja horaria es GMT +2. Ahora son las 20:55:30.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi