Programm l?uft nicht auf Wiz.

[Shogo]

Hallo,

ich wollte gerade eben mal mein erstes Programm f?r den Wiz schreiben.

Auf Windows lief noch alles aber als ich ?ber Compiler -> Erstellen Multiplatform eine gpe Datei erzeugte blieb der Bildschirm beim Wiz nach Programmstart schwarz.
(Habe auch unter Projekt -> Optionen gp2xWiz eingestellt aber wenn ich auf erstellen gehe erzeugt er mir immer eine .exe)

Dann habe ich mal dieses kleine Programm ausgef?hrt.

Code (glbasic) Select Expand

DRAWRECT 0,0,320,240,RGB(255,0,0)
PRINT "Hello World", 100, 100
SHOWSCREEN
KEYWAIT
END

Bei dem Code beendet er das Programm und ich lande wieder im Menu.
Was mache ich verkehrt?

Mfg Martin

Edit: Das Progr?mmchen von oben l?uft. Lag irgendwie an der SD Karte vom Nand gehts.

Aber mein anderes Programm geht immer noch nicht. Da bleibt der Bildschirm schwarz.
Hier mal der code.

Code (glbasic) Select Expand

//
GLOBAL SPEED% = 1
GLOBAL SPEED_BALL% = 3
GLOBAL I%

//
DIM SINUS#[91]
DIM COSINUS#[91]

FOR I% = 0 TO 90
SINUS[I] = SIN(I)
COSINUS[I] = COS(I)
NEXT

// TASTEN

GLOBAL KEY_OBEN = 200
GLOBAL KEY_UNTEN = 208
GLOBAL KEY_ESC% = 01

// 1 = CLASSIC
GLOBAL MODE% = 1

//Schl?ger 50*10
GLOBAL SCHLAEGER1IMG% = 1
GLOBAL SCHLAEGER1X% = 5
GLOBAL SCHLAEGER1Y% = 95

GLOBAL SCHLAEGER2IMG% = 2
GLOBAL SCHLAEGER2X% = 305
GLOBAL SCHLAEGER2Y% = 95

//Ball 10*10
GLOBAL BALLIMG% = 3
GLOBAL BALLX# = 155
GLOBAL BALLY# = 115
GLOBAL BALLRICHTUNGX% = RND(1) // 0 = rechts, 1 = links
GLOBAL BALLRICHTUNGY% = RND(1) // 0 = hoch, 1 = runter
GLOBAL BALLWINKEL% = RND(45)

// Alles Laden
LOADBMP "CLASSIC/back.PNG"
LOADSPRITE "CLASSIC/schlaeger.png", SCHLAEGER1IMG%
LOADSPRITE "CLASSIC/schlaeger.png", SCHLAEGER2IMG%
LOADSPRITE "CLASSIC/ball.png", BALLIMG%

WHILE KEY(KEY_ESC%) = FALSE

BEWEGEN()
KI()
ZEICHNEN()

SHOWSCREEN
WEND

END

FUNCTION KI%:

IF BALLY + 5 < SCHLAEGER2Y% + 25
IF SCHLAEGER2Y% > 0
SCHLAEGER2Y% = SCHLAEGER2Y% - SPEED
ENDIF
ELSEIF BALLY + 5 > SCHLAEGER2Y% + 25
IF SCHLAEGER2Y% < 190
SCHLAEGER2Y% = SCHLAEGER2Y% + SPEED
ENDIF
ENDIF

ENDFUNCTION

FUNCTION BEWEGEN%:

// SPIELER
IF KEY(KEY_OBEN) = 1 AND SCHLAEGER1Y% > 0
SCHLAEGER1Y% = SCHLAEGER1Y% - SPEED
ELSEIF KEY(KEY_UNTEN) = 1 AND SCHLAEGER1Y% < 190
SCHLAEGER1Y% = SCHLAEGER1Y% + SPEED
ENDIF

// BALL
IF BALLRICHTUNGX% = 0
BALLX = BALLX + (SPEED_BALL * COSINUS[BALLWINKEL])
ELSEIF BALLRICHTUNGX% = 1
BALLX = BALLX - (SPEED_BALL * COSINUS[BALLWINKEL])
ENDIF

IF BALLRICHTUNGY% = 0
BALLY = BALLY - (SPEED_BALL * SINUS[BALLWINKEL])
ELSEIF BALLRICHTUNGY% = 1
BALLY = BALLY + (SPEED_BALL * SINUS[BALLWINKEL])
ENDIF


ENDFUNCTION

FUNCTION ZEICHNEN%:

DRAWSPRITE SCHLAEGER1IMG%, SCHLAEGER1X%, SCHLAEGER1Y%
DRAWSPRITE SCHLAEGER2IMG%, SCHLAEGER2X%, SCHLAEGER2Y%
DRAWSPRITE BALLIMG%, BALLX, BALLY

ENDFUNCTION

GLOBAL ID_GLOBAL% = 0
FUNCTION GETID%:
INC ID_GLOBAL%, 1
RETURN ID_GLOBAL%
ENDFUNCTION

[Schranz0r]

Lade mir doch mal das Projekt irgendwo rauf und schick mir den Link in einer PM( Message ).
Ich schau mir dann mal dein Projekt an und sag dir dann gegebenfalls wo der Fehler ist

[Kitty Hello]

Geht's unter Win32?

[Schranz0r]

Hat mir leider noch nix geschickt!