Keskustelu: Ohjelmointikysymykset: QB: Rahat (qb)

nutipää [02.02.2004 18:35:52]

Miten onnistuu rahojen lisäys ja vähennys? Rahaa ois pelin alussa 10000 ja sit kun ostaa jonkun osan nii se vähenis. Ja rahaa tulis voitosta. Eli miten onnistuu rahojen lisäys ja vähennys?

rndprogy [02.02.2004 18:41:34]

Kaikenlaisia nutipäitä tännekin eksyy (no ei saa haukkuu).
kokeile tälläistä koodia:

raha = 10000
DO
LOCATE 1, 1: PRINT "sinulla on rahaa";RAHA;" euron edestä."
LOCATE 2, 1: PRINT "Paina jotain ostaaksesi 382 euron esineen."
locate 3, 1: PRINT "Paina esc lopettaaksesi"
if inkey$ = chr$(27) then end
sleep
raha = raha - 382 ' jos haluat lisätä rahaa laitat miinus merkin tilalle (yllätys yllätys) plus merkin.
LOOP

Antti Laaksonen [02.02.2004 19:00:46]

Määrittele ensin muuttuja, jossa rahamäärä on.

DIM rahat AS LONG 'LONG = pitkä kokonaisluku

Rahamäärän muuttaminen tapahtuu näin:

rahat = rahat + 15 '15 euroa lisää
rahat = rahat - 5  '5 euroa pois

Ja PRINT-käskyllä muuttujan arvon voi tulostaa (huomaa, että välilyönnit tulevat automaattisesti):

PRINT "Sinulla on nyt rahaa"; rahat; "euroa."

nutipää [02.02.2004 20:37:34]

kiitti

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Kirjautuminen