Als je niet QBasic op uw systeem hebt , kunt u de originele versie op Pete's QB Site ( zie bronnen ) , of een meer recente versie, genaamd QB64 die is ontworpen om te downloaden verenigbaar zijn met het origineel . Zodra je het opent, zult u worden gepresenteerd met een blauw scherm . Typ het volgende : " ! "

CLSPRINT
" Hallo , wereld " INPUT " Wat is uw naam " ; naam $ PRINT " Hallo , " ; ; naam $ END

Druk vervolgens op Shift + F5 om het programma uit te voeren . Hier is wat er gebeurt :

" CLS "
staat voor " duidelijke screen " en zorgt ervoor dat uw programma begint met een leeg scherm , anders zult u overblijfselen uit het vorige programma zie

"PRINT
. " drukt gewoon een tekenreeks naar het scherm . Als je gewoon het afdrukken van een nummer , hoeft u niet de aanhalingstekens nodig .

" INPUT "
is een manier om te vragen om input van een gebruiker . Het einde van de lijn , "name $" , is een variabele : het is wanneer het antwoord van de gebruiker wordt opgeslagen . U kunt het noemen wat je wilt ; variabelen die tekst bevatten moet eindigen met " $ " , en variabelen die bevatten alleen nummers moet eindigen met " % "

De tweede "PRINT " lijn afgedrukt tekst samen met wat het . . gebruiker ingegeven

" END "
, voorspelbaar , eindigt het programma
QBasic Raden Spelletjes

Voer de volgende code in QBasic : .

CLSchances % = 1RANDOMIZE TIMERnumber % = INT ( RND * 10 ) + 1PRINT " ik denk aan een nummer van 1 tot 10. Je krijgt drie kansen om het goed te krijgen . "

DO WHILE kansen % < 4PRINTPRINT " Je bent op toeval # " ; kansen % ; PRINTINPUT " denk dat het nummer" " . " ; " . Te laag 'raden % IF denk % = aantal % THENGOTO youwinELSEIF denk % < nummer% THENPRINT ELSEIF denk % > nummer % THENPRINT " Te hoog . " ELSEPRINT 'Er is een fout opgetreden. Probeer het opnieuw. " END IFchances % = kans % + 1LOOP

PRINTPRINT
" Je liep uit kansen! Sorry! " END < br

youwin > : " ! " PRINTPRINT " ! je raadt het nummer het nummer was " ; ; "nummer % " END

In dit spel , maakt het programma een willekeurig getal van 1 tot 10 en biedt u drie kansen om het goed te krijgen , waardoor u aanwijzingen na de eerste twee tips . Het bevat veel van de programmering concepten .

Na het wissen van het scherm , " kansen % = 1 " creëert een aantal variabele en stelt deze in op 1 . Dit zal alle van de kansen van de speler heeft om het getal te raden te volgen .

De volgende twee regels maken het willekeurig getal . " RANDOMIZE TIMER " is gewoon de methode QBasic gebruikt om te komen met zijn nummers willekeurig . De volgende regel "nummer % = INT ( RND * 10 ) + 1 " , wordt een willekeurig getal van 1 tot 10 en opgeslagen in het nummer% variabele . Het ziet er ingewikkeld , maar eigenlijk is het gewoon te zeggen " Maak het een van de eerste tien positieve gehele getallen . " De " + 1 " aan het einde zorgt ervoor dat het aantal zal zijn van 1 tot 10 en niet van 0 tot 9 .

De " DO WHILE ... " lijn creëert een lus . Wanneer zie je een regel die begint met " DO ", scroll naar beneden een beetje tot je een regel die zegt te vinden " LOOP . " Alles wat daar tussen die lijn zal weer blijven lus over en over totdat een bepaalde voorwaarde wordt voldaan - in dit geval , tot kansen % niet langer dan vier ( of " < 4 " in de programmering - spreken ) op Twitter . vraagt ​​

het programma vervolgens voor een gok met de INPUT-commando , slaat het op in gok % , en de opbrengst te verwerken met de " IF ... THEN ... ELSE " -methode . Zoals u kunt zien , het werkt logisch : " ALS een uitspraak waar is , is dit dan doen ; ELSEIF andere uitspraak waar is , dan is dit te doen ; ELSE iets anders waar is , doe dan dit. "

De enige extra aspect is de GOTO commando . In dit geval, als het nummer correct is , gaat het programma naar het gedeelte van het document label " youwin " . P Right
vóór het einde van de lus , is er de " kans % = kans % + 1 " regel . Dat is aan de lus te verzekeren rijdt slechts drie keer .

Als de lus rijdt drie keer en de speler is nooit verzonden naar de sectie " youwin " , de speler verliest , dus direct na de lus is een lijn informeren van de speler van het verlies . Hieronder is de sectie ' youwin " , verklaarde gewoon door het schrijven van de naam van de sectie met een dubbele punt .
More Game Ideas

Met PRINT , INPUT , IF ... THEN ... ELSE , en GOTO , je hebt alles wat je nodig hebt om een eenvoudig te maken tekst avontuur te creëren . Hier zijn een paar voorbeeld code :

huis
: INPUT " . Je staat in een huis Wat zou je graag willen doen " ; keuze $ IF keuze $ = " naar boven gaan " THEN GOTO upstairsELSE GOTO huis

Probeer het zo complex als je kunt op basis van wat je weet te maken. En voor meer inspiratie , het web biedt tal van gratis QBasic game downloads . Speel ze en onderzoekt de code achter hen om nieuwe technieken te leren en ideeën .