新漂流幻境炼金循环脚本(高级)

1、精选优质文档-倾情为你奉上bool ShiftStory(int WareID)if(IsWareUpStair(WareID) = 1)if(Value("IsManUpStair") !=1)GoUpStair(0);if(Value("IsManUpStair") != 1)ShowText("GoUpStair Error");return false;elseif(Value("IsManUpStair") = 1)GoDownStair(0);if(Value("IsManUpStair&qu

2、ot;) = 1)ShowText("GoDownStair Error");return false;return true;bool ScriptContinueMakeItem(int ItemID)if(ContinueMakeItem(ItemID) = 1)while(IsMakingItem(ItemID) = 1)Yield(0);ShowText("Complete Make Item");return true;return false;int MakeItem45005(int ItemCount) /制作普通木头if(IsFind

3、Item(45005,ItemCount) = 1)return 1;return 0;int MakeItem45001(int ItemCount) /制作普通木材if(IsFindItem(45001,ItemCount) = 1)return 1;if(IsHaveNecessaryItem(45001) != 1)ShowText("Have not NecessaryItem 45001");return 0;if(!ShiftStory(38058)return 0;ScriptContinueMakeItem(45001);if(IsFindItem(450

4、01,ItemCount) = 1)return 1;int Count = 0;int SubCount;while(Count < ItemCount)MakeItem45001Material();if(MakeItem(45001) != 1)SubCount = 0;int Succ = 0;while(SubCount < 1)MakeItem45001Material();if(MakeItem(45001) = 1)Succ = 1;break;SubCount+;Yield(0);if(Succ = 0)ShowText("MakeItem(45001)

5、 Failure");return 0;while(IsMakingItem(45001) = 1)RefreshStat("IsMakingItem45001");Yield(0);if(IsFindItem(45001,ItemCount) = 1)break;Count+;Yield(0);if(IsFindItem(45001,ItemCount) = 1)return 1;return 0;void MakeItem45001Material()if(MakeItem45005(1) = 0)ShowText("Make Item 45005

6、Failure");return;int MakeItem37089(int ItemCount) /制作柴薪if(IsFindItem(37089,ItemCount) = 1)return 1;if(IsHaveNecessaryItem(37089) != 1)ShowText("Have not NecessaryItem 37089");return 0;if(!ShiftStory(38058)return 0;ScriptContinueMakeItem(37089);if(IsFindItem(37089,ItemCount) = 1)return

7、 1;int Count = 0;int SubCount;while(Count < ItemCount)MakeItem37089Material();if(MakeItem(37089) != 1)SubCount = 0;int Succ = 0;while(SubCount < 1)MakeItem37089Material();if(MakeItem(37089) = 1)Succ = 1;break;SubCount+;Yield(0);if(Succ = 0)ShowText("MakeItem(37089) Failure");return 0

8、;while(IsMakingItem(37089) = 1)RefreshStat("IsMakingItem37089");Yield(0);if(IsFindItem(37089,ItemCount) = 1)break;Count+;Yield(0);if(IsFindItem(37089,ItemCount) = 1)return 1;return 0;void MakeItem37089Material()if(MakeItem45001(1) = 0)ShowText("Make Item 45001 Failure");return;bo

9、ol MakeItem47009() /制作瓦斯if(IsHaveNecessaryItem(47009) != 1)ShowText("Have not NecessaryItem 47009");return false;if(!ShiftStory(38023)return false;if(ScriptContinueMakeItem(47009)return false;MakeItem47009Material();if(MakeItem(47009) != 1)int Count = 0;int Succ = 0;while(Count < 1)Make

10、Item47009Material();if(MakeItem(47009) = 1)Succ = 1;break;Count+;Yield(0);if(Succ = 0)ShowText("MakeItem(47009) Failure");return false;while(IsMakingItem(47009) = 1)RefreshStat("IsMakingItem47009");Yield(0);return true;bool MakeItem32024() /制作馒头 int DropRecycleItemCount = 50; int

11、 i = 0; int ItemID = 47009; /瓦斯 int DropRecycleItemOrd; if(!MakeItem47009()return false; ActiveNormalAI(0); /必须禁用普通状态ai while(i < DropRecycleItemCount) /ItemID = GetDropRecycleItemID(i); DropRecycleItemOrd = GetFirstItemOrd(ItemID); while(DropRecycleItemOrd != 0) DropRecycleItemOrd = GetFirstItem

12、Ord(ItemID); DropRecycleItem(DropRecycleItemOrd); Yield(0); i+; ActiveNormalAI(1);void MakeItem47009Material()if(MakeItem37089(1) = 0)ShowText("Make Item 37089 Failure");return;int MakeItem45007(int ItemCount) /制作柳安木if(IsFindItem(45007,ItemCount) = 1)return 1;return 0;int MakeItem45003(int

13、 ItemCount) /制作柳安木材if(IsFindItem(45003,ItemCount) = 1)return 1;if(IsHaveNecessaryItem(45003) != 1)ShowText("Have not NecessaryItem 45003");return 0;if(!ShiftStory(38058)return 0;ScriptContinueMakeItem(45003);if(IsFindItem(45003,ItemCount) = 1)return 1;int Count = 0;int SubCount;while(Count

14、 < ItemCount)MakeItem45003Material();if(MakeItem(45003) != 1)SubCount = 0;int Succ = 0;while(SubCount < 1)MakeItem45003Material();if(MakeItem(45003) = 1)Succ = 1;break;SubCount+;Yield(0);if(Succ = 0)ShowText("MakeItem(45003) Failure");return 0;while(IsMakingItem(45003) = 1)RefreshSta

15、t("IsMakingItem45003");Yield(0);if(IsFindItem(45003,ItemCount) = 1)break;Count+;Yield(0);if(IsFindItem(45003,ItemCount) = 1)return 1;return 0;void MakeItem45003Material()if(MakeItem45007(1) = 0)ShowText("Make Item 45007 Failure");return;bool MakeItem37006() /制作木制小齿轮if(IsHaveNeces

16、saryItem(37006) != 1)ShowText("Have not NecessaryItem 37006");return false;if(!ShiftStory(38036)return false;if(ScriptContinueMakeItem(37006)return false;MakeItem37006Material();if(MakeItem(37006) != 1)int Count = 0;int Succ = 0;while(Count < 1)MakeItem37006Material();if(MakeItem(37006)

17、 = 1)Succ = 1;break;Count+;/Yield(0);if(Succ = 0)ShowText("MakeItem(37006) Failure");return false;while(IsMakingItem(37006) = 1)RefreshStat("IsMakingItem37006");Yield(0);return true;void MakeItem37006Material()if(MakeItem45003(1) = 0)ShowText("Make Item 45003 Failure");

18、return;int MakeItem45008(int ItemCount) /制作桧木if(IsFindItem(45008,ItemCount) = 1)return 1;return 0;void MakeItem45004() /制作桧木材if(IsHaveNecessaryItem(45004) != 1)ShowText("Have not NecessaryItem 45004");return;if(!ShiftStory(38058)return;if(ScriptContinueMakeItem(45004)return;MakeItem45004Ma

19、terial();if(MakeItem(45004) != 1)int Count = 0;int Succ = 0;while(Count < 1)MakeItem45004Material();if(MakeItem(45004) = 1)Succ = 1;break;Count+;Yield(0);if(Succ = 0)ShowText("MakeItem(45004) Failure");return;while(IsMakingItem(45004) = 1)RefreshStat("IsMakingItem45004");Yield

20、(0);void MakeItem45004Material()if(MakeItem45008(1) = 0)ShowText("Make Item 45008 Failure");return;int MakeItem45006(int ItemCount) /制作橡木if(IsFindItem(45006,ItemCount) = 1)return 1;return 0;int MakeItem45002(int ItemCount) /制作橡木材if(IsFindItem(45002,ItemCount) = 1)return 1;if(IsHaveNecessar

21、yItem(45002) != 1)ShowText("Have not NecessaryItem 45002");return 0;if(!ShiftStory(38058)return 0;ScriptContinueMakeItem(45002);if(IsFindItem(45002,ItemCount) = 1)return 1;int Count = 0;int SubCount;while(Count < ItemCount)MakeItem45002Material();if(MakeItem(45002) != 1)SubCount = 0;int

22、 Succ = 0;while(SubCount < 1)MakeItem45002Material();if(MakeItem(45002) = 1)Succ = 1;break;SubCount+;Yield(0);if(Succ = 0)ShowText("MakeItem(45002) Failure");return 0;while(IsMakingItem(45002) = 1)RefreshStat("IsMakingItem45002");Yield(0);if(IsFindItem(45002,ItemCount) = 1)bre

23、ak;Count+;Yield(0);if(IsFindItem(45002,ItemCount) = 1)return 1;return 0;void MakeItem45002Material()if(MakeItem45006(1) = 0)ShowText("Make Item 45006 Failure");return;bool MakeItem37001() /制作木制钓勾if(IsHaveNecessaryItem(37001) != 1)ShowText("Have not NecessaryItem 37001");return fa

24、lse;if(!ShiftStory(38036)return false;if(ScriptContinueMakeItem(37001)return false;MakeItem37001Material();if(MakeItem(37001) != 1)int Count = 0;int Succ = 0;while(Count < 1)MakeItem37001Material();if(MakeItem(37001) = 1)Succ = 1;break;Count+;/Yield(0);if(Succ = 0)ShowText("MakeItem(37001) F

25、ailure");return false; while(IsMakingItem(37001) = 1)RefreshStat("IsMakingItem37001");Yield(0);return true;void MakeItem37001Material()if(MakeItem45002(1) = 0)ShowText("Make Item 45002 Failure");return;int Checkwook(int cnt)int mask = 0;int tmp = 0;int makecnt = 0;if(cnt = 1

26、) MakeItem32024(); MakeItem37006(); while(tmp = 0) tmp = 1;makecnt+;if(GetItemOrdByCount(45008,1)/会木做回木材 MakeItem45004(); mask = 1; tmp = 0; if(GetItemOrdByCount(45007,1) | GetItemOrdByCount(45003,1)/做小齿轮 MakeItem37006(); mask = 2; tmp = 0; if(GetItemOrdByCount(45005,1) | GetItemOrdByCount(45001,1)/

27、做馒头 MakeItem32024(); mask = 3; tmp = 0; if(GetItemOrdByCount(45006,1) | GetItemOrdByCount(45002,1)/做钓钩 MakeItem37001(); mask = 4; tmp = 0; /if(makecnt =4)break; return mask;void CompoundItem() int manID = 32024;/mantou int wanID = 47009;/wansi int lunID = 37006;/chilun int gouID = 37001;/gouzi int h

28、uiID = 45004;/huimucai int SubItemID = Value("SubMaterialID");/初始化副材料为馒头 int ItemID = Value("MainMaterialID");/初始化主材料为小此轮 int SubOrd = 0; int MainOrd; int ExchangeOrd; int tmp = 0; int MastMem; int SubMem; /ShowText(IntToStr(ItemID); ItemID = gouID; SubItemID = manID ; MastMem =

29、ItemID; SubMem = SubItemID; int cnt = 0; while(1) tmp = Checkwook(cnt); /ShowText(IntToStr(tmp); if(tmp = 1)/会木做回木材 ItemID = Mastmem; MainOrd = 0; else if(tmp = 2)/做小齿轮 SubItemID = Submem; MainOrd = 0; else if(tmp = 3)/做馒头 SubItemID = Submem; MainOrd = 0; else if(tmp = 4)/做钓钩 ItemID = Mastmem; MainO

30、rd = 0; if(GetFirstItemOrd(manID) | GetFirstItemOrd(lunID) cnt = 0; else cnt = 1; if(GetItemOrdByCount(41005,1)/判断合成物品是否蘑菇 SubOrd = GetItemOrdByCount(41005,1); ShowText(IntToStr(SubOrd); MainOrd = 0; else SubOrd = GetItemOrdByCount(SubItemID,1); if(SubOrd = 0) SubOrd = GetFirstItemOrd(SubItemID); if

31、(SubOrd = 0) ShowText("No SubItem"); if(GetFirstItemOrd(manID) SubItemID = manID; Submem = SubItemID; continue; else if(GetFirstItemOrd(lunID) SubItemID = lunID; Submem = SubItemID; continue; Checkwook(1); if(GetFirstItemOrd(manID) SubItemID = manID; Submem = SubItemID; continue; else if(G

32、etFirstItemOrd(lunID) SubItemID = lunID; Submem = SubItemID; continue; return; ExchangeOrd = GetFirstEmptyPlace(0); if(ExchangeOrd = 0) ShowText("No Empty Place for SubItem"); return; ExchangeItem(SubOrd,ExchangeOrd,1); SubOrd = GetItemOrdByCount(SubItemID,1); if(SubOrd = 0) ShowText("

33、;Exchange Item Failure1"); return; /MainOrd = GetItemOrdByCount(ItemID,1); if(MainOrd = 0) MainOrd = GetItemOrdByCount(ItemID,1); if(MainOrd = 0) MainOrd = GetFirstItemOrd(ItemID); if(MainOrd = 0) ShowText("No Item"); if(GetFirstItemOrd(gouID) ItemID = gouID; Mastmem = ItemID; continu

34、e; else if(GetFirstItemOrd(huiID) ItemID = huiID; Mastmem = ItemID; continue; MakeItem37001(); MakeItem45004(); Checkwook(0); if(GetFirstItemOrd(gouID) ItemID = gouID; Mastmem = ItemID; continue; else if(GetFirstItemOrd(huiID) ItemID = huiID; Mastmem = ItemID; continue; return; ExchangeOrd = GetFirs

35、tEmptyPlace(0) ; if(ExchangeOrd = 0) ShowText("No Empty Place for SubItem"); return; ExchangeItem(MainOrd ,ExchangeOrd,1); MainOrd = GetItemOrdByCount(ItemID,1); if(MainOrd = 0) ShowText("Exchange Item Failure"); return; / ShowText(IntToStr(MainOrd); / ShowText(IntToStr(SubOrd); if(MainOrd = SubOrd) ItemID = gouID; SubItemID = manID ; continue; BeginCompoundItemExAdv(MainOrd,SubOrd); Yield(0); /ShowText("wait com&