-
var Figth_Flag:boolean; Item: TL2Item; Npc: TL2Npc; Obj: TL2Buff; IdBuff: integer; Buffs:TL2Buff; var L2Skill: TL2Skill; procedure toVillage; begin Delay(100); if (User.HP=0) then begin Delay(2000); Engine.GoHome; Engine.Facecontrol(0,False); Buff; end; end; //REBUFF procedure buff; begin Delay (2000); Engine.BypassToServer('_bbshome'); delay(1500); Engine.BypassToServer('_bbs_buffer'); delay(1500); Engine.BypassToServer('_bbs_buffer_scheme;use; Player ; PvP'); delay(1500); Engine.BypassToServer('_bbs_buffer_action;use;1; Player'); RunTo; end; //TELEPORT procedure RunTo; begin Engine.BypassToServer('_bbshome'); delay(1500); Engine.BypassToServer('_bbs_link;gk/teleport.htm'); delay(1500); Engine.BypassToServer('_bbs_link;gk/townarea/aden.htm'); delay(1500); Engine.BypassToServer('_bbs_goto;376'); delay(1500); Fight; end; //CHECK procedure toBuff; begin IdBuff:= 268 ; //Check BUFF while not User.Buffs.ById(IdBuff,obj) do begin Print('Song of Wind'); Engine.UseItem(736); //Scroll Escape Delay(20000); Engine.Facecontrol(0,False); buff; end; end; //SPOT procedure Fight; begin Print('Fight zone'); Engine.MoveTo(171472, 56201, -5504); delay(1000); Engine.MoveTo(172042, 56543, -5680); delay(1000); Engine.MoveTo(172860, 56696, -5865); delay(1000); Engine.MoveTo(174000, 56768, -5920); delay(1000); Engine.LoadConfig('Player'); Engine.LoadZone('sv.zmap'); Print('Done'); toVillage; Engine.Facecontrol(0,True); end; //----------------------------------------------------------------------------- begin //REPEAT Print('repeat again'); repeat toBuff; toVillage; until Engine.Status = lsOffline; Delay(5000); end. this is my script check/rebuff, back on spot... i want to add refill for soushot and mana potions help please