event save/load implementation

docs/syntax.txt

@@ -133,6 +133,22 @@ int		argb(int a,int r,int g,int b);
 void	DeleteEntities();
 void	ClearEvents();
 
+
+SetEventHandlerForObject(object &object_ref, string event_name, string function_name, int post);
+DelEventHandlerForObject(object &object_ref, string event_name, string function_name);
+
+Event(string event_name, string format, ...);
+EventForObject(object &object_ref, string event_name, string format, ...);
+
+PostEvent(string event_name, int time, string format, ...); // post deffered event. time in ms
+PostEventForObject(object &object_ref, string event_name, int time, string format, ...);
+SetEventFormat(string event_name, string format);
+
+// Will not be reset by ClearEvents()
+SetEventStaticHandler(string event_name, string function_name, int post);
+SetEventStaticHandlerForObject(object &object_ref, string event_name, string function_name, int post);
+
+
 // COMMENTS
 
 . Code send entity id "i" to script and it cames as aref variable into script (GetEventData())

src/libs/core/include/core.h

@@ -70,7 +70,6 @@ class Core
     virtual void Entity_SetAttributePointer(entid_t id_PTR, ATTRIBUTES *pA) = 0;
     virtual uint32_t Entity_AttributeChanged(entid_t id_PTR, ATTRIBUTES *) = 0;
     virtual ATTRIBUTES *Entity_GetAttributePointer(entid_t id_PTR) = 0;
-
     // send message to an object
     virtual uint64_t Send_Message(entid_t Destination, const char *Format, ...) = 0;
 
@@ -95,7 +94,7 @@ class Core
         return Event(event_name, message);
     }
     virtual VDATA *Event(const std::string_view &event_name, MESSAGE &message) = 0;
-    virtual uint32_t PostEvent(const char *Event_name, uint32_t post_time, const char *Format, ...) = 0;
+    virtual uint32_t PostEvent(ATTRIBUTES * pObject, const char *Event_name, uint32_t post_time, const char *Format, ...) = 0;
 
     virtual void *GetSaveData(const char *file_name, int32_t &data_size) = 0;
 

src/libs/core/include/message.h

@@ -3,11 +3,15 @@
 #include <cstdarg>
 #include <cstring>
 #include <variant>
+#include <unordered_map>
 
 #include "c_vector.h"
 #include "entity.h"
 
 class VDATA;
+class DATA;
+class VIRTUAL_COMPILER;
+class VarTable;
 
 namespace storm
 {
@@ -57,13 +61,19 @@ class MESSAGE final
     CVECTOR CVector();
     const std::string &String();
 
+
+    bool Set(uint8_t value);
+    bool Set(uint16_t value);
     bool Set(int32_t value);
+    bool Set(uint32_t value);
     bool Set(uintptr_t value);
     bool Set(float value);
+    bool Set(double value);
     bool Set(std::string value);
     bool SetEntity(entid_t value);
     bool Set(VDATA *value);
     bool Set(ATTRIBUTES *value);
+    bool Set(CVECTOR value);
 
     void ValidateFormat(char c);
     void Reset(const std::string_view &format);
@@ -84,10 +94,27 @@ class MESSAGE final
     [[nodiscard]] std::string_view GetFormat() const;
     [[nodiscard]] bool ParamValid() const;
 
-private:
+    size_t GetParametersCount() const;
+    void GetData(DATA *vd, COMPILER *comp);
+    bool StoreData(ATTRIBUTES *attr, std::unordered_map<void *, std::pair<std::string, std::vector<size_t>>> &varIndex,
+                   VIRTUAL_COMPILER *compiler) const;
+    static MESSAGE *LoadData(ATTRIBUTES *attr, VarTable &VarTab, VIRTUAL_COMPILER *compiler);
+    void FixEnitiyIDs();
+
+    ATTRIBUTES *GetThisObject();
+    void SetThisObject(ATTRIBUTES *);
+  private:
     static storm::MessageParam GetParamValue(const char c, va_list &args);
 
     std::string format_;
     std::vector<storm::MessageParam> params_;
     int32_t index{};
+    bool hasThisObject_{false};
 };
+
+ATTRIBUTES *LoadAttributesRef(ATTRIBUTES *attr, VarTable &VarTab, VIRTUAL_COMPILER *compiler);
+
+//false - local variable reference; otherwise - true
+bool StoreAttributesRef(ATTRIBUTES *attr, const ATTRIBUTES *val,
+                        std::unordered_map<void *, std::pair<std::string, std::vector<size_t>>> &varIndex,
+                        VIRTUAL_COMPILER *compiler);