#include "hgimg.as"
hgini
mxload "3d"
regobj mychr,stat
gsel 0
clscolor 0
selcpos
objsetf3 0.0f, 0.0f, 500.0f
repeat
hgdraw
hgsync 10
selang mychr:objaddf1 1,0.01f
loop