07/02/06 15:30:42 LNZ1T0qF
>>305
本当に適当でいいならこんな感じ、汚くてすまん・・・
wx = 640 : wy = 480
x = wx / 2 : y = wy / 2
screen 0, wx, wy, 0 : randomize
repeat
x += rnd(3) - 1
y += rnd(3) - 1
redraw 0
color 0, 0, 0 : boxf
color 255, 0, 0
pos x, y : mes "●"
redraw 1
await 1
loop