error checking in API-entry tasks

Author: mcmonkey4eva

scripts/dmodels_animating.dsc

@@ -9,6 +9,9 @@ dmodels_end_animation:
     debug: false
     definitions: root_entity
     script:
+    - if !<[root_entity].is_truthy> || !<[root_entity].has_flag[dmodel_model_id]||false>:
+        - debug error "[DModels] invalid end_animation root_entity <[root_entity]>"
+        - stop
     - flag <[root_entity]> dmodels_animation_id:!
     - flag <[root_entity]> dmodels_anim_time:0
     - flag server dmodels_anim_active.<[root_entity].uuid>:!
@@ -19,6 +22,9 @@ dmodels_animate:
     debug: false
     definitions: root_entity|animation
     script:
+    - if !<[root_entity].is_truthy> || !<[root_entity].has_flag[dmodel_model_id]||false>:
+        - debug error "[DModels] invalid animate root_entity <[root_entity]>"
+        - stop
     - run dmodels_reset_model_position def.root_entity:<[root_entity]>
     - define animation_data <server.flag[dmodels_data.animations_<[root_entity].flag[dmodel_model_id]>.<[animation]>]||null>
     - if <[animation_data]> == null:

scripts/dmodels_command.dsc

@@ -80,7 +80,7 @@ dmodels_command:
             - if !<[spawned].is_truthy>:
                 - narrate "<&[error]>Spawning failed?"
                 - stop
-            - flag player spawned_model_<[model]>:<[spawned]>
+            - flag player spawned_dmodel_<[model]>:<[spawned]>
             - narrate "<&[base]>Spawned model <[model].custom_color[emphasis]> with root entity <[spawned].uuid.custom_color[emphasis]>, stored to player flag '<&[emphasis]>spawned_dmodel_<[model]><&[base]>'"
         - case remove:
             - if !<player.has_permission[dmodels.remove]>:

scripts/dmodels_spawning.dsc

@@ -75,6 +75,11 @@ dmodels_delete:
     debug: false
     definitions: root_entity
     script:
+    - if !<[root_entity].is_truthy> || !<[root_entity].has_flag[dmodel_model_id]||false>:
+        - debug error "[DModels] invalid delete root_entity <[root_entity]>"
+        - stop
+    - flag server dmodels_anim_active.<[root_entity].uuid>:!
+    - flag server dmodels_attached.<[root_entity].uuid>:!
     - remove <[root_entity].flag[dmodel_parts]>
     - remove <[root_entity]>