Das deutsche QBasic- und FreeBASIC-Forum

[Progger_X]

[Kai Bareis]

Das geht deswegen nicht weil die Variablen X und Y nicht definiert sind.
Entweder du schreibst
DIM x AS INTEGER, y AS INTEGER
oder du machst hinter die X und Y Variablen ein % dann sollte es auch gehen
_________________
MfG Kai Bareis
Es ist noch kein Meister vom Himmel gefallen! Warum einfach wens auch umständlich geht!

[Progger_X]

Danke, so klappts!

Wie ist das dann bei folgendem Code:

[code]
DIM x AS INTEGER, y AS INTEGER
DIM page AS INTEGER
DIM taste(128) AS INTEGER
CALL xscreen(&H101)
x = 200
y = 100
CLS
page = 2
DO
CALL set.picture(x, y, "rs.bmp")
CALL set.picture(1, 50, "kuchen.bmp")
CALL set.view.page(page)
IF page = 1 THEN page = 2 ELSE page = 1
CALL set.work.page(page)
CLS
tasten$ = INKEY$
IF tasten$ = "w" THEN y = y - 3
IF tasten$ = "s" THEN y = y + 3
IF tasten$ = "a" THEN x = x - 3
IF tasten$ = "d" THEN x = x + 3
LOOP UNTIL e = 1
[/code]

Wieso kommen da diverse Grafikfehler?

[Progger_X]

Hat sich erledigt, habe hilfe vom Hersteller höchstselbst bekommen.