i hve a timebar that now works bit basic and very codey but good enough for now. attached is a snippet of my problem. alone the "atb()" function works but when its with a matrix or models it stops functioning, the only thing i cn think of is that the program runs the atb function and then laods up everythign else. any ideas if thats the cause?
sync on : sync rate 60 : set display mode 800,600,16 : hide mouse
make matrix 1,500,500,25,25
dim key(250) : dim oldkey(250)
do
for a = 1 to 250
if key(a) = 1 then oldkey(a) = 1
if keystate(a) = 1 and oldkey(a) = 0 : key(a) = 1 : else : key(a) = 0 : endif
if keystate(a) = 0 then oldkey(a) = 0
next a
battlecommand()=1
atb()=1
sync
loop
function battlecommand()
draw to front
ink rgb(255,255,255),0
box 0,480,799,599
ink rgb(0,0,128),0
box 2,482,797,597
ink rgb(255,255,255),0
text 30,500,"Daedalus"
text 200,500,"HP"
text 350,500,"MP"
endfunction
function atb()
ink rgb(255,255,255),0
repeat
inc change
if change = 15
inc count
change = 0
endif
if count = 1
box 200,100,200,110
endif
if count = 2
box 200,100,210,110
endif
if count = 3
box 200,100,220,110
endif
if count = 4
box 200,100,230,110
endif
if count = 5
box 200,100,240,110
endif
if count = 6
box 200,100,250,110
endif
if count = 7
box 200,100,260,110
endif
if count = 8
box 200,100,270,110
endif
if count = 9
box 200,100,280,110
endif
if count = 10
box 200,100,290,110
endif
if count = 11
box 200,100,300,110
endif
if count = 12
box 200,100,310,110
endif
until count = 12
endfunction
any thoughts appreciated
thanks
kR
kR
