Results 1 to 5 of 5

Thread: This makes no sence!

  1. #1
    Join Date
    Mar 2006
    Posts
    13,241
    Mentioned
    228 Post(s)
    Quoted
    267 Post(s)

    Default This makes no sence!

    ok I've been over it again and again it works perfect for me except the repeat! I set up the repeat up exactly like I did for the script for king of buttons 1 but it will only press space like 1-4 times before moving on to next procedure...I dont know if it has to do with the script pressing space rather then clicking...so if u can figure out it will be a great help.

    oh also some of the wait times are greater then they will be in the end..for testing purposes.

    Code:
    //Hobbit's King of Buttons 2 P0wn3r
    //Made by Hobbit
    //==Set-up==
    //Go to http://www.ugoplayer.com/games/kingofbuttons2.html
    //Silent Mouse MUST be OFF!
    //Set lines 28 & 71
    //Click and drag Cross-hairs on to screen          ^^^
    //Start at game options screen
    //******************************************************************************
    //*****************************COMING SOON**************************************
    //**************Soon I will make a Script for King of Buttons 3*****************
    //******************************************************************************
    program KingofButtons2Powner;
    {.include SRL/SRl.scar}
    
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    var
    click : integer;
    play : integer;
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    const
    //----------------------------------------------------------------------------\\
    //                            Time
    //----------------------------------------------------------------------------\\
    wait_time=1;//in miliseconds
    //----------------------------------------------------------------------------\\
    //                            Amount
    //----------------------------------------------------------------------------\\
    amount=500;//amount you want it to press space
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\Begin//\\//\\//\\//\\//\\//\\//\\//\\//\\//\
    
    procedure Gametype;
     begin
      Holdmouse(183,218,true);
      Wait(wait_time);
      ReleaseMouse(183,218,true);
      end;
      
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure LoadBmps;
     begin;
     
      play := BitmapFromString(211,369, 'z78DAEDD94192C2201005D02' +
           'BC56899716DC9FD8F34CECEA59304BA81F75D4BDAE64928581611' +
           '11113933A549DAD7F68FC7DC22BB54AF0FB12347496BD98723DDC' +
           '8296D5F0DA47D5F3369B55590465A4E69F9F769FBEA9F415AD43B' +
           'B47D5749232DBFB49CDD38575A59CBE5FD995E5AECBF750A69294' +
           'F818E8F3FA7B4B3BA411A69F348DBF7DDD4D2EEE5562EA49156BB' +
           'B719DE0EA49D25ADB637D248238DB491A47D8EDFE399E4D8D28E3' +
           'FB7BAB4C77BAFBE92465A9B9AF39CBD90465AAC31F79E63DCFB90' +
           '465ABF2B1B69A4D59EC7A55A82913DCA56AEA49116B59AC54A8B5' +
           'D9963677328693FE5FEDD8D2D694D6773FBBB4BEF575AB61318D2' +
           'DAAF666ACB292D6AB7461A69B1F59396795FDDE3AE8334D2481BA' +
           'FB6B2BE9EAF8D34D27ABCAD268DB4CCD2DAFF0AD248238D34D248' +
           'DB577F8D6E90461A69A4F5252DDBEC9396595AED3E90465A6669F' +
           'BFA4C1A69A49146DA222222222283E61715C4E69D');
      end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Spacing;
     begin
      SendKeys(' ');
      click:= click + 1
      end;
      
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Typing;
     begin
      HoldMouse(476,312,true);
      Wait(25);
      MoveMouseSmooth(200,314);
      Wait(15);
      ReleaseMouse(200,314,true);
      Wait(100);
      SendKeys('Name');
      Wait(180);
      end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Submit;
     begin
      HoldMouse(344,391,true);
      Wait(wait_time);
      ReleaseMouse(344,391,true);
      Wait(30);
      MoveMouseSmooth(336,359);
      Wait(40);
      HoldMouse(336,359,true);
      Wait(wait_time);
      ReleaseMouse(336,359,true);
      end;
     
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Report;
     begin
      Writeln('//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\');
      Writeln('Thank you for Useing Hobbit''s King of Buttons 2 P0n3r');
      Writeln('You have pressed space '+IntToStr(click)+' times');
      Writeln('You have also entered you name into the Highscores...');
      Writeln('But if you wanted to be top 10...lets hope you set it for');
      Writeln('2147483648 times');
      Writeln('//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\');
      end;
      
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    begin
     setupsrl;
     Gametype;
     Wait(800);
     LoadBmps;
      begin
       MoveMouse(211+random(10),369+random(20));
       ClickMouse(211+random(10),369+random(20),true);
       end;
     Wait(20);
     Typing;
     repeat
     Spacing;
     until(click=amount)
     Wait(1000);
     Submit;
     Report;
     end.
    STOP PM'ING ME

  2. #2
    Join Date
    Oct 2006
    Location
    England
    Posts
    154
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I can't see a repeat in the script.

  3. #3
    Join Date
    Feb 2006
    Posts
    433
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Your space poking is too fast for the game to respond to. I added a PokeSpace procedure that presses space with a wait inbetween letting it back up. I also added a wait in your Spacing procedure. .

    Edit: Rofl, I like how he starts talking about how his amazing idea of having space press the button will make autoing impossible. Owned.

    Code:
    //Hobbit's King of Buttons 2 P0wn3r
    //Made by Hobbit
    //==Set-up==
    //Go to http://www.ugoplayer.com/games/kingofbuttons2.html
    //Silent Mouse MUST be OFF!
    //Set lines 28 & 71
    //Click and drag Cross-hairs on to screen          ^^^
    //Start at game options screen
    //******************************************************************************
    //*****************************COMING SOON**************************************
    //**************Soon I will make a Script for King of Buttons 3*****************
    //******************************************************************************
    program KingofButtons2Powner;
    
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    var
      click : integer;
      play : integer;
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    const
    //----------------------------------------------------------------------------\\
    //                            Time
    //----------------------------------------------------------------------------\\
      wait_time=1;//in miliseconds
    //----------------------------------------------------------------------------\\
    //                            Amount
    //----------------------------------------------------------------------------\\
      amount=500;//amount you want it to press space
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\Begin//\\//\\//\\//\\//\\//\\//\\//\\//\\//\
    
    procedure PokeSpace;
    begin
     KeyDown(32);
      Wait(50);
     KeyUp(32);
    end;
    
    procedure Gametype;
    begin
      Holdmouse(183,218,true);
      Wait(wait_time);
      ReleaseMouse(183,218,true);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure LoadBmps;
    begin;
    
      play := BitmapFromString(211,369, 'z78DAEDD94192C2201005D02' +
           'BC56899716DC9FD8F34CECEA59304BA81F75D4BDAE64928581611' +
           '11113933A549DAD7F68FC7DC22BB54AF0FB12347496BD98723DDC' +
           '8296D5F0DA47D5F3369B55590465A4E69F9F769FBEA9F415AD43B' +
           'B47D5749232DBFB49CDD38575A59CBE5FD995E5AECBF750A69294' +
           'F818E8F3FA7B4B3BA411A69F348DBF7DDD4D2EEE5562EA49156BB' +
           'B719DE0EA49D25ADB637D248238DB491A47D8EDFE399E4D8D28E3' +
           'FB7BAB4C77BAFBE92465A9B9AF39CBD90465AAC31F79E63DCFB90' +
           '465ABF2B1B69A4D59EC7A55A82913DCA56AEA49116B59AC54A8B5' +
           'D9963677328693FE5FEDD8D2D694D6773FBBB4BEF575AB61318D2' +
           'DAAF666ACB292D6AB7461A69B1F59396795FDDE3AE8334D2481BA' +
           'FB6B2BE9EAF8D34D27ABCAD268DB4CCD2DAFF0AD248238D34D248' +
           'DB577F8D6E90461A69A4F5252DDBEC9396595AED3E90465A6669F' +
           'BFA4C1A69A49146DA222222222283E61715C4E69D');
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Spacing;
    begin
      PokeSpace;
      click:= click + 1;
      Wait(100);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Typing;
     begin
      HoldMouse(476,312,true);
      Wait(25);
      MoveMouseSmooth(200,314);
      Wait(15);
      ReleaseMouse(200,314,true);
      Wait(100);
      SendKeys('Name');
      Wait(180);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Submit;
    begin
      HoldMouse(344,391,true);
      Wait(wait_time);
      ReleaseMouse(344,391,true);
      Wait(30);
      MoveMouseSmooth(336,359);
      Wait(40);
      HoldMouse(336,359,true);
      Wait(wait_time);
      ReleaseMouse(336,359,true);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Report;
    begin
      Writeln('//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\');
      Writeln('Thank you for Useing Hobbit''s King of Buttons 2 P0n3r');
      Writeln('You have pressed space '+IntToStr(click)+' times');
      Writeln('You have also entered you name into the Highscores...');
      Writeln('But if you wanted to be top 10...lets hope you set it for');
      Writeln('2147483648 times');
      Writeln('//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\');
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    begin
     Gametype;
     Wait(800);
     LoadBmps;
      begin
       MoveMouse(211+random(10),369+random(20));
       ClickMouse(211+random(10),369+random(20),true);
      end;
     Wait(20);
     Typing;
      repeat
       Spacing;
      until(click = amount)
     Wait(1000);
     Submit;
     Report;
    end.

  4. #4
    Join Date
    Mar 2006
    Posts
    13,241
    Mentioned
    228 Post(s)
    Quoted
    267 Post(s)

    Default

    Repeat is here..(in red)
    begin
    setupsrl;
    Gametype;
    Wait(800);
    LoadBmps;
    begin
    MoveMouse(211+random(10),369+random(20));
    ClickMouse(211+random(10),369+random(20),true);
    end;
    Wait(20);
    Typing;
    repeat
    Spacing;
    until(click=amount)
    Wait(1000);
    Submit;
    Report;
    end.

    ok thanks alot...lol i know i like how he says that to...thast the main reason i wrote 1 for it
    STOP PM'ING ME

  5. #5
    Join Date
    Mar 2006
    Posts
    13,241
    Mentioned
    228 Post(s)
    Quoted
    267 Post(s)

    Default

    ok it works!!! muahaha its perfect I ran it 12 times no errors....and Spky it was still skipping a few clicks so i added 5 miliseconds to ur poke procedure...also I fixed the highscores typer...last night after the post i had made some changes to fix some bugs...so i added them into the new script also i've made the sert-up mroe user freindly
    Code:
    //Hobbit's King of Buttons 2 P0wn3r
    //Made by Hobbit
    //Many thanks to Spky for showing me I needed to slow down the space timing
    //==Set-up==
    //Go to http://www.ugoplayer.com/games/kingofbuttons2.html
    //Silent Mouse MUST be OFF!
    //Set lines 27 & 35
    //Click and drag Cross-hairs on to screen          ^^^
    //Start at game options screen
    //******************************************************************************
    //*****************************COMING SOON**************************************
    //**************Soon I will make a Script for King of Buttons 3*****************
    //******************************************************************************
    program KingofButtons2Powner;
    {.include SRL/SRL.scar}
    
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    var
      click : integer;
      play : integer;
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    const
    //----------------------------------------------------------------------------\\
    //                            Name
    //----------------------------------------------------------------------------\\
      who='name';
    //----------------------------------------------------------------------------\\
    //                            Time
    //----------------------------------------------------------------------------\\
      wait_time=1;//in miliseconds
    //----------------------------------------------------------------------------\\
    //                            Amount
    //----------------------------------------------------------------------------\\
      amount=100;//amount you want it to press space
    //----------------------------------------------------------------------------\\
    //****************************************************************************\\
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\Begin//\\//\\//\\//\\//\\//\\//\\//\\//\\//\
    
    procedure PokeSpace;
    begin
     KeyDown(32);
      Wait(55);
     KeyUp(32);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Gametype;
    begin
      Holdmouse(183,218,true);
       Wait(wait_time);
      ReleaseMouse(183,218,true);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure LoadBmps;
    begin;
    
      play := BitmapFromString(211,369, 'z78DAEDD94192C2201005D02' +
           'BC56899716DC9FD8F34CECEA59304BA81F75D4BDAE64928581611' +
           '11113933A549DAD7F68FC7DC22BB54AF0FB12347496BD98723DDC' +
           '8296D5F0DA47D5F3369B55590465A4E69F9F769FBEA9F415AD43B' +
           'B47D5749232DBFB49CDD38575A59CBE5FD995E5AECBF750A69294' +
           'F818E8F3FA7B4B3BA411A69F348DBF7DDD4D2EEE5562EA49156BB' +
           'B719DE0EA49D25ADB637D248238DB491A47D8EDFE399E4D8D28E3' +
           'FB7BAB4C77BAFBE92465A9B9AF39CBD90465AAC31F79E63DCFB90' +
           '465ABF2B1B69A4D59EC7A55A82913DCA56AEA49116B59AC54A8B5' +
           'D9963677328693FE5FEDD8D2D694D6773FBBB4BEF575AB61318D2' +
           'DAAF666ACB292D6AB7461A69B1F59396795FDDE3AE8334D2481BA' +
           'FB6B2BE9EAF8D34D27ABCAD268DB4CCD2DAFF0AD248238D34D248' +
           'DB577F8D6E90461A69A4F5252DDBEC9396595AED3E90465A6669F' +
           'BFA4C1A69A49146DA222222222283E61715C4E69D');
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Spacing;
    begin
      PokeSpace;
      click:= click + 1;
       Wait(100);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Typing;
     begin
      HoldMouse(440,315,true);
       Wait(25);
      MoveMouseSmooth(223,318);
       Wait(15);
      ReleaseMouse(223,318,true);
       Wait(100);
      SendKeys(who);
       Wait(180);
      HoldMouse(330,274,true);
       Wait(wait_time);
      ReleaseMouse(330,274,true);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Submit;
    begin
      HoldMouse(344,391,true);
       Wait(wait_time);
      ReleaseMouse(344,391,true);
       Wait(30);
      MoveMouseSmooth(336,359);
       Wait(40);
      HoldMouse(336,359,true);
       Wait(wait_time);
      ReleaseMouse(336,359,true);
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    procedure Report;
    begin
      Writeln('//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\');
      Writeln('Thank you for Useing Hobbit''s King of Buttons 2 P0wn3r');
      Writeln('You have pressed space '+IntToStr(click)+' times');
      Writeln('You have also entered you name into the Highscores...');
      Writeln('But if you wanted to be top 10...lets hope you set it for');
      Writeln('2147483648 times');
      Writeln('//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\-//-\\');
    end;
    
    //\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\//\\
    
    begin
     Gametype;
      Wait(800);
     LoadBmps;
       begin
        MoveMouse(211+random(10),369+random(20));
        ClickMouse(211+random(10),369+random(20),true);
       end;
      Wait(20);
     Typing;
       repeat
        Spacing;
       until(click = amount)
      Wait(1000);
     Submit;
     Report;
    end.
    STOP PM'ING ME

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Common Sence Fail!
    By infested999 in forum NOTA
    Replies: 10
    Last Post: 03-04-2009, 09:07 AM
  2. Lol...common sence anyone...?
    By Hobbit in forum Misc. Links and Programs
    Replies: 6
    Last Post: 08-15-2007, 06:41 PM
  3. makes me mad
    By jhildy in forum SRL Site Discussion
    Replies: 3
    Last Post: 05-22-2007, 12:27 AM
  4. once again...an error that dont make sence...
    By Hobbit in forum OSR Help
    Replies: 4
    Last Post: 01-21-2007, 12:48 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
  •