25 lines
657 B
Plaintext
25 lines
657 B
Plaintext
////////////////////////////////////////////////////////////////////////////////
|
|
//
|
|
// Olander's Pack Animals
|
|
// opa_set_buyt4
|
|
// By Don Anderson
|
|
// dandersonru@msn.com
|
|
//
|
|
// This script is called from the Pack Animal Salesman Convo.
|
|
//
|
|
// Checks for Enough Gold.
|
|
//
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
void main()
|
|
{
|
|
object oPC = GetPCSpeaker();
|
|
object oNPC = OBJECT_SELF;
|
|
object oMod = GetModule();
|
|
|
|
int nType4 = GetLocalInt(oMod,"T4PRICE");
|
|
SetLocalString(oPC,"OPA_CHOOSE_WP","OPA_TYPE04");
|
|
SetLocalString(oPC,"OPA_CHOOSE_TYPE","packbeetle");
|
|
SetLocalInt(oPC,"OPA_CHOOSE_PRICE",nType4);
|
|
}
|