Keskustelu: Ohjelmointikysymykset: QB, VB6: myös pelin tekeminen

joo et teen seikkailu pelii mut en tiiä miten ukko saadaa liikumaa ja noi tossa pelin tekeminen linki vastukset oli aika ihmellisii voisko joku kertoo suomen kielellä miten laitetaa ukko silee et painaa alas ja se menee alas

Ilmeisesti VB:llä, eli laita formin KeyDown subiin
if KeyCode = 38 (tai joku väliltä 37 - 40 on alanuoli) then
x=x+1

Toi X on koordinaatin muuttujan nimi. Katso sitten sprite opas kanssa.

qb

Ai qb:llä. no näin
Tässä ukko on nelion muotoinen

Screen 13
X = 30
DO
LINE (100, X)-(110, X + 10), 9, BF
LINE (99, X-1)-(111, X+11), 0, B
A$ = INKEY$
IF A$ = CHR$(0) + "P" THEN X=X+1
LOOP

Tämä on hyvä aloittelialle. (katso sprite opas kanssa)

lainaus:

Ai qb:llä. no näin
Tässä ukko on nelion muotoinen

Screen 13
X = 30
DO
LINE (100, X)-(110, X + 10), 9, BF
LINE (99, X-1)-(111, X+11), 0, B
A$ = INKEY$
IF A$ = CHR$(0) + "P" THEN X=X+1
LOOP

Tämä on hyvä aloittelialle. (katso sprite opas kanssa)

entäs jos ukko on @ merkki?

no sitten vaan korvaat noi linet tällä:

LOCATE Y, X
PRINT "@"

y = 1
DO
LOCATE y,10 'Locate-käskyssä x- ja y-koordinaatit järjestyksessä niin, että y on ensin
PRINT "@"
IF k$ = CHR$(0) + "P" THEN y = y + 1
LOOP

..ja rndprogy, x on yleensä vaakasuuntainen akseli, eikä pystysuuntainen kuten tuossa koodissasi.

_Cornix_

tosta locatesta vielä selkeämmin, siitä kun on vaikeaa aatella noita x:ää ja yytä, se on "locate rivi,sarake "... nyt kyllä tuli aika turha viesti... :P

pitääks toi tehä joka kohtaa koko pelissä??? eli alku kohtaa ja sitte ku likuu alaspäin ja miten toi tehää monella näppäimellä????

Katso tuo koodi vinkki että miteen tehdään monella näppäimellä https://www.ohjelmointiputka.net/koodivinkit/23438-qb-näppäimistökäsittelijä-qb
Ja tarkoititko miten liikkuu eri suuntiin?
ja jollet teinnyt:
CHR$(0) + "H" ylös
"k" vasen
"m" oikea