4 replies to this topic

[Creepin]

Good day.

Could anybody please let me know if there's any mod around which add creature to an area via tp2 dynamical patching routine instead of usual soiling of top of the area script? Just need it to shamelessly steal carefully learn this routine

Thanks in advance

[Mike1072]

I did some of this in Shadow Hand.  I think Cam wrote some functions that were recently added to WeiDU that alter actors, but I'm not sure if that included a way to add or delete actors.
 
Anyway, here are the functions I used back then:
 

Spoiler

// adds an actor to the current area
DEFINE_PATCH_FUNCTION ~ADD_ARE_ACTOR~
  INT_VAR 
    mi_xpos = 0               // required. x position
    mi_ypos = 0               // required. y position
    mi_anim = 0               // required. should be equal to the value at 0x28 in the .cre
    mi_orientation = 0        // optional. from 0-15 for the different compass directions, starting at 0 south and going clockwise until 15 sse (default: south)
    mi_time_of_day = 0xFFFFFF // optional. 24-bit bit field, see .are structure (default: all times of day)
  STR_VAR 
    mi_name = ~Default Actor~ // semi-required. creature's name/desc for the .are
    mi_crefile = ~~           // required. resource name of the .cre
BEGIN
  PATCH_IF (mi_orientation < 0 || mi_orientation > 15) BEGIN
    PATCH_PRINT ~ADD_ARE_ACTOR: Invalid value for mi_orientation specified, defaulting to orientation 0.~
    SET mi_orientation = 0
  END
  
  READ_LONG  0x54 actors_off
  READ_SHORT 0x58 num_actors
  
  INSERT_BYTES actors_off 0x110
  WRITE_ASCIIE (actors_off + 0x00) ~%mi_name%~ #32
  WRITE_SHORT  (actors_off + 0x20) mi_xpos
  WRITE_SHORT  (actors_off + 0x22) mi_ypos
  WRITE_SHORT  (actors_off + 0x24) mi_xpos
  WRITE_SHORT  (actors_off + 0x26) mi_ypos
  WRITE_LONG   (actors_off + 0x28) 0b0001 // cre not attached
  WRITE_LONG   (actors_off + 0x2c) 0 // hasn't been spawned
  WRITE_LONG   (actors_off + 0x30) mi_anim
  WRITE_LONG   (actors_off + 0x34) mi_orientation
  WRITE_LONG   (actors_off + 0x38) 0xFFFFFFFF // 'visible' flag that needs to be -1
  WRITE_LONG   (actors_off + 0x40) mi_time_of_day
  WRITE_ASCIIE (actors_off + 0x80) ~%mi_crefile%~ #8
  
  // clean up
  
  // update number of actors
  WRITE_SHORT 0x58 (num_actors + 1)
  
  // fix any offsets that might need fixing
  SPRINT changed_offset ~actors_off~
  SET size_change = 0x110 // add 0x110 bytes
  LAUNCH_PATCH_FUNCTION ~UPDATE_ARE_OFFSETS~ END
END


// removes all actors from an area
DEFINE_PATCH_FUNCTION ~REMOVE_ALL_ARE_ACTORS~ BEGIN
  READ_LONG  0x54 actors_off
  READ_SHORT 0x58 num_actors
  
  DELETE_BYTES actors_off (0x110*num_actors)
  
  // clean up
  
  // update number of actors
  WRITE_SHORT 0x58 0
  
  // fix any offsets that might need fixing
  SPRINT changed_offset ~actors_off~
  SET size_change = (0 - 0x110*num_actors) // subtract 0x110 bytes times the (old) number of actors
  LAUNCH_PATCH_FUNCTION ~UPDATE_ARE_OFFSETS~ END
END


// used for fixing offsets after deleting or adding something from an area - this should only be called by other functions
DEFINE_PATCH_FUNCTION ~UPDATE_ARE_OFFSETS~
  INT_VAR
    size_change = 0     // required. set this to the file size's change in bytes (negative values for removals)
  STR_VAR
    changed_offset = ~~ // required. set this to the name of the offset (from the list below) where things were added to/deleted from
