npcscript01.lua

top web admin panel (tales of pirates)

--------------------------------------------------------------------------
--									--
--									--
--NPCScript01.lua Created by Robin 2005.1.20.	--
--									--
--									--
--------------------------------------------------------------------------
print( "loading NPCScript01.lua" )

jp= JumpPage
amp=AutoMissionPage
ct=CloseTalk
am=AddMission
MissionCheck = HasFlag
mc=MissionCheck


------------------------------------------------------------
-- 白银之城:服装店尼萨婆婆
------------------------------------------------------------

function BT_NpcSale001()


	Talk( 1, "Second Class:Hi,i will make u second class advancement.But u need to be lv41. And also you can buy fairy items" )
   Text( 1, "Lance", JumpPage, 2 )
   Text( 1, "Carsise", JumpPage, 6 )
   Text( 1, "Phillys", JumpPage, 8 )
   Text( 1, "Ami", JumpPage, 17 )	
	
   Talk( 2, "Second Class:Choose one of this class." )
   Text( 2, "I will become Crusader", JumpPage, 3 )
   Text( 2, "I will become Voyager", JumpPage, 4 )
   Text( 2, "I will become Sharpshooter", JumpPage, 5 )

   -----------lance---------
   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 1 )
   TriggerCondition( 1, PfEqual, 1 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 9 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 3, "Ok, Swordman to be Crusader", MultiTrigger, GetMultiTrigger(), 2)
   Text( 3, "No. Maybe later", JumpPage, 2 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 1 )
   TriggerCondition( 1, PfEqual, 4 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 16 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 4, "Ok, Explorer to be Voyager", MultiTrigger, GetMultiTrigger(), 2)
   Text( 4, "No. Maybe later", JumpPage, 2 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 1 )
   TriggerCondition( 1, PfEqual, 2 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 12 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 5, "Ok, Hunter to be Sharpshooter", MultiTrigger, GetMultiTrigger(), 2)
   Text( 5, "No. Maybe later", JumpPage, 2 )

   -----------carsise------------
   Talk( 6, "Second Class:Choose one of this class." )
   Text( 6, "I will become Champion", JumpPage, 7 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 2 )
   TriggerCondition( 1, PfEqual, 1 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 8 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 7, "Ok, I will become a Champion", MultiTrigger, GetMultiTrigger(), 2)
   Text( 7, "No. Maybe later", JumpPage, 6 )

   -------------phillys--------------
   Talk( 8, "Second Class:Choose one of this class." )
   Text( 8, "I will become Sharpshooter", JumpPage, 9 )
   Text( 8, "I will become Voyager", JumpPage, 12 )
   Text( 8, "I will become Seal Master", JumpPage, 13 )
   Text( 8, "I will become Cleric", JumpPage, 14 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 3 )
   TriggerCondition( 1, PfEqual, 2 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 12 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 9, "Ok, Hunter to be Sharpshooter", MultiTrigger, GetMultiTrigger(), 2)
   Text( 9, "No. Maybe later", JumpPage, 8 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 3 )
   TriggerCondition( 1, PfEqual, 4 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 16 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 12, "Ok, Explorer to be Voyager", MultiTrigger, GetMultiTrigger(), 2)
   Text( 12, "No. Maybe later", JumpPage, 8 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 3 )
   TriggerCondition( 1, PfEqual, 5 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 14 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 13, "Ok, Herbalist to be Seal Master", MultiTrigger, GetMultiTrigger(), 2)
   Text( 13, "No. Maybe later", JumpPage, 8 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 3 )
   TriggerCondition( 1, PfEqual, 5 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 13 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 14, "Ok, Herbalist to be Cleric", MultiTrigger, GetMultiTrigger(), 2)
   Text( 14, "No. Maybe later", JumpPage, 8 )

   -------------Amy--------------
   Talk( 17, "Second Class:Chosse one of this class." )
   Text( 17, "I will become Voyager", JumpPage, 20 )
   Text( 17, "I will become Seal Master", JumpPage, 21 )
   Text( 17, "I will become Cleric", JumpPage, 22 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 4 )
   TriggerCondition( 1, PfEqual, 4 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 16 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 20, "Ok, Explorer to be Voyager", MultiTrigger, GetMultiTrigger(), 2)
   Text( 20, "No. Maybe later", JumpPage, 17 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 4 )
   TriggerCondition( 1, PfEqual, 5 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 14 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 21, "Ok, Herbalis to be Seal Master", MultiTrigger, GetMultiTrigger(), 2)
   Text( 21, "No. Maybe later", JumpPage, 17 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 40 )
   TriggerCondition( 1, IsCategory, 4 )
   TriggerCondition( 1, PfEqual, 5 )
   TriggerCondition( 1, HasMoney, 5000, 5000 )
   TriggerAction( 1, TakeMoney, 5000, 5000 )
   TriggerAction( 1, SetProfession, 13 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 22, "Ok, Herbalis to be Cleric", MultiTrigger, GetMultiTrigger(), 2)
   Text( 22, "No. Maybe later", JumpPage, 17 )

   Talk( 10, "Congrats,u are sucessfull changed class.")
   Talk( 11, "Sorry,u need more money.!")

end
	

