Jump to content

adr.bot

Members
  • Posts

    657
  • Credits

  • Joined

  • Feedback

    100%

About adr.bot

Contact Methods

  • Skype
    adr.bot

Profile Information

  • Gender
    Not Telling
  • Country
    Lithuania

Recent Profile Visitors

6,411 profile views

adr.bot's Achievements

  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. 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
  4. 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))
  5. 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.
  6. thats interesting, anyways as long as it works then good, gl!
  7. np, but it is really correct values? for example when tested (interlude) PCardinal(Cardinal(p2))^ gave me system message ID. https://prnt.sc/11c67l2
  8. 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.
  9. 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.
  10. 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!
  11. https://adrenalinebot.com/en/api/example/more-about-enginebypasstoserver
×
×
  • Create New...