Jump to content

LAPDS

Members
  • Posts

    4
  • Credits

  • Joined

  • Last visited

  • Feedback

    0%

About LAPDS

Profile Information

  • Gender
    Male
  • Country
    Argentina

LAPDS's Achievements

Newbie

Newbie (1/16)

0

Reputation

  1. Thx adr.bot and Boukipike, the scrip work very well, not 100% but work fine (only stock in some respawn areas of goodard, i don't have all i thick), in the morning i take 100 frintezza pass, saw the scrip work fine for me. i one to said thank a lot for the help, i use a combination of procedure and function (like a adr.bot said), and use if and while with engine.queststatus() whit the different stage of quest (thx to boukipike). P.S: i don't replay to adr.bot the question about backing to cal hall, the command you said me is (rttohall) but don't work, saw i read the scrip manual and i found there, the command is (rttoholl) whit "o".
  2. Thx adr.bot, i will try with that example. and one more cuestion, where i can find the ID of QUEST? to use in this command Engine.QuestStatus(654, 3)
  3. (first i m so sorry for my english i no good in this language) I need your help, if any one can help me. I try to do a script for a quest JOURNEY TO A SETTLEMENT, in my server this quest is repeatable and i get many passes for frintezza boss. I write the script but don't work property, i want to do the script do the quest for eg 10 time, but i cant do the loop work fine, so if any can read this script and meaby can tell me what is wrong. ///////////////////////////////////////////////////////////////////////////////////////////////////////////// //QUEST JOURNEY TO A SETTLEMENT // // // // // //Localización: four mausoleums muy adentro en imperial tomb en Town Goddard // //Begin NPC: Nameless Spirit // //Reward: Frintezza's Magic Force Field Removal Scroll // //Quest repetible: in this server "yes" // // // //1ª Nameless Spirit will ask you to bring antelope skin. // //2ª Kill antelope canyon y antelope canyon slave en wall of argos to get the quest item antelope skin X 1 // // then go back to NPC. // //3ª speak with Nameless Spirit and give him the antelope skin. // //4ª him reward you with the Frintezza's Magic Force Field Removal Scroll. // //5ª take the quest again. // ///////////////////////////////////////////////////////////////////////////////////////////////////////////// var QuestItem: TL2Item; Item: TL2Item; begin Engine.MoveTo(147960,-55272,-2728); //move to Goddard GK Tatiana Delay(500); Engine.SetTarget(31275); //Target GK Tatiana Delay(500); Engine.DlgOpen; //Talk GK Tatiana Delay(500); Engine.DlgSel('[Noblesse Exclusive] Teleport'); //select Nobles Teleport Delay(500); Engine.DlgSel(2); // Select Teleport Hounting Ground without Token Delay(500); Engine.DlgSel('Four Sepulchers - 1000 9'); // Select destination Four sepulchers teleport Delay(500); Engine.CancelTarget; // Cancel Target GK Tatiana Engine.MoveTo(178296,-85560,-7216); //Move Nameless Spirit NPC (begin of the quest) Delay(500); Engine.SetTarget(31453); //Target Nameless Spirit Delay(500); Engine.DlgOpen; // talk with NPC Nameless Spirit Delay(500); Engine.DlgSel('Quest'); //Request quest Delay(500); Engine.DlgSel('65402'); // Select Quest Journey to a Settlement Delay(500); Engine.DlgSel('I will do it.'); //accept the quest Delay(500); Engine.CancelTarget; // Cancel Target Nameless Spirit if not (Inventory.User.ByID(8073, Item) = true) and (Item.Count < 5) then begin //ID 8073 is Frintezza Magic Force Field Removal Scroll final reward from quest, this item is save it into the user inventory Engine.UseItem(736); //Take Soe Delay(10000); Engine.MoveTo(147960,-55272,-2728); //Move to GK Tatiana Delay(500); Engine.SetTarget(31275); //Target GK Tatiana Delay(500); Engine.DlgOpen; // Talk with GK Tatiana Delay(500); Engine.DlgSel('Teleport'); //Select Teleport Delay(500); Engine.DlgSel('Wall of Argos - 2200 9'); //Select destination wall of argos Delay(500); Engine.CancelTarget; // Cancel Target GK Tatiana if not (Inventory.Quest.ByID(8072, QuestItem) = true) then begin // ID 8072 is Antilope Skin item first part of quest only need one, this item is save it into the quest user inventory Engine.FaceControl(0,true); // activate BOT end. Engine.FaceControl(0,false); // deactivate BOT Engine.UseItem(736); //Take Soe Delay(10000); Engine.MoveTo(147960,-55272,-2728); //Move GK Tatiana Delay(500); Engine.SetTarget(31275); //Target GK Tatiana Delay(500); Engine.DlgOpen; //Talk GK Tatiana Delay(500); Engine.DlgSel('[Noblesse Exclusive] Teleport'); //select Nobles Teleport Delay(500); Engine.DlgSel(2); // Select Teleport Hounting Ground without Token Delay(500); Engine.DlgSel('Four Sepulchers - 1000 9'); // Select destination Four sepulchers teleport Delay(500); Engine.CancelTarget; // Cancel Target GK Tatiana Engine.MoveTo(178296,-85560,-7216); //Move to Nameless Spirit Delay(500); Engine.SetTarget(31453); //Target Nameless Spirit Delay(500); Engine.DlgOpen; //Talk Nameless Spirit Delay(500); Engine.DlgSel('Quest'); // Select Quest Delay(500); Engine.DlgSel('65402'); // Select Journey to a Settlement Delay(500); Engine.DlgSel('Here it is.'); // Give Item ID 8072 to NPC Delay(500); Engine.DlgOpen; //Talk Nameless Spirit Delay(500); Engine.DlgSel('Quest'); // Select Quest Delay(500); Engine.DlgSel('65402'); // Select Journey to a Settlement Delay(500); Engine.DlgSel('I will do it.'); //accept the quest Delay(500); Engine.CancelTarget; // Cancel Target Nameless Spirit end. end.
  4. wath command i can use if my char is death go to the "clan hall"?, the command Engine.GoHome; leave in village only.
×
×
  • Create New...