Hi leute
Wer eine Isomap braucht, den kann ich hier abhilfe schaffen !
Screenshot:
(http://www.styleattax.de/Isoscreen.png)
Hier noch die PNG zum Download: http://www.styleattax.de/boden.png
oder so (save as PNG):
(http://www.styleattax.de/boden.png)
// --------------------------------- //
// Project: isogame
// Start: Thursday, April 05, 2007
// IDE Version: 4.142
LOADSPRITE "boden.png",1 // Load Isosprite
DIM tile[20][20] // Set Array
WHILE TRUE
//-----Set Locals----------
w=72 // Tile width
h=36 // Tile hight
w2=w/2 // Half Tile width
h2=h/2 // Half Tile hight
//-------------------------
FOR x = 0 TO 19
FOR y = 0 TO 19
xpos = w2*(x-y)-w2 // calculate xpos
ypos = h2*(x+y) // calculate ypos
SPRITE 1,xpos-ScrollX,ypos-ScrollY // Draw sprite
NEXT
NEXT
//--------Scroll-----------------------
IF KEY(200) THEN ScrollY = ScrollY -3
IF KEY(208) THEN ScrollY = ScrollY +3
IF KEY(203) THEN ScrollX = ScrollX -3
IF KEY(205) THEN ScrollX = ScrollX +3
//---------------------------------------
SHOWSCREEN
WEND
END
UPDATE:
Häuser mit RND auf die map zeichen.
Hier der Download: http://www.styleattax.de/Isogame.rar
Hier der Screen :
(http://www.styleattax.de/Isoscreen2.png)
Der Screenshot ist nicht schön, aber dafür selten ;)
Nette idee ^^.
bin noch ziemlich neu was GLBasic angeht. Hab mir das Programm trotzdem mal vorgenommen und ein wenig modifiziert. Man kann jetzt Häuser mit der linken Maustaste platzieren und mit rechts wieder löschen. Der Cod ist ziemlich unsauber und noch nicht ganz kommentiert, aber es funktioniert. Wenn ich nen Filehoster finde, lade ich das ganze Spiel mal hoch.
// --------------------------------- //
// Project: IsoGameMod
// Start: Wednesday, January 30, 2008
// IDE Version: 5.148
LOADBMP "sprites/bg.bmp"
LOADSPRITE "sprites/cursor.png", 10
LOADSPRITE "sprites/cursorbody.png", 11
LOADSPRITE "sprites/boden.png", 1
LOADSPRITE "sprites/haus.png", 2
LOADSPRITE "sprites/bodench.png", 3
LOADSPRITE "sprites/hausch.png", 4
mousedown = FALSE
DIM map[20][20]
WHILE TRUE
//-----Set Locals----------
w=72 // Tile width
h=36 // Tile hight
w2=w/2 // Half Tile width
h2=h/2 // Half Tile hight
housedif = 65 - h
//-------------------------
//-----Draw Map--------------------------
FOR x = 0 TO 19
FOR y = 0 TO 19
tileposX = w2*(x-y)-w2
tileposY = h2*(x+y)
realposX = tileposX-ScrollX
realposY = tileposY-ScrollY
choice = SPRCOLL (10, mx, my, 1, realposX, realposY)
//----- init mouseklick------------------------------
MOUSESTATE mx, my, mb1, mb2
IF mb1=FALSE THEN lc = FALSE
IF mb2=FALSE THEN rc = FALSE
IF lc THEN mb1 = FALSE
IF rc THEN mb2 = FALSE
IF mb1 THEN lc = TRUE
IF mb2 THEN rc = TRUE
//---------------------------------------------------
IF choice = TRUE AND allready = 0 AND lc = TRUE AND rc = FALSE //----------
DRAWSPRITE 4, realposX-2, realposY-2-housedif
map[x][y] = 1
ELSEIF choice = TRUE AND allready = 0 AND rc = TRUE AND lc = FALSE
DRAWSPRITE 3, realposX-2, realposY-2
allready = 1
map[x][y] = 0
ELSEIF choice = TRUE AND allready = 0 AND lc = FALSE AND rc = FALSE
IF map[x][y] = 1
DRAWSPRITE 4, realposX-5, realposY-5-housedif
allready = 1
ELSE
DRAWSPRITE 3, realposX-5, realposY-5
allready = 1
ENDIF
ELSEIF map[x][y] = 1
DRAWSPRITE 2, realposX, realposY-housedif
ELSE
DRAWSPRITE 1, realposX, realposY
ENDIF
NEXT
NEXT
allready = 0
//---------------------------------------
//--------Scroll-----------------------
IF KEY(200) THEN ScrollY = ScrollY -3
IF KEY(208) THEN ScrollY = ScrollY +3
IF KEY(203) THEN ScrollX = ScrollX -3
IF KEY(205) THEN ScrollX = ScrollX +3
//---------------------------------------
DRAWSPRITE 10, mx, my
DRAWSPRITE 11, mx, my
SHOWSCREEN
WEND
\\EDIT:
So hier die files:
http://www.datenschleuder.eu/get_d66b5a43e0dd9ff1469e4a20c3f6f4f1.html
Sollte ja auch nur ein Basic sein, damit Leute die Games in Iso machen können ;)
Was jeder andere daraus macht ist mir gleich....
Aber schön das du den alten Code wiederbelebt hast :D