Script Conversion

[Light]

Good day rAthena users.

 

 

I would liike to request of conversion of this script into 3ceam? I would appreciate it. 

prontera,155,181,5	script	Sample	757,{
mes "Enter Gold Room?";
if( select( "Yes","cancel" ) == 1 ){
	warp .map$,0,0;
}
close;

OnMobKill:
.@party_id = getcharid(1);
if( !.@party_id ){
	.@gain_gold = 1;
}else{
	
	.@aid = getcharid(3);
	getpartymember .@party_id;
	getpartymember .@party_id,2;
	.@gain_gold = ( ( $@partymembercount > 5 )? 5:$@partymembercount );
	for( .@i = 0; .@i < $@partymembercount; .@i++ )
		if( $@partymemberaid[.@i] != .@aid && isloggedin( $@partymemberaid[.@i] ) ){
			getmapxy( .@map$,.@x,.@y,0,$@partymembername$[.@i] );
			if( .@map$ == .map$ )
				getitem 969,1,$@partymemberaid[.@i];
		}
}
getitem 969,.@gain_gold;
end;

OnInit:
.map$ = "guild_vs5";
end;
}

guild_vs5,0,0	monster	Poring	1002,100,0,0,"Sample::OnMobKill"

Thanks in advance! :3

Edited August 23, 2014 by Eucliwood Hellscythe

[anacondaq]

Paste: 22lca9b3wxub

[Light]

Almost forgot...
 
"OnMobKill:
.@party_id = getcharid(1);"

 

This line says its undeclared fnction. Anyone mind to fix? Its been a headache