-------------------------------------------------------------------
--								--
--		白银城（比特）		--
--		219533,270323				--
-------------------------------------------------------------------

function r_talk86()

	Talk( 1, "First Class:Hi,i will make u first class advancement.But u need to be lv11." )
   Text( 1, "Lance", JumpPage, 2 )
   Text( 1, "Carsise", JumpPage, 6 )
   Text( 1, "Phillys", JumpPage, 8 )
   Text( 1, "Ami", JumpPage, 14 )

   Talk( 2, "First Class:Choose one of this class." )
   Text( 2, "I will become Swordman", JumpPage, 3 )
   Text( 2, "I will become Explorer", JumpPage, 4 )
   Text( 2, "I will become Hunter", JumpPage, 5 )

   -----------lance---------
   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 1 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 1 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 3, "Ok, I will become a Swordman", MultiTrigger, GetMultiTrigger(), 2)
   Text( 3, "No. Maybe later", JumpPage, 2 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 1 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 4 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 4, "Ok, I will become a Explorer", MultiTrigger, GetMultiTrigger(), 2)
   Text( 4, "No. Maybe later", JumpPage, 2 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 1 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 2 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 5, "Ok, I will become a Hunter", MultiTrigger, GetMultiTrigger(), 2)
   Text( 5, "No. Maybe later", JumpPage, 2 )

   -----------carsise------------
   Talk( 6, "First Class:Choose one of this class." )
   Text( 6, "I will become Swordman", JumpPage, 7 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 2 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 1 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 7, "Ok, I will become a Swordman", MultiTrigger, GetMultiTrigger(), 2)
   Text( 7, "No. Maybe later", JumpPage, 6 )

   -------------phillys--------------
   Talk( 8, "First Class:Choose one of this class." )
   Text( 8, "I will become Hunter", JumpPage, 9 )
   Text( 8, "I will become Explorer", JumpPage, 12 )
   Text( 8, "I will become Herbalist", JumpPage, 13 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 3 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 2 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 9, "Ok, I will become a Hunter", MultiTrigger, GetMultiTrigger(), 2)
   Text( 9, "No. Maybe later", JumpPage, 8 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 3 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 4 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 12, "Ok, I will become a Explorer", MultiTrigger, GetMultiTrigger(), 2)
   Text( 12, "No. Maybe later", JumpPage, 8 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 3 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 5 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 13, "Ok, I will become a Herbalist", MultiTrigger, GetMultiTrigger(), 2)
   Text( 13, "No. Maybe later", JumpPage, 8 )


   -------------Ami--------------
   Talk( 14, "First Class:Choose one of this class." )
   Text( 14, "I will become Explorer", JumpPage, 15 )
   Text( 14, "I will become Herbalist", JumpPage, 16 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 4 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 4 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 15, "Ok, I will become a Explorer", MultiTrigger, GetMultiTrigger(), 2)
   Text( 15, "No. Maybe later", JumpPage, 14 )

   InitTrigger()
   TriggerCondition( 1, LvCheck, ">", 10 )
   TriggerCondition( 1, IsCategory, 4 )
   TriggerCondition( 1, PfEqual, 0 )
   TriggerCondition( 1, HasMoney, 1000, 1000 )
   TriggerAction( 1, TakeMoney, 1000, 1000 )
   TriggerAction( 1, SetProfession, 5 )
   TriggerAction( 1, JumpPage, 10 )
   TriggerFailure( 1, JumpPage, 11 )
   Text( 16, "Ok, I will become a Herbalist", MultiTrigger, GetMultiTrigger(), 2)
   Text( 16, "No. Maybe later", JumpPage, 14 )

   Talk( 10, "Congrats,u have sucessfull changed class.")
   Talk( 11, "Sorry,u need more money.!")
end



-------------------------------------------------------------------
--								--
--		白银城（铁匠——小金金）		--
--		219533,270323				--
-------------------------------------------------------------------
function r_trade01 ()
	--买卖东西对话
	Talk( 1, "Goldie: Hi, I sell all unseals, take a look." )
	Text( 1, "Buy Unseals", BuyPage)
	Text( 1, "Repair", OpenRepair)
	Text( 1, "Regarding Forging", JumpPage, 2)
	Text( 1, "Regarding Combining", JumpPage, 3)
	Text( 1,"Event of aberrance Alloy Pickaxe",JumpPage,9)
	
	
	Talk(9,"Recently, the item mall has sold a batch of aberrance Alloy Pickaxe which has caused much trouble to the players. Should you have any Alloy Pickaxe which durability is at 0, you can come to me to exchange a new one")
	Text(9,"I have an aberrance pickaxe, I need to repair my pickaxe",CheckMetal)
	Text(9,"Don't know what are you talking about",CloseTalk)

	
	Text( 1, "Mold a mask", JumpPage,4)

	Talk( 2, "Goldie: Forging? Only the blacksmith in Shaitan City can do it." )

	Talk( 3, "Goldie: You wish to combine something? From what I understand, you need a combining scroll and it will list the required items. Collect the items needed and talk to Grocer - Amos in Shaitan City. He is the only person who knows how to combine." )

	InitTrade()
	Defence(	0764	)
	Defence(	0765	)