37 lines
1.2 KiB
Plaintext
37 lines
1.2 KiB
Plaintext
// Script for the Aidbringer administrator-rod
|
|
// This script grants membership to a non-member.
|
|
// 5th of September 2005, Alangara, made by -Seeker-
|
|
|
|
#include "mn_h_constants"
|
|
#include "mn_i_checkrank"
|
|
|
|
void main()
|
|
{
|
|
object oPC = GetPCSpeaker();
|
|
object oTarget = GetLocalObject( oPC, "mn_target" );
|
|
DeleteLocalObject( oPC, "mn_target" );
|
|
|
|
// *** Pass ***
|
|
TakeGoldFromCreature( 50000, oPC, TRUE );
|
|
object pass = CreateItemOnObject("mn_i_pcaccess", oTarget, 1);
|
|
SetLocalString( pass, "tied_to", GetLocalString( oTarget, "cid" ) );
|
|
SetLocalInt( pass, "rank", MN_RANK_ALLY );
|
|
SetLocalInt( pass, "corrupted", FALSE );
|
|
|
|
// *** Keys ***
|
|
CreateItemOnObject("mn_aidbr_memkey", oTarget, 1);
|
|
|
|
// *** Token ***
|
|
object token = CreateItemOnObject("mn_aidb_token", oTarget, 1);
|
|
SetLocalInt( token, "mn_rank", MN_AIDB_ASSOCIATE );
|
|
|
|
// *** Guild-rod ***
|
|
|
|
// Feedback
|
|
effect visual1 = EffectVisualEffect( VFX_FNF_SUMMON_MONSTER_3 );
|
|
effect visual2 = EffectVisualEffect( VFX_FNF_STRIKE_HOLY );
|
|
|
|
DelayCommand( 0.1f, ApplyEffectToObject( DURATION_TYPE_INSTANT, visual1, oTarget ) );
|
|
DelayCommand( 1.5f, ApplyEffectToObject( DURATION_TYPE_INSTANT, visual2, oTarget ) );
|
|
}
|