BEGIN
  PATCH_IF (NOT (~%changed_offset%~ STRING_EQUAL ~actors_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~regions_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~spawns_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~entrances_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~containers_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~items_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~vertices_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~ambients_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~variables_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~explored_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~doors_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~animations_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~tiled_objs_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~songs_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~rest_interrupts_off~) &&
            NOT (~%changed_offset%~ STRING_EQUAL ~map_notes_off~)) BEGIN // invalid offset specified
    PATCH_PRINT ~UPDATE_ARE_OFFSETS: 'changed_offset' must be set to one of the offsets listed in the function description. It was set to: %changed_offset%. Exiting function.~
  END ELSE BEGIN // normal operation
    READ_LONG 0x54 actors_off
    READ_LONG 0x5c regions_off
    READ_LONG 0x60 spawns_off
    READ_LONG 0x68 entrances_off
    READ_LONG 0x70 containers_off
    READ_LONG 0x78 items_off
    READ_LONG 0x7c vertices_off
    READ_LONG 0x84 ambients_off
    READ_LONG 0x88 variables_off
    READ_LONG 0xa0 explored_off
    READ_LONG 0xa8 doors_off
    READ_LONG 0xb0 animations_off
    READ_LONG 0xb8 tiled_objs_off
    READ_LONG 0xbc songs_off
    READ_LONG 0xc0 rest_interrupts_off
    READ_LONG 0xc4 map_notes_off
    
    SET changed_offset_val = EVALUATE_BUFFER ~%%changed_offset%%~ // get the actual offset

    SET goes_after_changed = 0
    PATCH_FOR_EACH ~offset~ IN // the order of this list is important
      ~actors_off~
      ~regions_off~
      ~spawns_off~
      ~entrances_off~
      ~containers_off~
      ~items_off~
      ~ambients_off~
      ~variables_off~
      ~doors_off~
      ~tiled_objs_off~
      ~vertices_off~
      ~animations_off~
      ~explored_off~
      ~songs_off~
      ~rest_interrupts_off~
      ~map_notes_off~
    BEGIN
      PATCH_IF (~%offset%~ STRING_EQUAL ~%changed_offset%~) BEGIN // don't adjust the offset to the group where we added/deleted stuff
        SET goes_after_changed = 1 // used to fix offsets properly when they were all pointing at the same spot with no items in them
      END ELSE BEGIN
        SET offset_val = EVALUATE_BUFFER ~%%offset%%~
        PATCH_IF (size_change < 0) BEGIN // size decrease
          PATCH_IF (offset_val > changed_offset_val) BEGIN // current offset was later in the file than where we added/deleted stuff
            SET EVALUATE_BUFFER ~%offset%~ += size_change // fix this offset to point to the right spot
          END
        END ELSE BEGIN // size increase
          PATCH_IF (offset_val > changed_offset_val || (offset_val == changed_offset_val && goes_after_changed == 1)) BEGIN // current offset was either later in the file, or the changed offset didn't have any items previously and the current one belongs later in the file
            SET EVALUATE_BUFFER ~%offset%~ += size_change // fix this offset to point to the right spot
          END
        END
      END
    END
    
    // write new values
    WRITE_LONG 0x54 actors_off
    WRITE_LONG 0x5c regions_off
    WRITE_LONG 0x60 spawns_off
    WRITE_LONG 0x68 entrances_off
    WRITE_LONG 0x70 containers_off
    WRITE_LONG 0x78 items_off
    WRITE_LONG 0x7c vertices_off
    WRITE_LONG 0x84 ambients_off
    WRITE_LONG 0x88 variables_off
    WRITE_LONG 0xa0 explored_off
    WRITE_LONG 0xa8 doors_off
    WRITE_LONG 0xb0 animations_off
    WRITE_LONG 0xb8 tiled_objs_off
    WRITE_LONG 0xbc songs_off
    WRITE_LONG 0xc0 rest_interrupts_off
    WRITE_LONG 0xc4 map_notes_off
  END
END

 
Then I could add an actor like this:
 

COPY_EXISTING ~k#0800.are~ ~override~
    LAUNCH_PATCH_FUNCTION ~ADD_ARE_ACTOR~
      INT_VAR mi_xpos = 1266  mi_ypos = 1450  mi_anim = 25344  mi_orientation = 3
      STR_VAR mi_name = ~Kifor~  mi_crefile = ~k#kifor~
    END

Edited by Mike1072, 30 September 2013 - 02:12 AM.

[Roxanne]

Aurora's Shoes and Boots adds actors via the more flexible WeiDU function fj_add_are_structure, which can add any sort of structure to an area (including actors). This snippet adds two actors, a travel region and an entrance to an existing area.

COPY_EXISTING ar0500.are override //Bridge District
  PATCH_IF SOURCE_SIZE > 0x28f BEGIN
    LPF fj_add_are_structure
      INT_VAR
      fj_loc_x          = 3450
      fj_loc_y          = 636
      fj_dest_loc_x     = 3450
      fj_dest_loc_y     = 636
      fj_animation      = svda   //svirfneblin dark axe
      fj_orientation    = 1      //SSW
      STR_VAR
      fj_structure_type = actor
      fj_name           = ~Tomthal Harfurthock~
      fj_cre_resref     = agtomtha
    END
    LPF fj_add_are_structure
      INT_VAR
      fj_loc_x          = 2780
      fj_loc_y          = 1955
      fj_dest_loc_x     = 2780
      fj_dest_loc_y     = 1955
      fj_animation      = 0x6110 //fighter female human
      fj_orientation    = 15     //SSE
      STR_VAR
      fj_structure_type = actor
      fj_name           = Aurora
      fj_cre_resref     = agaurora
    END
    LPF fj_add_are_structure
      INT_VAR
      fj_type         = 2    //travel
      fj_box_left     = 3415
      fj_box_top      = 625
      fj_box_right    = 3450
      fj_box_bottom   = 700
      fj_cursor_index = 30   //door
      fj_vertex_0     = 3415 + (625 << 16)
      fj_vertex_1     = 3450 + (650 << 16)
      fj_vertex_2     = 3450 + (700 << 16)
      fj_vertex_3     = 3415 + (676 << 16)
      STR_VAR
      fj_structure_type   = region
      fj_name             = Tran0540
      fj_destination_area = ag0540
      fj_destination_name = Exit0500
    END
    LPF fj_add_are_structure
      INT_VAR
      fj_loc_x       = 3490
      fj_loc_y       = 655
      fj_orientation = 10   //NE
      STR_VAR
      fj_structure_type = entrance
      fj_name           = Exit0540
    END
  END
BUT_ONLY

I have successfully used the new WEIDU function to add travel triggers, entrances and animations to areas. I have not tried actors, as the ones I add always had a condition with them (ChapterGT...InParty("xxxc") etc

[Creepin]

Many thanks folks, your input is highly appreciated!

I wasn't even hoping for several solutions to learn and chose from, let alone having weidu doing all the dirty work for me