:START
wait 0
if
0ADC: "OBJ"
jf @START
Model.Load(YOUR_OBJECT_HERE)
if
056D: actor $PLAYER_ACTOR defined
jf @START
Actor.StorePos($PLAYER_ACTOR, 7@, 8@, 9@)
0@ = Object.Create(YOUR_OBJECT_HERE, 7@, 8@, 9@)
1@ = 0.0
2@ = 0.0
3@ = 0.0
4@ = 0.0
5@ = 0.0
6@ = 0.0
jump @ATTACH
:UP_O
wait 0
if
0AB0: 38
jf @DOWN_O
000B: 3@ += 1.0
jump @ATTACH
:DOWN_O
wait 0
if
0AB0: 40
jf @RIGHT_O
000F: 3@ -= 1.0
jump @ATTACH
:RIGHT_O
wait 0
if
0AB0: 39
jf @LEFT_O
000B: 1@ += 1.0
jump @ATTACH
:LEFT_O
wait 0
if
0AB0: 37
jf @FORWARD_O
000F: 1@ -= 1.0
jump @ATTACH
:FORWARD_O
wait 0
if
0AB0: 187
jf @BACKWARD_O
000B: 2@ += 1.0
jump @ATTACH
:BACKWARD_O
wait 0
if
0AB0: 189
jf @UP_R
000F: 2@ -= 1.0
jump @ATTACH
:UP_R
wait 0
if
0AB0: 104
jf @DOWN_R
000B: 6@ += 1.0
jump @ATTACH
:DOWN_R
wait 0
if
0AB0: 98
jf @RIGHT_R
000F: 6@ -= 1.0
jump @ATTACH
:RIGHT_R
wait 0
if
0AB0: 102
jf @LEFT_R
000B: 4@ += 1.0
jump @ATTACH
:LEFT_R
wait 0
if
0AB0: 100
jf @FORWARD_R
000F: 4@ -= 1.0
jump @ATTACH
:FORWARD_R
wait 0
if
0AB0: 107
jf @BACKWARD_R
000B: 5@ += 1.0
jump @ATTACH
:BACKWARD_R
wait 0
if
0AB0: 109
jf @UP_O
000F: 5@ -= 1.0
jump @ATTACH
:ATTACH
wait 0
069B: attach_object 0@ to_actor $PLAYER_ACTOR with_offset 1@ 2@ 3@ rotation 4@ 5@ 6@
printf "~Y~O1: ~G~%f ~Y~O2: ~G~%f ~Y~O3: ~G~%f ~N~~Y~R1: ~G~%f ~Y~R2: ~G~%f ~Y~R3: ~G~%f" 3000 1@ 2@ 3@ 4@ 5@ 6@
jump @DOWN_O