An open dialog effect without using dlls.
try: /dopen test 550 430
alias dopen {
if (!$3) { echo 4 -a * Insufficient parameters: /dopen <dialog> <larghezza> <altezza> }
else {
var %d.name = $1, %d.X = $2, %d.Y = $3, %.a = 1, %.b = 1, %.d = 1
if (%d.X > %d.Y) { var %.c = $2 } | else { var %.c = $3 }
dialog -m %d.name %d.name
while (%.d <= %.c) {
dialog -s %d.name -1 -1 %.a %.b
if (%.a <= %d.X) { inc %.a }
if (%.b <= %d.Y) { inc %.b }
inc %.d
}
}
}
dialog test {
size -1 -1 550 430
list 4, 5 15 540 380 , size
button "TEST" 2, 480 400 65 20, ok
}