Ok well, im really bad at this stuff. i cant really program and the biggest program i made is a 2D rpg. I found some code with pictures and moveing people and im trying to make an rpg with all the code i got. here is what i have so far. Help please!!!
Graphics 800,600,32,2 AutoMidHandle True Const UPKEY=200 Const DOWNKEY=208 Const LEFTKEY=203 Const RIGHTKEY=205 Type player Field x,y,startX,startY Field name$ End Type name$ = "nick" Global image=LoadImage("statusbar.png") Global background2=LoadImage("mapp 2.bmp") Global player.player=New player startX = 50 startY = 50 spacing = 10 ; 10 pixels spacing. DrawImage image,startX,startY Text (startX + (ImageWidth(image)/2)) - (StringWidth(name)/2) , startY + ImageHeight(image) + spacing, name typeini() While Not KeyDown(1) ;Esc Cls leveldraw() playermovement() leveltrans() Flip Wend Function typeini() player\x=500 player\y=100 End Function Function leveltrans() If player\x=>1018 player\x=player\x-1017 ElseIf player\x=<6 player\x=player\x+1018 ElseIf player\y=>701 player\y=player\y-700 ElseIf player\y=<5 player\y=player\y+695 EndIf End Function Function playermovement() If KeyDown(UPKEY) player\y=player\y-3 ElseIf KeyDown(DOWNKEY) player\y=player\y+3 ElseIf KeyDown(RIGHTKEY) player\x=player\x+3 ElseIf KeyDown(LEFTKEY) player\x=player\x-3 EndIf End Function Function leveldraw() TileImage background2 ;DrawImage tree, ;DrawImage statusbarimage,400,580 DrawImage image,player\x,player\y End Function