Registruokitės, norėdami gauti pilną prieigą prie forumo. Užsiregistravus bei prisijungus, galėsite kurti savo temas, rašyti atsakymus į jau sukurtas temas, duoti reputaciją kitiems nariams, redaguoti profilį, skelbti būsenos atnaujinimus bei kita. Jei jau turite vartotoją, prisijunkite čia - jei ne susikurkite naują. Registracijos mokestis - 5 Lt.
Toggle shoutbox Šaukykla Draudžiama reklamuoti savo forumo temas šaukykloje
|
Runescape bot ir sukčiaivimo istorija.
#1
08 lapkričio 2009 - 06:01
2001, Sausis Buvo sukurtas kuklus forumas RBcheats , ten pasirodė Nick.
2001, Pavasaris The Nick Dude (Nick) sukūrė pirmą botą kuris atskirdavo spalvas ir spausdavo ten kur reikia. Botas buvo pavadintas AutoMiner. Tuo metu, kai Nick Sherlock sukurė bota, buvo keturiolikmetis.
2001, Gegužė Kai mirė RBcheats forumas, EvilCowGod sukurė savo forumą pavadinimu EvilCowGod Technologies.
~2002 Pasirodė daugiau botu, vienas iš jų RuneBot, daug žmoniu buvo užbaninta ir "botinimas" tapo viešai žinomas. Kai mirė RuneBot, Phlat sukurė pirma programa kuri leisdavo redaguoti žaidima. Phlat pavyko pakeisti savo pinigu suma banke, Jagex greitai tai pataisė.
2002, Rugsėjo 22 Buvo sukurtas beveik tobulas botas Autorune. Jis kasdavo east of Varrock, smeltino ir nešdavo į banka.
2002, Gruodžio 22, Penktadienis Pirmas masinis banas, nukentėjo daug žmoniu, mirė Autorune.
2003, Sausis Pirmas glitch runescape istorijoje, ji yra gan sunku paiškinti. Jis vadinosi knife glitch
Kolkas viskas, aišku tai nėra visa istorija, papildysiu šiandien vakare arba rytoj.
#4
08 lapkričio 2009 - 06:26
Mano mokamo boto ataskaitos: http://www.rsbot.lt/...=6797#post_6797
Mano GFX galerija:http://rsbot.lt/foru...p?thread_id=525
Mano parduotuvė, supirktuvė: http://rsbot.lt/foru...p?thread_id=835
90/90 Str Achieved
71/85 Ranged Achieved
56/70 Fishing achieved
54/99 Hunter achieved
#5
08 lapkričio 2009 - 07:34
Tutorial Island servisas -- http://rsbot.lt/foru...?thread_id=3029
Account parduotuvė -- http://rsbot.lt/foru...p?thread_id=973
#6
08 lapkričio 2009 - 07:54
Life Made
#8
08 lapkričio 2009 - 08:20
{$DEFINE Debug} //Add a // in front of this line (so it turns green) to not clear // the debug box (the box which is located at the bottom left of SCAR) //Mouse Macro by Mayazcherquoi (a.k.a Dan's The Man) //Records and outputs a SCAR-compatible script of your mouse movements and //actions. //Press F12 or CTRL+ALT+S to stop the script. program MouseMacro; var cx, cy, lx, ly, wt, mD, wtB, sT, Count: Integer; IMBDL, IMBDR: Boolean; procedure ScriptTerminate; begin Alert('Recording has stopped'); Writeln('end.'); GetSelf.WindowState := wsNormal; end; begin GetSelf.WindowState := wsMinimized; {$ifDef Debug} ClearDebug; {$endIf} sT := 3; Writeln('program New;'); Writeln(' //Written by Mouse Macro, which was written by Mayazcherquoi (a.k.a Dan''s The Man)'); Writeln(''); Writeln('procedure ScriptTerminate;'); Writeln('begin'); Writeln(' GetSelf.WindowState := wsNormal;'); Writeln('end;'); Writeln(''); Writeln('begin'); Writeln(' GetSelf.WindowState := wsMinimized;'); repeat Alert('Starting in: ' + IntToStr(sT)); Dec(sT); Wait(995); Until(sT = 0); Alert('Recording has Started'); wt := GetTimeRunning; repeat GetMousePos(cx, cy); wtB := GetTimeRunning - wt; if((cx <> lx) or (cy <> ly)) then begin if(not(wtB <= 0)) then begin Writeln(' Wait(' + IntToStr(wtB) + ');'); wt := GetTimeRunning; end; Writeln(' MoveMouse(' + IntToStr(cx) + ', ' + IntToStr(cy) + ');'); lx := cx; ly := cy; end; IMBDL := IsMouseButtonDown(True); IMBDR := IsMouseButtonDown(False); if((IMBDL) and (not(mD = 1))) then begin if(not(GetTimeRunning - wt <= 0)) then begin Writeln(' Wait(' + IntToStr(wtB) + ');'); wt := GetTimeRunning; end; Writeln(' HoldMouse(' + IntToStr(cx) + ', ' + IntToStr(cy) + ', True);'); mD := 1; end else if(not(IMBDL) and (mD = 1)) then begin if(not(wtB <= 0)) then begin Writeln(' Wait(' + IntToStr(wtB) + ');'); wt := GetTimeRunning; end; Writeln(' ReleaseMouse(' + IntToStr(cx) + ', ' + IntToStr(cy) + ', True);'); mD := 0; end; if((IMBDR) and (not(mD = 2))) then begin if(not(wtB <= 0)) then begin Writeln(' Wait(' + IntToStr(wtB) + ');'); wt := GetTimeRunning; end; Writeln(' HoldMouse(' + IntToStr(cx) + ', ' + IntToStr(cy) + ', False);'); mD := 2; end else if(not(IMBDR) and (mD = 2)) then begin if(not(wtB <= 0)) then begin Writeln(' Wait(' + IntToStr(wtB) + ');'); wt := GetTimeRunning; end; Writeln(' ReleaseMouse(' + IntToStr(cx) + ', ' + IntToStr(cy) + ', False);'); mD := 0; end; if(IsFKeyDown(12)) then TerminateScript; Until(False); end.
Life Made
0 vartotojai(-ų) skaito šią temą
0 nariai(-ių), 0 svečiai(-ių) ir 0 slapti(-ų) nariai(-ių)