Jump to content

adr.bot

Members
  • Posts

    657
  • Credits

  • Joined

  • Last visited

  • Feedback

    100%

Everything posted by adr.bot

  1. save? deposit load function https://adrenalinebot.com/en/api/adrenaline/Classes/TL2Control#LoadItems
  2. well i guess not exactly that, that was just an example, you can check adr api here for detailed info https://adrenalinebot.com/en/api/adrenaline/Classes/TL2Live#Target
  3. many commands not exist in cracked bot
  4. if bot not show error in messages means script have no problems, most likely before there error, u fixed it and red line remains there, if you can start script, then you are good to go edit: LoadItems array of items should contain "item id, items count", how u write there shouldnt be a red line, but it probably wont work
  5. well i mean to read to see idea how it getting read, and not actually use it. anyways to read string (probably, should actually test), i cant tell "Position" number because ur server positions seems odd to me. String(PChar(Cardinal(p2) + Position))
  6. i would recommend read this https://adrenalinebot.com/en/api/example/packetunit-ready-unit-working-packets-adrenaline-bot because how u read seems not right. p2 should contain (in my case MessageID), Size, Type, and values by Type. thats why i dont have answer for ur question in this case, because ur system message data seems odd to me xd ps. u always can use move and check if u moved.
  7. thats interesting, anyways as long as it works then good, gl!
  8. np, but it is really correct values? for example when tested (interlude) PCardinal(Cardinal(p2))^ gave me system message ID. https://prnt.sc/11c67l2
  9. uses SysUtils; var p1, p2: Pointer; Match, Win, Loss, Points: Cardinal; begin while true do begin if Engine.WaitAction([laSysMsg], p1, p2) = laSysMsg then begin if Cardinal(p1) = 1673 then begin Match := PCardinal(Cardinal(p2) + 12)^; Win := PCardinal(Cardinal(p2) + 20)^; Loss := PCardinal(Cardinal(p2) + 28)^; Points := PCardinal(Cardinal(p2) + 36)^; print(format('Match: %d; Win: %d; Loss: %d; Points: %d', [Match, Win, Loss, Points])); end; end; end; end.
  10. https://adrenalinebot.com/en/api/adrenaline/Classes/TL2Control#AuthLogin for enter login/passw if server have protection most likely winapi keyclicks doesnt work, then you can try use "Engine.UseKey" https://adrenalinebot.com/en/api/adrenaline/Classes/TL2Control#UseKey for disconnect, well if u get disconnect while u trying log in, then at very end of login , u can do check for if u are online, if not close client, and login again. if u get disconnect while playing, and bot not shows that u are diconnected, u can try do thread procedure, which would check if u moved/get some specific items in last 60sec or so, if not do any of those, most likely u diconnected and u can close client for login again. however i dont have any examples of that, but u can try adapt this code https://adrenalinebot.com/en/api/example/checking-if-our-character-is-stuck-in-the-thread for client close if u not moved.
  11. if user.inrange(123, 123, 123, 500) then begin engine.moveto(123, 123, 123); end; u dont need have each exact spawn location, u can cover town with inrange check. 500 is radius around XYZ, gl!
  12. https://adrenalinebot.com/en/api/example/more-about-enginebypasstoserver
  13. https://prnt.sc/s6plu5
  14. u need check events tab, there is "item", select it and u see everything else there
  15. ED=ConfirmDlg:d(requestID)d(d)d(d)s(name)d(d)d(d) probably this one
  16. change CharList to NpcList
  17. wait what, last time i checked, i wasnt banned xd about bad businness, i not even selling scripts, but if i want i could bypass that joke captcha which he use xd i not even talk about him antibot, aka "zeus guard, best server protection", which was bypassed by guy who have 0 knowledge in c#, and other debug bullshit xd
  18. not sure if i understand good, but color, example in screenshot https://prnt.sc/p6dq6w can be changed in "Interface.u > ChatWnd" in "function HandleChatmessage( String param )", chronicle interlude
  19. ur alarm makes no sense, u need chose if u doing one script for all windows, or only for single window, now is half with get control, half with engine (current control)
  20. function AggroCheck():boolean; var i : integer; begin result := false; if npclist.count = 0 then exit; for i := 0 to npclist.count -1 do begin if (npclist(i).target = user) or (npclist(i).atkoid = user.oid) then begin result := true; exit; end; end; end;
  21. yes drop rates for sure not correct, although its same not correct as old drop spoil
  22. no it is full client sided Spoil.ini too
×
×
  • Create New...

AdBlock Extension Detected!

Our website is made possible by displaying online advertisements to our members.

Please disable AdBlock browser extension first, to be able to use our community.

I've Disabled AdBlock