EXAMPLE ~ CLEO

//// Example
////
{$CLEO .cs}
03A4: name_thread 'RASENGAN'

while true
wait 0
if
  Player.Defined($PLAYER_CHAR)
then
    if
    0ADC: test_cheat "RASENGAN"
    then
    04ED: load_animation "stinger"
    0247: load_model 1598  /// beach ball

    while true
    if and
        84EE:   not animation "stinger" loaded
        8248:   not model 1598 available
    jf break
        wait 0
    end

    04C4: store_coords_to 1@ 2@ 3@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 421.1
    0107: 5@ = create_object 1598 at 1@ 2@ 3@
    04D9: object 5@ set_scripted_collision_check 0
    0382: set_object 5@ collision_detection 0
    0750: set_object 5@ visibility 0

    0812: AS_actor $PLAYER_ACTOR perform_animation "sting_start" IFP_file "stinger" 1.0 loopA 0 lockX 0 lockY 0 lockF 1 time -1
    wait 250

    070A: AS_actor $PLAYER_ACTOR attach_to_object 5@ offset 0.0 0.0 0.0 on_bone 6 16 perform_animation "NULL" IFP_file "NULL" time -1  // you need to search the bone where the object will be attached, and manage the offset for correct position

    066E: create_particle "nbluesphere" attached_to_object 5@ with_offset 0.0 0.0 0.1 rotation 0.0 0.0 0.0 flag 1 handle_as 17@
    064C: make_particle 17@ visible
    wait 100

    0792: disembark_instantly_actor $PLAYER_ACTOR
    ///0687: clear_actor $PLAYER_ACTOR task     ///I don't know which one will work fine..


    repeat
     wait 0
    until  0AB0: key_pressed 15
    0812: AS_actor $PLAYER_ACTOR perform_animation "sting_finish" IFP_file "stinger" 1.0 loopA 0 lockX 0 lockY 0 lockF 0 time -1
    wait 250

    0792: disembark_instantly_actor $PLAYER_ACTOR
    04EF: release_animation "stinger"
    0976: destroy_particle 17@
    0249: release_model 1598


    end
end
end