src/map/npc.c    | 1 +
 src/map/npc.h    | 1 +
 src/map/script.c | 1 +
 src/map/script.h | 1 +
 src/map/status.c | 2 ++
 5 files changed, 6 insertions(+)

diff --git a/src/map/npc.c b/src/map/npc.c
index 7044fef..ea48bf3 100644
--- a/src/map/npc.c
+++ b/src/map/npc.c
@@ -4311,6 +4311,7 @@ void npc_read_event_script(void)
 		{"Die Event",script->config.die_event_name},
 		{"Kill PC Event",script->config.kill_pc_event_name},
 		{"Kill NPC Event",script->config.kill_mob_event_name},
+		{"Stat Calc Event",script->config.stat_calc_event_name},
 	};
 
 	for (i = 0; i < NPCE_MAX; i++)
diff --git a/src/map/npc.h b/src/map/npc.h
index bf3d149..12cbdc0 100644
--- a/src/map/npc.h
+++ b/src/map/npc.h
@@ -132,6 +132,7 @@ enum npce_event {
 	NPCE_DIE,
 	NPCE_KILLPC,
 	NPCE_KILLNPC,
+	NPCE_STATCALC,
 	NPCE_MAX
 };
 
diff --git a/src/map/script.c b/src/map/script.c
index 54d8d33..b24814b 100644
--- a/src/map/script.c
+++ b/src/map/script.c
@@ -20788,6 +20788,7 @@ void script_defaults(void) {
 	script->config.loadmap_event_name = "OnPCLoadMapEvent";
 	script->config.baselvup_event_name = "OnPCBaseLvUpEvent";
 	script->config.joblvup_event_name = "OnPCJobLvUpEvent";
+	script->config.stat_calc_event_name = "OnPCStatCalcEvent";
 	script->config.ontouch_name = "OnTouch_";  //ontouch_name (runs on first visible char to enter area, picks another char if the first char leaves)
 	script->config.ontouch2_name = "OnTouch";  //ontouch2_name (run whenever a char walks into the OnTouch area)
 	script->config.onuntouch_name = "OnUnTouch";  //onuntouch_name (run whenever a char walks from the OnTouch area)
diff --git a/src/map/script.h b/src/map/script.h
index ff660de..d7f48b2 100644
--- a/src/map/script.h
+++ b/src/map/script.h
@@ -342,6 +342,7 @@ struct Script_Config {
 	const char *loadmap_event_name;
 	const char *baselvup_event_name;
 	const char *joblvup_event_name;
+	const char *stat_calc_event_name;
 
 	const char* ontouch_name;
 	const char* ontouch2_name;
diff --git a/src/map/status.c b/src/map/status.c
index 1a07f74..c4703ba 100644
--- a/src/map/status.c
+++ b/src/map/status.c
@@ -2242,6 +2242,8 @@ int status_calc_pc_(struct map_session_data* sd, enum e_status_calc_opt opt) {
 	pc->delautobonus(sd,sd->autobonus2,ARRAYLENGTH(sd->autobonus2),true);
 	pc->delautobonus(sd,sd->autobonus3,ARRAYLENGTH(sd->autobonus3),true);
 
+	npc->script_event(sd, NPCE_STATCALC);
+
 	// Parse equipment.
 	for(i=0;i<EQI_MAX;i++) {
 		status->current_equip_item_index = index = sd->equip_index[i]; //We pass INDEX to status->current_equip_item_index - for EQUIP_SCRIPT (new cards solution) [Lupus]