Miksi Coolbasic ei suostu lataamaan karttaa?
Pelipohja on tämmöinen:
FrameLimit 40
kartta = LoadMap("Y:\Sirénin ATKt\W9\Henri Mikkola\CB\kartta.til","Media\tileset.bmp")
PlayObject kartta,0,0,1
ukko1 = LoadObject ("Y:\Sirénin ATKt\W9\Henri Mikkola\CB\Ukko\ukko1.bmp",60)
ukko2 = LoadObject ("Y:\Sirénin ATKt\W9\Henri Mikkola\CB\Ukko\ukko2.bmp",60)
Repeat
If LeftKey() Then TurnObject ukko1,5
If RightKey() Then TurnObject ukko1,-5
If UpKey() Then MoveObject ukko1,2
If DownKey() Then MoveObject ukko1,-2
If KeyDown(cbKeyA) Then TurnObject ukko2,5
If KeyDown(cbKeyD) Then TurnObject ukko2,-5
If KeyDown(cbKeyW) Then MoveObject ukko2,2
If KeyDown(cbKeyS) Then MoveObject ukko2,-2
DrawScreen
Forever
Can't Load Map
Re: Can't Load Map
Kannattaa laittaa koodi [ code ] tagien sisään.HenriMi wrote:Miksi Coolbasic ei suostu lataamaan karttaa?
Pelipohja on tämmöinen:
Code: Select all
FrameLimit 40 kartta = LoadMap("Y:\Sirénin ATKt\W9\Henri Mikkola\CB\kartta.til","Media\tileset.bmp") PlayObject kartta,0,0,1 ukko1 = LoadObject ("Y:\Sirénin ATKt\W9\Henri Mikkola\CB\Ukko\ukko1.bmp",60) ukko2 = LoadObject ("Y:\Sirénin ATKt\W9\Henri Mikkola\CB\Ukko\ukko2.bmp",60) Repeat If LeftKey() Then TurnObject ukko1,5 If RightKey() Then TurnObject ukko1,-5 If UpKey() Then MoveObject ukko1,2 If DownKey() Then MoveObject ukko1,-2 If KeyDown(cbKeyA) Then TurnObject ukko2,5 If KeyDown(cbKeyD) Then TurnObject ukko2,-5 If KeyDown(cbKeyW) Then MoveObject ukko2,2 If KeyDown(cbKeyS) Then MoveObject ukko2,-2 DrawScreen Forever
Veikkaisin, että voisi korjautua tälläisellä:
Code: Select all
LoadMap("Y:\Sirénin ATKt\W9\Henri Mikkola\CB\kartta.til","Y:\Sirénin ATKt\W9\Henri Mikkola\CB\tileset.bmp")