Results 1 to 14 of 14

Thread: Wizard tower demon killer

  1. #1
    Join Date
    Feb 2007
    Posts
    27
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Wizard tower demon killer

    I've searched around a few different forums but I have never found a wiz tower demon killer, so mabye someone could have a go at making one including wich spell you want to use (I would try and make it myself but I only know how to make basic scripts).

  2. #2
    Join Date
    Feb 2007
    Location
    SparklesProd.com
    Posts
    2,406
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    I could make one if you wanted.

    Not a very hard script to make :P

  3. #3
    Join Date
    Jan 2007
    Location
    Kansas
    Posts
    3,760
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    It would be cool with an option for range also. I will also try.


  4. #4
    Join Date
    Oct 2006
    Posts
    2,297
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    °selecting spell
    °clicking monster
    °anti randoms
    °anti ban actions
    this could be done in like, mhmm 100-150 lines??

    ranged/magic compatble, mhmm 150-200 lines??
    Aren't there a lot of people over there that also train that can increase the chance to be banned??

  5. #5
    Join Date
    Jan 2007
    Posts
    37
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    ye but most ppl there dont talk exept asking ure mage/range lvl so may b u cud add a chat function 2 it?
    If I see you autoing with level 3/default clothes/crap name I will report you.Auto Correctly.put this in your sig
    all nooby autoers must die

  6. #6
    Join Date
    Sep 2006
    Location
    New Jersey, USA
    Posts
    5,347
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    Yeah...A simple chat function could really help it...

    It'd be pretty cool if the script had confuse/weaken/etc functions in it: confuse, attack, weaken, attack; less macro-like, more xp....
    Interested in C# and Electrical Engineering? This might interest you.

  7. #7
    Join Date
    Jul 2007
    Posts
    52
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    hmmm....i have a script already made from this guy named Haxor or somthing like that...ill try to post it over here but its on a diff pc

  8. #8
    Join Date
    Jul 2007
    Posts
    52
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    CAn any one tell me the DEmon color number?

  9. #9
    Join Date
    Jul 2007
    Posts
    52
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    program HaxorNashi; //Haxor & Nashi's Uberlicious Lesser Demon Hallyer/Mager

    type
    AntiQnA = record
    Q, A: String;
    end;

    var
    LogMark, LogOutNH: Integer;
    Responder: array of AntiQnA;

    {.include SRL\SRL.scar}
    {.include SRL\SRL\skill\Magic.scar}
    {.include SRL\SRL\skill\Fighting.scar}

    {


    NOTE:
    You MUST use autocast or a halberd.


    CREDITS:
    Fawki - Uses FindFastRandoms


    }

    ////////////////////SETUP\\\\\\\\\\\\\\\\\\\\
    const
    NHMouseSpeed = 2; //Your custom mousespeed (Leave as 0 for default of 1 + random(10))
    TLogOutEvery = 10; //How often to log in and out, In minutes(Don't put higher then changeplayer time
    LesserColour = 1451874; //Colour of the demon

    procedure DeclarePlayers;
    begin
    HowManyPlayers := 4; // Set Number of Players here.
    NumberOfPlayers(HowManyPlayers);
    CurrentPlayer := 0; // CurrentPlayer = Array Index

    Players[0].Name := 'creps20'; //Your Username
    Players[0].Pass := 'shamim'; //Your Password
    Players[0].Nick := 'eve'; //3 or 4 letters from your Username
    Players[0].Active := True; //Will You Be Using This Player?
    Players[0].Integer1 := 60; //Minutes before change player
    Players[0].Integer2 := 1; //Attack style
    Players[0].Boolean1 := True; //Using magic?(False if hallying)
    Players[0].String1 := 'fire strike'; //type of spell('wind strike','water strike','earth strike' or 'fire strike')

    Writeln(IntToStr(HowManyPlayers) + ' Players');
    end; {
    \\\\\\\\\\\\\\\\\\\\SETUP//////////////////// }

    procedure LoadResponder;
    begin
    SetArrayLength(Responder, 51);
    Responder[0].Q := 'hi';
    Responder[0].A := 'hey';
    Responder[1].Q := 'hey';
    Responder[1].A := 'hey';
    Responder[2].Q := 'wats up';
    Responder[2].A := 'nm';
    Responder[3].Q := 'how are you';
    Responder[3].A := 'bored as';
    Responder[4].Q := 'bro';
    Responder[4].A := 'im not ur bro';
    Responder[5].Q := 'so bored';
    Responder[5].A := 'me to';
    Responder[6].Q := 'good morning';
    Responder[8].Q := 'woot';
    Responder[8].A := 'someones in a good mood';
    Responder[9].Q := 'i need mage exp';
    Responder[9].A := 'me to';
    Responder[10].Q := 'hmmmm';
    Responder[10].A := 'whats wrong';
    Responder[11].Q := 'not talking';
    Responder[11].A := 'i dont talk much';
    Responder[12].Q := 'i think hes a auto';
    Responder[12].A := 'who? me?';
    Responder[13].Q := 'do u autokill';
    Responder[13].A := 'no why';
    Responder[14].Q := 'songs';
    Responder[14].A := 'what songs do u like';
    Responder[15].Q := 'this is taking so long';
    Responder[15].A := 'good exp though';
    Responder[16].Q := 'this is the best training spot';
    Responder[16].A := 'i know';
    Responder[17].Q := 'whats up';
    Responder[17].A := 'nothing bored as hell';
    Responder[18].Q := 'grrr';
    Responder[18].A := 'whats wrong';
    Responder[19].Q := 'bye';
    Responder[19].A := 'bye';
    Responder[20].Q := 'cya';
    Responder[20].A := 'cya';
    Responder[21].Q := 'gtg';
    Responder[21].A := 'im gonna go in sec';
    Responder[22].Q := 'gtg';
    Responder[22].A := 'have a nice day';
    Responder[23].Q := 'got to go';
    Responder[23].A := 'what ever';
    Responder[24].Q := 'ummm';
    Responder[24].A := 'what';
    Responder[25].Q := 'pets';
    Responder[25].A := 'i have 2 pets';
    Responder[26].Q := 'want to be friends';
    Responder[26].A := 'no thank you';
    Responder[27].Q := 'can i add you to my friends list?';
    Responder[27].A := 'nah';
    Responder[28].Q := 'welcomeback';
    Responder[28].A := 'its good to be back';
    Responder[29].Q := 'this takes ages and ages';
    Responder[29].A := 'nah its quite fast';
    Responder[30].Q := 'i hate u';
    Responder[30].A := 'thats nice to know';
    Responder[31].Q := 'im glad theres a fence between me and that demon';
    Responder[31].A := 'i know';
    Responder[32].Q := 'is ur pc good';
    Responder[32].A := 'nah its laggy and slow';
    Responder[33].Q := 'this is so fun';
    Responder[33].A := 'lol it gets boring after a while';
    Responder[34].Q := 'im happy';
    Responder[34].A := 'good on u';
    Responder[35].Q := 'r u deaf';
    Responder[35].A := 'no im not';
    Responder[36].Q := 'sik dude';
    Responder[36].A := 'wats sick';
    Responder[37].Q := 'nice damage';
    Responder[37].A := 'i know';
    Responder[38].Q := 'that spell sucks';
    Responder[38].A := 'cheap and good xp though';
    Responder[39].Q := 'nice spell';
    Responder[39].A := 'thanks';
    Responder[40].Q := 'r u der dude';
    Responder[40].A := 'yes i am';
    Responder[41].Q := 'when is this gonna end';
    Responder[41].A := 'i dunno';
    Responder[42].Q := 'lol haha';
    Responder[42].A := 'wats so funny';
    Responder[43].Q := 'im gonna be a pker';
    Responder[43].A := 'same here';
    Responder[44].Q := 'im a mage pker';
    Responder[44].A := 'cool';
    Responder[45].Q := 'im turning this account into a staker';
    Responder[45].A := 'make lots of cash';
    Responder[46].Q := 'u a pker';
    Responder[46].A := 'yep';
    Responder[47].Q := 'i like pking';
    Responder[47].A := 'same here';
    Responder[48].Q := 'i own heaps of peeps in wildy';
    Responder[48].A := 'kool';
    Responder[49].Q := 'its so fun killing peeps';
    Responder[49].A := 'i know it is';
    Responder[50].Q := 'friends?';
    Responder[50].A := 'no srry, list full :/';
    end;

    function FindFastRandoms: Boolean; // By WT-Fakawi, Modded by Nashi
    var
    i: Integer;
    begin
    for I := 1 to 9 do
    begin
    case I of
    1: if FindDead then
    Result := True;
    2: if FindMod then
    Result := True;
    3: if FindMime then
    Result := True;
    4: if FindMaze then
    Result := True;
    5: if FindQuiz then
    Result := True;
    6: if FindDemon then
    Result := True;
    7: begin
    if NoGameTab then
    begin
    Result := True;
    Players[CurrentPlayer].loc := 'No GameTab';
    Logout;
    Exit;
    end;
    end;
    8: if RC then
    Result := True;
    9: if FindTalk then
    Result := True;
    end;
    Wait(1);
    end;
    end;

    procedure SetUpTehMagicz;
    begin
    if Players[CurrentPlayer].Boolean1 then
    SetUpAutoCast(Players[CurrentPlayer].String1, False)
    else
    SetFightMode(Players[CurrentPlayer].Integer2);
    end;

    procedure LogBackIn;
    begin
    if not LoggedIn then
    begin
    LogInPlayer;
    SetUpTehMagicz;
    end;
    end;

    function NoneActive: Boolean;
    var
    T: Integer;
    begin
    Result := True;
    for T := 0 to HowManyPlayers - 1 do
    if (Players[T].Active) then Result := False;
    end;

    procedure Report;
    begin
    ClearDebug;
    Writeln('<====================Nashi && Haxor====================>');
    Writeln('Worked for ' + TimeRunning);
    Writeln('<======================================== ==============>');
    SRLRandomsReport;
    end;

    procedure FinishScript(Reason: String);
    begin
    Writeln(Reason);
    Players[CurrentPlayer].Active := False;
    if NoneActive then begin
    Report;
    LogOut;
    TerminateScript;
    end;
    NextPlayer(False);
    MarkTime(LogMark);
    end;

    function NHInFight: Boolean;
    begin
    Result := (FindColor(x, y, 65280, MSX1, MSY1, MSX2, MSY2) or FindColor(x, y, 255, MSX1, MSY1, MSX2, MSY2))
    end;

    procedure NHAntiBan;
    begin
    case Random(25) of
    1: PickUpMouse;
    2: MouseBox(MSx1, MSy1, MSx2, MSy2, 3);
    3: AlmostLogout;
    4: HoverSkill('Defence', False);
    5: HoverSkill('Attack', False);
    6: MouseBox(MIx1, MIy1, MIx2, MIy2, 3);
    7: HoverSkill('Strength', False);
    8: RandomRClick;
    9: BoredHuman;
    10: GameTab(5);
    11: GameTab(6);
    12: GameTab(13);
    13: HoverSkill('Magic', False);
    14: GameTab(Random(13) + 1);
    15: Wait(100+Random(100));
    16: Wait(50+Random(100));
    17: Wait(1000+Random(100));
    19: BoredHuman;
    end;
    end;

    function FindTextInBox: Boolean;
    Begin
    Result:= False;
    if (FindColorTolerance(x, y, 16711680, 90, 415, 480, 435, 10)) and (LoggedIn) then Result:= True;
    end;

    procedure RespondPeeps;
    var
    T: Integer;
    Chat, Last, You: String;
    begin
    if not FindTextInBox then Exit;
    GetLastChatText(Chat);
    Chat := LowerCase(Chat);
    LastChatter(Last);
    Last := LowerCase(Last);
    You := LowerCase(Players[CurrentPlayer].Name);
    for T := 0 to GetArrayLength(Responder) - 1 do
    begin
    if (pos(Responder[T].Q, Chat) <> 0) and (Pos(You, Last) = 0) then begin
    TypeSend(Responder[T].A);
    end;
    end;
    end;

    procedure NHRandoms;
    begin
    LogBackIn;
    if WeAreDead then
    begin
    Deaths := Deaths + 1;
    FinishScript('Player Dead.');
    end;
    FindFastRandoms;
    RespondPeeps;
    if Random(5) = 0 then FindNormalRandoms;
    if Random(35) = 0 then NHAntiBan;
    end;

    function FindMonsterNHTol(var Mx, My: Integer; MonsterName: string; Monstercolor,
    x1, y1, x2, y2, tol: Integer): Boolean;
    var
    c: Integer;
    begin
    if (FindColorSpiralTolerance(x, y, monstercolor, x1, y1, x2, y2, tol)) then
    begin
    MMouse(x, y, 2, 3)
    if IsUpText('2 more options') then
    begin
    MMouse(x, y, 2, 3);
    Mx := x;
    My := y;
    Result := True;
    Exit;
    end;
    end
    if not Result then
    begin
    repeat
    Wait(250 + Random(500))
    c := c + 1;
    if (FindColorSpiralTolerance(x, y, monstercolor, x1, y1, x2, y2, c)) then
    begin
    MMouse(x, y, 5, 4);
    if IsUpText('2 more options') then
    begin
    Mx := x;
    My := y;
    Result := True;
    Exit;
    end;
    end;
    until Result or (c >= tol);
    end;
    if not Result then
    WriteLn('Monster NOT Found');
    end;

    function OwningTime: Boolean;
    begin
    Result := False;
    if FindMonsterNHTol(X, Y, 'Lesser demon', LesserColour, MSX1, MSY1, MSX2, MSY2, 10) then
    begin
    Mouse(X, Y, 0, 0, False);
    wait(250 + Random(500));
    if ChooseOptionEx('Attack') then
    begin
    Result := True;
    wait(500 + Random(1000));
    if FindBlackChatMessage('do not have enough') then FinishScript('Out of Runes');
    repeat
    NHRandoms;
    Wait(250 + Random(500));
    until(not NHInFight);
    end;
    end;
    end;

    procedure LogOutForAWhile;
    begin
    TypeSend('brb');
    LogOut;
    Wait(8000 + Random(10000) - Random(10000));
    LogBackIn;
    MarkTime(LogOutNH);
    end;

    procedure NHMainLoop; //MainLoop
    begin
    repeat
    SetUpTehMagicz;
    MarkTime(LogMark);
    MarkTime(LogOutNH);
    repeat
    if not OwningTime then NHRandoms;
    if TimeFromMark(LogOutNH) >= (TLogOutEvery * 60000) then LogOutForAWhile;
    until((TimeFromMark(LogMark) >= (Players[CurrentPlayer].Integer1 * 60000)) or (not LoggedIn));
    Report;
    NextPlayer(True);
    until(IsFKeyDown(2));
    end;

    begin
    SetUpSRL;
    DeclarePlayers;
    MouseSpeed := 1 + Random(10);
    if NHMouseSpeed > 0 then MouseSpeed := NHMouseSpeed;
    if not LoggedIn then LogInPlayer;
    LoadResponder;
    NHMainLoop; //It's just of my own preference to have the main loop in another procedure
    end.

  10. #10
    Join Date
    Jul 2007
    Posts
    52
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    lol this thing is long...im new person who oined using scripts i downloaded this in to my other c from another post posted by its origanal maker ...so the credit goes to the person who made this i tried to find that post but turned up nothin...i need help to make this script better ...so can u guys fix the errors please thank you...mail me at ahmad.gull@hotmail.com

  11. #11
    Join Date
    Oct 2006
    Location
    Ireland
    Posts
    855
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    If you want magic training why not just use LAME?

    Edit: I changed your password.. you left it in the script. Ill send you a pm now with your new one.

  12. #12
    Join Date
    Sep 2007
    Location
    Australia, NSW
    Posts
    934
    Mentioned
    6 Post(s)
    Quoted
    145 Post(s)

    Default

    Iv made a Lesser Demon killer which is compatible with mages and rangers, has anti-randoms, world-switcher, and heaps more. The current version is 1.4, the next version will have rune med telegraber and auto-reponder. Click the link in my sig to have a look at it!

    -daazndagger-

    INACTIVE
    How-to: Make S.M.A.R.T. less laggy

    Sell me your Maple Shieldbows (u)! Up to 95gp ea!

    My Scripts:
    Ivy Chopper Ultra [RS3] | Fantastic Fletcher [RS3]
    99 x78 | 99 x10 | 99 x2 | 99 x12


    Use the REPORT tags when posting progress reports to make life easier (:
    [REPORT]Put progress report in here![/REPORT]

    Super Savvy Smither V1.06Cool Classy Cooker V1.02 [EoC]

  13. #13
    Join Date
    Apr 2007
    Posts
    994
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    07-27-2007, 03:20 AM

    O.o
    [QUOTE]<GoF`> oh no its Raymooond
    <Raymooond> Heya
    <GoF`> is it ray or some other ray?
    <LeeLokHin> No idea
    <LeeLokHin> Raymond, what's the game you like the most?
    <Raymooond> Runescape
    <-- LeeLokHin has kicked Raymooond from #srl (Faker.)[/QUOTE]

  14. #14
    Join Date
    Aug 2007
    Location
    England
    Posts
    136
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Hey,

    Check Out My Tower Trainer

    Tvs Tower Trainer v1.0

    Yours Tv.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Wizzy Tower Lesser Demon Killer for MAGES!
    By Press Play in forum RS3 Outdated / Broken Scripts
    Replies: 16
    Last Post: 08-02-2008, 08:08 AM
  2. Need Srl wizzy tower demon mager with anti randoms
    By aragorn0021 in forum RS3 Outdated / Broken Scripts
    Replies: 13
    Last Post: 06-10-2008, 11:17 AM
  3. Kevin Wolf and Haxor's Mage Tower Demon Killer
    By Haxor in forum RS3 Outdated / Broken Scripts
    Replies: 17
    Last Post: 07-23-2007, 11:57 PM
  4. wizard tower bridge radialwalking??
    By RudeBoiAlex in forum OSR Help
    Replies: 2
    Last Post: 06-13-2007, 05:27 PM
  5. wizard tower
    By Dark_Sniper in forum RS has been updated.
    Replies: 2
    Last Post: 09-17-2006, 04:33 AM

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •