Post: #4

Hi,

Actully, i have useful dialog for tilepic. If you just look this and get the idea you can do what you want to do easly, i would say.

Look at the script below,

[itemdef i_artmul]
id=i_spellbook
name=Art Mul
type =t_spellbook

on=@dclick
sdialog d_art_mul
return 1

[dialog d_art_mul]
0,0

if <more> < 0
more = 0
endif
local._art = <more>

resizepic 138 10 2600 600 520
resizepic 138 520 2600 600 100
for 32
tilepic <eval 170+(70*<dlocal._x>)> <eval 30+(120*<dlocal._y>)> <dlocal._art>
dtext <eval 180+(70*<dlocal._x>)> <eval 10+(120*<dlocal._y>)> 2000 <local._art>
local._art ++
if <local._y> = 3
local._x ++
local._y = 0
else
local._y ++
endif
endfor
if <more>
button 400 565 4014 4015 1 0 1
endif
if <more> < 03fc4
button 435 565 4005 4006 2 0 2
endif
if <more>
button 350 565 4014 4015 3 0 3
endif
if <more> < 03fc4
button 485 565 4005 4006 4 0 4
endif

[dialog d_art_mul button]
on=1
more -=4
dialogclose d_art_mul
dialog d_art_mul

on=2
more +=4
dialogclose d_art_mul
dialog d_art_mul

on=3
more -=32
dialogclose d_art_mul
dialog d_art_mul

on=4
more +=32
dialogclose d_art_mul
dialog d_art_mul