Охотник Опубликовано 21 сентября, 2021 Поделиться Опубликовано 21 сентября, 2021 Очередное моё творение может быть пригодится кому-нибудь. Примитивно, без проверок! Качь тёмного эльфа воина но можно и под мага переделать. После создания чара нужно выбрать автоатаку мобов ну и хил при маленьком ХП Правда иногда тупит в начале когда гем выбивает но это видать особенность сервера. А так в принципе можно и дальше дописать например под качь академиков) Кстати ребятки скриптописцы! Никак не могу заставить адрик покупать теневую пушку на 6 лвл поэтому поставил паузу на 6 лвл. Спойлер var obj: TL2NPC; obj2: TL2Effect; Enemy: TL2Live; Begin Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsbuffer'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_giveBuffSet figher 0 0'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_heal 0 0 0'); delay(2000); Engine.MoveTo(28424, 11032, -4232); delay(2500); Engine.SetTarget(30131); // Помощник Новичков delay(2500); Engine.DlgOpen; delay(1500); Engine.DlgSel(1); delay(3500); engine.facecontrol(0, true); while User.Level<3 do begin Delay (1000); if User.Level=3 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(4500); Engine.MoveTo(28424, 11032, -4232); delay(3500); Engine.SetTarget(30131); // Помощник Новичков delay(2500); Engine.DlgOpen; delay(2500); Engine.DlgSel(1); delay(2500); Engine.SetTarget(30129); // Митраэль delay(2500); Engine.DlgOpen; delay(1500); Engine.DlgSel(1); delay(1500); Engine.BypassToServer('Quest _999_T1Tutorial isle'); delay(10000); Engine.MoveTo(-119944, 44504, 368); delay(500); Engine.MoveTo(-119720, 44520, 368); delay(500); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -95800 240168 -3264 0'); delay(10000); engine.facecontrol(0, true); while User.Level<6 do begin Delay (1000); if User.Level=6 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -119784 44504 352 0'); delay(15000); Engine.MoveTo(-119720, 44504, 368); delay(500); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('npc_268448525_Quest NewbieGuideSystem'); delay(1000); Engine.BypassToServer('Quest NewbieGuideSystem newbie_give_weapon_coupon'); delay(1000); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('npc_268448525_Quest NewbieGuideSystem'); delay(1000); Engine.BypassToServer('Quest NewbieGuideSystem newbie_show_weapon'); script.pause(); delay(2000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsbuffer'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_giveBuffSet figher 0 0'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_heal 0 0 0'); delay(2000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -84024 243304 -3728 0'); delay(15000); Engine.MoveTo(-83688, 242824, -3712); delay(1000); Engine.MoveTo(-83080, 242136, -3712); delay(1000); Engine.MoveTo(-82584, 241656, -3712); delay(1000); Engine.MoveTo(-82280, 241464, -3712); delay(1000); Engine.MoveTo(-82232, 241544, -3712); delay(1000); Engine.SetTarget(30039); // Гилберт delay(500); Engine.DlgOpen; delay(1000); Engine.BypassToServer('npc_268450474_Quest'); delay(1000); Engine.BypassToServer('Quest _257_TheGuardIsBusy 30039-03.htm'); delay(1500); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -95800 240168 -3264 0'); delay(10000); engine.facecontrol(0, true); while User.Level<8 do begin Delay (1000); if User.Level=8 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -84024 243304 -3728 0'); delay(15000); Engine.MoveTo(-83688, 242824, -3712); delay(1000); Engine.MoveTo(-83080, 242136, -3712); delay(1000); Engine.MoveTo(-82584, 241656, -3712); delay(1000); Engine.MoveTo(-82280, 241464, -3712); delay(1000); Engine.MoveTo(-82232, 241544, -3712); delay(1000); Engine.SetTarget(30039); // Гилберт delay(500); Engine.DlgOpen; delay(1000); Engine.BypassToServer('npc_268450474_Quest'); delay(1000); Engine.BypassToServer('Quest _257_TheGuardIsBusy 30039-06.htm'); delay(3000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;page;territory/kamael'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -85928 37095 -2048 0'); delay(10000); Engine.MoveTo(-86472, 37000, -2032); delay(1000); Engine.MoveTo(-87432, 37032, -2128); delay(1000); Engine.MoveTo(-87832, 37144, -2144); delay(1000); engine.facecontrol(0, true); while User.Level<15 do begin Delay (1000); if User.Level=15 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;page;territory/telf'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -18415 85624 -3680 0'); delay(15000); Engine.MoveTo(-18168, 84584, -3640); delay(1000); engine.facecontrol(0, true); while User.Level<20 do begin Delay (1000); if User.Level=20 then break; if User.Dead then break; Engine.gohome; delay(30000); end; end. 1 Цитата Ссылка на комментарий Поделиться на другие сайты More sharing options...
жук Опубликовано 22 сентября, 2021 Поделиться Опубликовано 22 сентября, 2021 12 часов назад, Охотник сказал: Очередное моё творение может быть пригодится кому-нибудь. Примитивно, без проверок! Качь тёмного эльфа воина но можно и под мага переделать. После создания чара нужно выбрать автоатаку мобов ну и хил при маленьком ХП Правда иногда тупит в начале когда гем выбивает но это видать особенность сервера. А так в принципе можно и дальше дописать например под качь академиков) Кстати ребятки скриптописцы! Никак не могу заставить адрик покупать теневую пушку на 6 лвл поэтому поставил паузу на 6 лвл. Показать контент var obj: TL2NPC; obj2: TL2Effect; Enemy: TL2Live; Begin Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsbuffer'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_giveBuffSet figher 0 0'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_heal 0 0 0'); delay(2000); Engine.MoveTo(28424, 11032, -4232); delay(2500); Engine.SetTarget(30131); // Помощник Новичков delay(2500); Engine.DlgOpen; delay(1500); Engine.DlgSel(1); delay(3500); engine.facecontrol(0, true); while User.Level<3 do begin Delay (1000); if User.Level=3 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(4500); Engine.MoveTo(28424, 11032, -4232); delay(3500); Engine.SetTarget(30131); // Помощник Новичков delay(2500); Engine.DlgOpen; delay(2500); Engine.DlgSel(1); delay(2500); Engine.SetTarget(30129); // Митраэль delay(2500); Engine.DlgOpen; delay(1500); Engine.DlgSel(1); delay(1500); Engine.BypassToServer('Quest _999_T1Tutorial isle'); delay(10000); Engine.MoveTo(-119944, 44504, 368); delay(500); Engine.MoveTo(-119720, 44520, 368); delay(500); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -95800 240168 -3264 0'); delay(10000); engine.facecontrol(0, true); while User.Level<6 do begin Delay (1000); if User.Level=6 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -119784 44504 352 0'); delay(15000); Engine.MoveTo(-119720, 44504, 368); delay(500); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('npc_268448525_Quest NewbieGuideSystem'); delay(1000); Engine.BypassToServer('Quest NewbieGuideSystem newbie_give_weapon_coupon'); delay(1000); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('npc_268448525_Quest NewbieGuideSystem'); delay(1000); Engine.BypassToServer('Quest NewbieGuideSystem newbie_show_weapon'); script.pause(); delay(2000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsbuffer'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_giveBuffSet figher 0 0'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_heal 0 0 0'); delay(2000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -84024 243304 -3728 0'); delay(15000); Engine.MoveTo(-83688, 242824, -3712); delay(1000); Engine.MoveTo(-83080, 242136, -3712); delay(1000); Engine.MoveTo(-82584, 241656, -3712); delay(1000); Engine.MoveTo(-82280, 241464, -3712); delay(1000); Engine.MoveTo(-82232, 241544, -3712); delay(1000); Engine.SetTarget(30039); // Гилберт delay(500); Engine.DlgOpen; delay(1000); Engine.BypassToServer('npc_268450474_Quest'); delay(1000); Engine.BypassToServer('Quest _257_TheGuardIsBusy 30039-03.htm'); delay(1500); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -95800 240168 -3264 0'); delay(10000); engine.facecontrol(0, true); while User.Level<8 do begin Delay (1000); if User.Level=8 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -84024 243304 -3728 0'); delay(15000); Engine.MoveTo(-83688, 242824, -3712); delay(1000); Engine.MoveTo(-83080, 242136, -3712); delay(1000); Engine.MoveTo(-82584, 241656, -3712); delay(1000); Engine.MoveTo(-82280, 241464, -3712); delay(1000); Engine.MoveTo(-82232, 241544, -3712); delay(1000); Engine.SetTarget(30039); // Гилберт delay(500); Engine.DlgOpen; delay(1000); Engine.BypassToServer('npc_268450474_Quest'); delay(1000); Engine.BypassToServer('Quest _257_TheGuardIsBusy 30039-06.htm'); delay(3000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;page;territory/kamael'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -85928 37095 -2048 0'); delay(10000); Engine.MoveTo(-86472, 37000, -2032); delay(1000); Engine.MoveTo(-87432, 37032, -2128); delay(1000); Engine.MoveTo(-87832, 37144, -2144); delay(1000); engine.facecontrol(0, true); while User.Level<15 do begin Delay (1000); if User.Level=15 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;page;territory/telf'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -18415 85624 -3680 0'); delay(15000); Engine.MoveTo(-18168, 84584, -3640); delay(1000); engine.facecontrol(0, true); while User.Level<20 do begin Delay (1000); if User.Level=20 then break; if User.Dead then break; Engine.gohome; delay(30000); end; end. у тебя какая версия адрика? чет id не совпадают 0 Цитата Ссылка на комментарий Поделиться на другие сайты More sharing options...
Охотник Опубликовано 22 сентября, 2021 Автор Поделиться Опубликовано 22 сентября, 2021 1 час назад, жук сказал: у тебя какая версия адрика? чет id не совпадают С сайта крякнутый. А где именно не совпадает? 0 Цитата Ссылка на комментарий Поделиться на другие сайты More sharing options...
жук Опубликовано 22 сентября, 2021 Поделиться Опубликовано 22 сентября, 2021 4 часа назад, Охотник сказал: С сайта крякнутый. А где именно не совпадает? сорян я затупил при копирке все работает engine.npcexchange(айди;1 <вол-во); проверь на шадоу пушу возьмет нет у меня щя возможности нет зайти 0 Цитата Ссылка на комментарий Поделиться на другие сайты More sharing options...
жук Опубликовано 22 сентября, 2021 Поделиться Опубликовано 22 сентября, 2021 В 21.09.2021 в 21:08, Охотник сказал: Очередное моё творение может быть пригодится кому-нибудь. Примитивно, без проверок! Качь тёмного эльфа воина но можно и под мага переделать. После создания чара нужно выбрать автоатаку мобов ну и хил при маленьком ХП Правда иногда тупит в начале когда гем выбивает но это видать особенность сервера. А так в принципе можно и дальше дописать например под качь академиков) Кстати ребятки скриптописцы! Никак не могу заставить адрик покупать теневую пушку на 6 лвл поэтому поставил паузу на 6 лвл. Показать контент var obj: TL2NPC; obj2: TL2Effect; Enemy: TL2Live; Begin Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsbuffer'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_giveBuffSet figher 0 0'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_heal 0 0 0'); delay(2000); Engine.MoveTo(28424, 11032, -4232); delay(2500); Engine.SetTarget(30131); // Помощник Новичков delay(2500); Engine.DlgOpen; delay(1500); Engine.DlgSel(1); delay(3500); engine.facecontrol(0, true); while User.Level<3 do begin Delay (1000); if User.Level=3 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(4500); Engine.MoveTo(28424, 11032, -4232); delay(3500); Engine.SetTarget(30131); // Помощник Новичков delay(2500); Engine.DlgOpen; delay(2500); Engine.DlgSel(1); delay(2500); Engine.SetTarget(30129); // Митраэль delay(2500); Engine.DlgOpen; delay(1500); Engine.DlgSel(1); delay(1500); Engine.BypassToServer('Quest _999_T1Tutorial isle'); delay(10000); Engine.MoveTo(-119944, 44504, 368); delay(500); Engine.MoveTo(-119720, 44520, 368); delay(500); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -95800 240168 -3264 0'); delay(10000); engine.facecontrol(0, true); while User.Level<6 do begin Delay (1000); if User.Level=6 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -119784 44504 352 0'); delay(15000); Engine.MoveTo(-119720, 44504, 368); delay(500); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('npc_268448525_Quest NewbieGuideSystem'); delay(1000); Engine.BypassToServer('Quest NewbieGuideSystem newbie_give_weapon_coupon'); delay(1000); Engine.SetTarget(32135); // Гид Новичков delay(500); Engine.DlgOpen; delay(500); Engine.BypassToServer('npc_268448525_Quest NewbieGuideSystem'); delay(1000); Engine.BypassToServer('Quest NewbieGuideSystem newbie_show_weapon'); script.pause(); delay(2000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsbuffer'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_giveBuffSet figher 0 0'); delay(1000); Engine.BypassToServer('_bbsbufferbypass_heal 0 0 0'); delay(2000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -84024 243304 -3728 0'); delay(15000); Engine.MoveTo(-83688, 242824, -3712); delay(1000); Engine.MoveTo(-83080, 242136, -3712); delay(1000); Engine.MoveTo(-82584, 241656, -3712); delay(1000); Engine.MoveTo(-82280, 241464, -3712); delay(1000); Engine.MoveTo(-82232, 241544, -3712); delay(1000); Engine.SetTarget(30039); // Гилберт delay(500); Engine.DlgOpen; delay(1000); Engine.BypassToServer('npc_268450474_Quest'); delay(1000); Engine.BypassToServer('Quest _257_TheGuardIsBusy 30039-03.htm'); delay(1500); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -95800 240168 -3264 0'); delay(10000); engine.facecontrol(0, true); while User.Level<8 do begin Delay (1000); if User.Level=8 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -84024 243304 -3728 0'); delay(15000); Engine.MoveTo(-83688, 242824, -3712); delay(1000); Engine.MoveTo(-83080, 242136, -3712); delay(1000); Engine.MoveTo(-82584, 241656, -3712); delay(1000); Engine.MoveTo(-82280, 241464, -3712); delay(1000); Engine.MoveTo(-82232, 241544, -3712); delay(1000); Engine.SetTarget(30039); // Гилберт delay(500); Engine.DlgOpen; delay(1000); Engine.BypassToServer('npc_268450474_Quest'); delay(1000); Engine.BypassToServer('Quest _257_TheGuardIsBusy 30039-06.htm'); delay(3000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;page;territory/kamael'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -85928 37095 -2048 0'); delay(10000); Engine.MoveTo(-86472, 37000, -2032); delay(1000); Engine.MoveTo(-87432, 37032, -2128); delay(1000); Engine.MoveTo(-87832, 37144, -2144); delay(1000); engine.facecontrol(0, true); while User.Level<15 do begin Delay (1000); if User.Level=15 then break; if User.Dead then break; end; engine.facecontrol(0, false); delay(15000); Engine.BypassToServer('_bbshome'); delay(1000); Engine.BypassToServer('_bbsteleport'); delay(1000); Engine.BypassToServer('_bbsteleport;page;territory/telf'); delay(1000); Engine.BypassToServer('_bbsteleport;teleport; -18415 85624 -3680 0'); delay(15000); Engine.MoveTo(-18168, 84584, -3640); delay(1000); engine.facecontrol(0, true); while User.Level<20 do begin Delay (1000); if User.Level=20 then break; if User.Dead then break; Engine.gohome; delay(30000); end; end. Engine.npcexchange(10477,1); delay(1000); Engine.UseItem(10477); вот берет одевает за купон 1 Цитата Ссылка на комментарий Поделиться на другие сайты More sharing options...
Охотник Опубликовано 24 сентября, 2021 Автор Поделиться Опубликовано 24 сентября, 2021 В 23.09.2021 в 05:54, жук сказал: Engine.npcexchange(10477,1); delay(1000); Engine.UseItem(10477); вот берет одевает за купон Ок.Спасибо! Проверю на старте.А то капец не удобно было) 0 Цитата Ссылка на комментарий Поделиться на другие сайты More sharing options...
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.
Примечание: Ваш пост будет проверен модератором, прежде чем станет видимым.