Help Script Adrenaline

[GISELLEBUCH]

Hello, please excuse the use of a translator.I need help making an adrenaline scrip so that it can be buffed using the scheme. 
Also I do not know if they can help me in the tate quest since my character talks to Jereny but does not ask for the Eggs quest, I have tried different ways such as the use of the line, the name, the quest id etc, but it still does not take the quest to the same thing that happens in the npc buff.
Please request your help thank you very much

 

 

begin
  // code..
while true do begin
  Engine.SetTarget(31521);                                      ///jeremy
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  Delay(500);
  Engine.bypasstoserver('Quest 621_EggDelivery 31521-1.htm');                here dont take quest
  Engine.MoveTo(150404,-113188,-2141);
  Engine.MoveTo(150533,-114686,-1779);
  Engine.MoveTo(151344,-115006,-1611);
  Engine.CancelTarget;
  Engine.MoveTo(154492,-114995,-1567);
  Engine.MoveTo(157224,-115436,-1922);
  Engine.MoveTo(157381,-115407,-1896);
  Engine.MoveTo(157358,-115501,-1921);
  Engine.MoveTo(157598,-115486,-1927);
  Engine.SetTarget(31543);                                    ////pulin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  delay(500) ;
  Engine.bypasstoserver('Quest 621_EggDelivery 31543-1.htm');           
  Delay(500);
  Engine.MoveTo(156803, -115366, -1880);
  Engine.MoveTo(155365, -114559, -1625);
  Engine.CancelTarget;
  Engine.MoveTo(154269, -113957, -1604);
  Engine.MoveTo(152599, -113547, -1658);
  Engine.MoveTo(152072, -113343, -1626);
  Engine.MoveTo(151519, -112861, -1999);
  Engine.MoveTo(151244, -112937, -2124);
  Engine.MoveTo(151203, -112241, -2287);
  Engine.MoveTo(153632, -110383, -2675);
  Engine.MoveTo(154994, -107157, -2697);
  Engine.MoveTo(155599, -105710, -2755);
  Engine.SetTarget(31544);                                      /// naff
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  Delay(500);
  Engine.bypasstoserver('Quest 621_EggDelivery 31544-1.htm');       
  Delay(500);            
  Engine.MoveTo(155621,-105697,-2780);
  Engine.MoveTo(154776,-104491,-2810);
  Engine.CancelTarget;
  Engine.MoveTo(153253,-101918,-2757);
  Engine.MoveTo(152601,-101212,-2943);
  Engine.MoveTo(149277,-100863,-2943);
  Engine.MoveTo(148429,-100919,-2994);
  Engine.MoveTo(146976,-101253,-3080);
  Engine.MoveTo(146268,-101937,-2872);
  Engine.MoveTo(144957,-102812,-3556);
  Engine.MoveTo(142805,-104204,-3624);
  Engine.MoveTo(141626,-104742,-3648);
  Engine.MoveTo(140631,-105505,-3632);
  Engine.SetTarget(31545);                                      ///crocus
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  Delay(500);
  engine.bypasstoserver('Quest 621_EggDelivery 31545-1.htm');      
  Delay(500);
  Engine.MoveTo(140722,-105729,-3654);
  Engine.MoveTo(140862,-108560,-3654);
  Engine.CancelTarget;
  Engine.MoveTo(141469,-109301,-3616);
  Engine.SetTarget(31546);                                    ////kuber
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  Delay(500);
  Engine.bypasstoserver('Quest 621_EggDelivery 31546-1.htm'); 
  Delay(500);
  Engine.MoveTo(142274, -109216, -3587);
  Engine.MoveTo(143990, -108702, -3503);
  Engine.CancelTarget;
  Engine.MoveTo(146375,-108965,-3252);
  Engine.MoveTo(147727,-108871,-2899);
  Engine.MoveTo(148785,-108902,-2639);
  Engine.MoveTo(149347,-109226,-2515);
  Engine.MoveTo(149506,-110728,-2294);
  Engine.MoveTo(149267,-111829,-2176);
  Engine.MoveTo(148052,-113146,-2136);
  Engine.MoveTo(147670,-113440,-2104);
  Engine.MoveTo(147535,-113295,-2112);
  Engine.SetTarget(31547);                                    /////beolin
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  Delay(500);
  engine.bypasstoserver('Quest 621_EggDelivery 31547-1.htm');
  Delay(500);
  Engine.MoveTo(147591,-113304,-2108);
  Engine.MoveTo(148037,-113126,-2163);
  Engine.MoveTo(148908,-112712,-2096);
  Engine.MoveTo(149139,-112429,-2093);
  Engine.SetTarget(31521);                                  ///jeremy
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.DlgSel('Egg Delivery');
  Delay(500);
  engine.bypasstoserver('Quest 621_EggDelivery 31521-3.htm');
  Delay(500);
  Engine.CancelTarget;
  Engine.UseItem (736);
  Delay(30000);
   if User.inrange(150361,-57286,-2976, 250, 150) then begin
        Engine.MoveTo(150132,-57654,-3007);
        Engine.MoveTo(149291,-58049,-2976);
        Engine.MoveTo(149080,-57638,-2968);
        Engine.MoveTo(149291,-57493,-2994);    
  end;
    if User.inrange(147728,-58323,-3002, 250, 150) then begin
        Engine.MoveTo(149291,-58049,-2976);
        Engine.MoveTo(149080,-57638,-2968);
        Engine.MoveTo(149291,-57493,-2994);    
  end;
    if User.inrange(146117,-58096,-3002, 250, 150) then begin
    Engine.MoveTo(146073,-58221,-3007);
    Engine.MoveTo(147875,-58554,-2976);
        Engine.MoveTo(149291,-58049,-2976);
        Engine.MoveTo(149080,-57638,-2968);
        Engine.MoveTo(149291,-57493,-2994);  
  end;    
    if User.inrange(145302,-56992,-3002, 250, 150) then begin
        Engine.MoveTo(146060,-58237,-3007);
        Engine.MoveTo(149291,-58049,-2976);
        Engine.MoveTo(149080,-57638,-2968);
        Engine.MoveTo(149291,-57493,-2994);  
  end;
    if User.inrange(148578,-56011,-2776, 250, 150) then begin
    Engine.MoveTo(150473,-57211,-3007);
        Engine.MoveTo(150132,-57654,-3007);
        Engine.MoveTo(149291,-58049,-2976);
        Engine.MoveTo(149080,-57638,-2968);
        Engine.MoveTo(149291,-57493,-2994);  
  end;
    if User.inrange(147721,-56289,-2775, 250, 150) then begin
    Engine.MoveTo(147728,-58323,-3002);
        Engine.MoveTo(149291,-58049,-2976);
        Engine.MoveTo(149080,-57638,-2968);
        Engine.MoveTo(149291,-57493,-2994);    
  end;
  Engine.SetTarget(31584);                                      ///Valentine
  Engine.DlgOpen;
  Engine.DlgSel('Quest');
  Delay(500);
  Engine.bypasstoserver('Quest 621_EggDelivery 31584-2.htm');
  Delay(500);
  Engine.CancelTarget;
  Engine.MoveTo(149291,-57493,-2994);
  Engine.MoveTo(149080,-57638,-2968);
  Engine.MoveTo(149291,-58049,-2976);
  Engine.MoveTo(147708,-58176,-3007);
  Engine.MoveTo(147744,-56367,-2776);
  Engine.MoveTo(147952,-55323,-2728);
  Engine.SetTarget(31275);                                       ///Tatiana
  Engine.DlgOpen;
  Engine.DlgSel('"I Want to teleport."');
  Delay(500);
  Engine.DlgSel('Hot Springs - 9300 Adena');
  Delay(500);
  Engine.DlgSel('OK');
  Delay(5000);
  Engine.MoveTo(144868,-113470,-2555);
  Engine.MoveTo(146928,-112307,-2280);
  Engine.MoveTo(149700,-113250,-2072);
  Engine.MoveTo(149926,-112860,-2096);
  Engine.MoveTo(149565,-112718,-2064);
  Delay(500)
  end;
     
end. 

Edited April 16, 2020 by Fanky