Poring invasion point saving help

[Chocolate]

//===== rAthena Script =======================================
//= Poring Summoner
//===== By: ==================================================
//= Bahmut (Made it automated)
//= MoonlightRO (Original)
//===== Current Version: =====================================
//= 1.4
//===== Compatible With: =====================================
//= TXT & SQL
//===== Link to orginal: =====================================
//= [url="http://www.eathena.ws/board/index.php?showtopic=236779"]http://www.eathena.w...howtopic=236779[/url]
//============================================================
-	script	Poring Summoner	-1,{
OnInit:
	//---- NPC Config -----
	set .SpecialPorings,100;
	set .NormalPorings,0;
	//---------------------
	initnpctimer;
	end;
 
OnSpecialKill:
	set .SpecialPorings[1],.SpecialPorings[1]-1;
	announce strcharinfo(0) + " got a " + getitemname(.ItemID) + "!",bc_map;
//	getitem .ItemID,1;
	set PoringPoint,PoringPoint+1;
	dispbottom "You got 1 Poring Point";
	dispbottom "Total Poring Points:"+PoringPoint;
	goto PoringCount;
 
OnNormalKill:
	set .NormalPorings[1],.NormalPorings[1]-1;
	goto PoringCount;
 
PoringCount:
	announce "Special Poring: " + .SpecialPorings[1] + " || Normal Poring: " + .NormalPorings[1],bc_map;
	if(!.SpecialPorings[1]) goto EndEvent;
	end;
 
OnClock1200:
OnClock1600:
OnClock2000:
OnClock0000:
OnClock0400:
OnClock0800:

RestartEvent:
	set .Event,0;
	set .SpecialPorings[1],0;
	set .NormalPorings[1],0;
	
	removemapflag .Map$,mf_noskill;
	set $@ran, rand(1,9);
	if ($@ran == 9) set .Map$,"lighthalzen";
	if ($@ran == 8) set .Map$,"louyang";
	if ($@ran == 7) set .Map$,"comodo";
	if ($@ran == 6) set .Map$,"xmas";
	if ($@ran == 5) set .Map$,"aldebaran";
	if ($@ran == 4) set .Map$,"payon";
	if ($@ran == 3) set .Map$,"geffen";
	if ($@ran == 2) set .Map$,"morocc";
	if ($@ran == 1) set .Map$,"prontera";
	killmonster .Map$,"All";
	setmapflag .Map$,mf_noskill;
	monster .Map$,0,0,"Poring",1002,.SpecialPorings,"Poring Summoner::OnSpecialKill";
	monster .Map$,0,0,"Poring",1002,.NormalPorings,"Poring Summoner::OnNormalKill";
	set .SpecialPorings[1],.SpecialPorings;
	set .NormalPorings[1],.NormalPorings;
	announce "The Poring Event has begun!",bc_all;
	announce "Location: " + .Map$,bc_all;
	announce "Special Poring: " + .SpecialPorings,bc_all;
	announce "Normal Poring: " + .NormalPorings,bc_all;
 
	setnpctimer 0;
	close;

EndEvent:
	if(.Event) announce "The Poring Summon Event is now over!",bc_all;
	killmonster .Map$,"All";
	set .Event,0;
	set .SpecialPorings[1],0;
	set .NormalPorings[1],0;
	end;
}

If player kill porings the points goes to his character only not into entire account.....then Some players can't get the point when they're in a different character

[Emistry]

you mean making it save into account variable ?

change all

PoringPoint

to

#PoringPoint

[Chocolate]

you mean making it save into account variable ?

change all

PoringPoint

to

#PoringPoint

 

After changing it into this the poringpoints isn't saving even you got +1 poring poiints in disbottom

[Emistry]

you mean making it save into account variable ?

change ALL

PoringPoint

to

#PoringPoint