Si usted no tiene QBasic en su sistema , puede descargar la versión original en QB sitio de Pete ( ver Recursos) , o una versión más reciente llamado QB64 que está diseñado para ser compatible con el original . Una vez que lo abre, se le presentará con una pantalla azul. Escriba el texto siguiente: " ! "
CLSPRINT "Hola , mundo " INPUT " ¿Cómo te llamas " , el nombre $ PRINT " Hola" ; ; name $ End of
A continuación, pulse Mayús + F5 para ejecutar el programa . Esto es lo que sucede :
" CLS " significa " claro de la pantalla " y asegura que su programa se inicia con una pantalla en blanco , de lo contrario , verá los restos del programa anterior
" PRINT. " simplemente imprime una cadena de texto en la pantalla. Si acaba de imprimir un número, usted no necesita las comillas.
" ENTRADA" es una manera de pedir la opinión de un usuario. El final de la línea , "name $", es una variable : es donde se almacena la respuesta del usuario . Se le puede llamar lo que quieras , las variables que contienen texto deben terminar con " $", y las variables que contienen sólo números deben terminar con "% "
La segunda línea " PRINT" imprime texto junto con cualquiera que sea el . . usuario introduce
" END" , como era previsible , termina el programa
QBasic adivinanzas
Escriba el siguiente código en QBasic : .
CLSchances % = 1RANDOMIZE TIMERnumber % = INT ( RND * 10 ) + 1PRINT " estoy pensando en un número de 1 a 10. tiene tres oportunidades para hacerlo bien . "
hacer mientras oportunidades % < 4PRINTPRINT " Usted es de la suerte #"; chances % ; PRINTINPUT " adivina el número" " . " ; " . demasiado baja " supongo % SI adivinar % = % número THENGOTO youwinELSEIF supongo % < % número THENPRINT ELSEIF adivinar %> número % THENPRINT " demasiado alta ". ELSEPRINT " ha habido un error. Inténtalo de nuevo . " END IFchances % = chances % + 1LOOP
PRINTPRINT " Te has quedado sin posibilidades ! ¡Lo siento! " END
youwin : "!" PRINTPRINT "¡ lo has adivinado el número el número era" ; ; " número % " End of
En este juego , el programa genera un número aleatorio entre 1 y 10 y le ofrece tres oportunidades para hacer las cosas bien , que le da pistas después de las dos primeras pistas . Incluye una gran cantidad de conceptos de programación .
Después de limpiar la pantalla, " chances % = 1 " crea una variable de número y lo establece en 1 . Esto hará un seguimiento de todas las posibilidades de que el jugador tiene que adivinar el número .
Las dos líneas siguientes crean el número aleatorio . " RANDOMIZE TIMER" es simplemente el método QBasic utiliza para llegar a seleccionar al azar los números. La siguiente línea , "Número % = INT ( RND * 10 ) + 1 " , genera un número aleatorio entre 1 y 10 y la almacena en la variable número %. Parece complicado, pero básicamente está diciendo " lo convierten en uno de los diez primeros números enteros positivos. " El "+ 1 " al final se asegura de que el número será de 1 a 10 , y no del 0 al 9 .
El "DO WHILE ... " línea crea un bucle. Cada vez que vea una línea que comienza con " hacer", desplácese hacia abajo un poco hasta que encuentre una línea que dice "LOOP ". Todo entre esa línea seguirá bucle una y otra vez hasta que se cumple una determinada condición - en este caso , hasta posibilidades % ya no es inferior a cuatro ( o " < 4 " en la programación - hablar )
.
continuación, el programa pide una conjetura con el comando INPUT, lo almacena en conjetura %, y se procede a procesar con el método de " IF ... THEN ... ELSE " . Como puedes ver , funciona lógicamente : "Si una afirmación es verdadera , entonces esto; ELSEIF otra afirmación es cierta , entonces hacer esto , cualquier otra cosa más es verdad, entonces lo hace. "
El único extra aspecto es el comando GOTO . En este caso , si el número es correcto , el programa pasa a la sección del documento etiquetado como " youwin " .
Justo antes del final del bucle , no hay línea de la " posibilidades % = posibilidades % + 1 " . Eso es para asegurar el bucle sólo se ejecuta tres veces.
Si el bucle se ejecuta tres veces y el jugador nunca ha sido enviada a la sección " youwin " , el jugador pierde , por lo que inmediatamente después del bucle es una línea de información a la jugador de la pérdida. A continuación es la sección de " youwin " , declararon con sólo escribir el nombre de la sección con dos puntos.
Más Ideas del juego
PRINT, ENTRADA , IF ... THEN ... ELSE y GOTO , usted tiene todo lo necesario para crear un a-hace fácil de aventura de texto . He aquí algunos ejemplos de código :
: Construcción : INPUT " . Usted está de pie en una casa ¿Qué desea hacer" , la elección $ IF elección $ = " subir " ENTONCES GOTO GOTO upstairsELSE Casa en < p> Trate de hacerlo tan complejo como usted puede sobre la base de lo que sabe. Y para más inspiración, la web ofrece un montón de descargas gratuitas de juegos QBasic . Jugar ellos y examinar el código detrás de ellos para aprender nuevas técnicas y obtener ideas.