漂流幻境hcp超省材料中练.docx

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) = 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(IsFindItem(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(45001,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) 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 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 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;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;bool 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)MakeItem47009Material();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 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 = GetFirstItemOrd(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 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 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)RefreshStat(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(IsHaveNecessaryItem(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) = 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);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;MakeItem45004Material();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(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(IsHaveNecessaryItem(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 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)break;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 false;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) Failure);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) 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)/做馒头 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 huiID = 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 = 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; MainOrd = 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(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(GetFirstItemOrd(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(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; continue; 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 = GetFirstEmptyPlace(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