begin WelfareSword

if ( MenuMode == 1 )
	Return
endif

if ( OnActivate == 0 )
	Return
endif

if ( OnActivate == 1 )

	;Check to see if the player is actually a starter character.
	if ( Player->GetReputation > 1 )
		MessageBox "Your journey has already begun."
		Return
	endif
	if ( Player->GetLevel > 1 )
		MessageBox "Your journey has already begun."
		Return
	endif

	PlaySound "ThunderClap"
	MessageBox, "Setting Stats for testing, giving gold, etc."

	;Items are given based on skills.
	if ( Player->GetArmorer >24)
		player->additem "repair_master_01" 4
	endif
	if ( Player->GetAxe >24)
		player->additem "steel axe" 1
		player->additem "steel battle axe" 1
	endif
	if ( Player->GetBlock >24)
		player->additem "chitin_towershield" 1
	endif
	if ( Player->GetBluntWeapon >24)
		player->additem "steel mace" 1
		player->additem "steel warhammer" 1
		player->additem "wooden staff" 1
	endif
	if ( Player->GetHeavyArmor >24)
		player->additem "steel_cuirass" 1
		player->additem "steel_greaves" 1
		player->additem "steel_boots" 1
		player->additem "steel_pauldron_left" 1
		player->additem "steel_pauldron_right" 1
		player->additem "steel_gauntlet_left" 1
		player->additem "steel_gauntlet_right" 1
	endif
	if ( Player->GetLongBlade >24)
		player->additem "steel broadsword" 1
		player->additem "steel claymore" 1
	endif
	if ( Player->GetMediumArmor >24)
		player->additem "bonemold_cuirass" 1
		player->additem "bonemold greaves" 1
		player->additem "bonemold_boots" 1
	endif
	if ( Player->GetSpear >24)
		player->additem "steel spear" 1
		player->additem "steel halberd" 1
	endif
	if ( Player->GetAlchemy >24)
		player->additem "apparatus_j_mortar_01" 1
	endif
	if ( Player->GetLightArmor >24)
		player->additem "netch_leather_greaves" 1
		player->additem "netch_leather_boots" 1
		player->additem "netch_leather_boiled_cuirass" 1
		player->additem "netch_leather_pauldron_left" 1
		player->additem "netch_leather_pauldron_right" 1
		player->additem "netch_leather_gauntlet_left" 1
		player->additem "netch_leather_gauntlet_right" 1
	endif
	if ( Player->GetMarksman >24)
		player->additem "steel throwing knife" 40
	endif
	if ( Player->GetMercantile >24)
		player->additem "gold_001" 600
	endif
	if ( Player->GetSecurity >24)
		player->additem "pick_journeyman_01" 3
		player->additem "probe_journeyman_01" 3
	endif
	if ( Player->GetShortBlade >24)
		player->additem "steel shortsword" 1
		player->additem "silver dagger" 1
	endif
	if ( Player->GetSneak >24)
		player->additem "thief_ring" 1
	endif
	if ( Player->GetSpeechcraft >24)
		player->additem "belt of charisma" 1
	endif
	if ( Player->GetEnchant >24)
		player->additem "flameeater robe" 1
	endif
	if ( Player->GetHandToHand >24)
		player->additem "left gauntlet of the horny fist" 1
		player->additem "right gauntlet of the horny fist" 1
	endif
	if ( Player->GetIllusion >24)
		player->additem "ring of aversion" 1
		player->additem "light amulet" 1
	endif
	if ( Player->GetMysticism >24)
		player->additem "amulet of mark" 1
		player->additem "amulet of recall" 1
	endif
	if ( Player->GetRestoration >24)
		player->additem "mother's ring" 1
		player->additem "amulet of balyna's antidote" 1
	endif
	if ( Player->GetUnarmored >24)
		player->additem "amulet of water walking" 1
		player->additem "watcher's belt" 1
	endif
	if ( Player->GetDestruction >24)
		player->additem "dire flamebolt ring" 1
		player->additem "firestone" 1
	endif
	if ( Player->GetConjuration >24)
		player->additem "ancestor's ring" 1
		player->additem "bone guard belt" 1
	endif
	if ( Player->GetAlteration >24)
		player->additem "amulet of opening" 1
		player->additem "third barrier belt" 1
	endif
	if ( Player->GetAcrobatics >24)
		player->additem "hoptoad ring" 1
		player->additem "amulet of slowfalling" 1
	endif
	if ( Player->GetAthletics >24)
		player->additem "belt of feet of notorgo" 1
		player->additem "amulet of stamina" 1
	endif

endif

End