Results 1 to 7 of 7

Thread: Help My Script Dont Work! HELP.

  1. #1
    Join Date
    Mar 2007
    Location
    In your computer
    Posts
    244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Help My Script Dont Work! HELP.

    Hello, i was making a club penguin script , i fixed errors and stuff but now when i test it doesnt:

    Press enter.

    i marked where it doesnt press enter, so can somone fix it for me plz???

    SCAR Code:
    Program PiePenguin;
    {.include SRL/SRL.scar}
    {*******************************************************************************
    Version 1.0 Beta!
    *******************************************************************************}

    ////////////////////////////////////////////////////////////////////////////////
    //Description: A Club Penguin Coins Getter.
    //Starting Place: Up The Stairs In The Night Club.
    //Need To Run: Brains.
    //What Does: Gets Coins.
    ////////////////////////////////////////////////////////////////////////////////
    //Instructions: Start At The Starting Place Set Up Const Drag The Thing Into The
    //Instructions: Club Penguin Window, Then Hit Run.
    ////////////////////////////////////////////////////////////////////////////////
    //Features: Gets Coins, Clicks Mouse, Uses The Space Bar And The Arrow Keys To
    //Features: Move And Shoot (In Game 2).
    //Features: Fast Club Penguin Money.
    //Features: The Games Are Still Beta.
    //Features: Thin Ice - Solves 1 Level. BETA - Later Will Solve More Levels!
    //Features: Astro-Barrier - Currently Doesnt Solve Level 1. BETA - Will Try To Solve!
    ////////////////////////////////////////////////////////////////////////////////
    Const
    Game = 2;//Game 1 = Thin Ice. Game 2 = Astro-Barrier.
    TimesToDo = 5;//How Many Times You Want To Play The Game.


    Var
    DidTimes, ABDidTimes: Integer;
    CoinsTI, MoneyAB: Integer;

    Procedure ThinIce;
    Begin
    If(Game = 1)Then
    Begin
    ClickMouse(310,172,true);
    Wait(5000+random(200));
    ClickMouse(325,251,true);
    Wait(6000);
    ClickMouse(372,396,true);
    Wait(2000);
    ClickMouse(202,395,true);
    Wait(1000);
    SendArrowWait(3, 4000);
    ClickMouse(678,37,true);
    Wait(2000);
    ClickMouse(384,291,true);
    Wait(8000);
    DidTimes:=DidTimes + 1;
    CoinsTI:=CoinsTI + 4;
    End;
    End;


    Procedure Astro;
    Begin
    If(Game = 2)Then
    Begin
    ClickMouse(508,173,true);
    Wait(3000);
    ClickMouse(322,253,true);
    Wait(8000);
    ClickMouse(381,351,true);
    Wait(2000);
    SendKeys(Chr(13)); //DOESNT PRESS ENTER
    Wait(2000);
    SendArrowWait(3, 3000);
    Wait(400);
    SendKeys(Chr(32));
    Wait(2000);
    SendKeys(Chr(32));
    Wait(3000);
    SendKeys(Chr(32));
    Wait(2000);
    SendKeys(Chr(32));
    Wait(1000);
    ClickMouse(730,30,true);
    Wait(2000);
    ClickMouse(381,294,true);
    Wait(8000);
    ABDidTimes:=ABDidTimes + 1;
    MoneyAB:=MoneyAB + 3;
    End;
    End;


    Procedure Report;
    Begin
    ClearDebug;
    WriteLn('PiePenguin Progress Report');
    WriteLn('Current Version: 1.0 Beta!');
    WriteLn('Did Thin Ice: ' + IntToStr(DidTimes) + ' Times');
    WriteLn('Got Coins In Thin Ice: ' + IntToStr(CoinsTI) + ' Coins');
    WriteLn('Did Astro-Barrier: ' + IntToStr(ABDidTimes) + ' Times');
    WriteLn('Got Coins In Astro-Barrier Approx.: ' + IntToStr(MoneyAB) + '');
    End;


    Begin
    Repeat
    ThinIce;
    Astro;
    Report;
    Until(DidTimes = TimesToDo);
    End.

    -Thanks, Pie.
    Even If You Are On Your Way, You Will Get Run Over If You Just Sit There.
    -ILikePie1995.

    My Best Script I Yet Made, Go Check It Out, Its In The Fighting Section. Look For UndeadKiller!

    GET FREE CASH!!!READ ALL ABOUT IT!!!
    http://www.AdPaid.com/ptr/pages/join...d=ilikepie1995

    JOIN AdPaid.Com NOW!!!ITS OWNAGE!!!
    http://www.AdPaid.com/ptr/pages/conf...d=ilikepie1995

  2. #2
    Join Date
    Aug 2007
    Posts
    429
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    SCAR Code:
    SendKeys(Chr(13));  //is enter
    SendKeys(Chr(32));  //is space
    SendArrowWait(3, 4000);  //should work for arrows if SendArrowSilentWait doesn't work

  3. #3
    Join Date
    Mar 2007
    Location
    In your computer
    Posts
    244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Kk thanks iam gonna test now.
    Even If You Are On Your Way, You Will Get Run Over If You Just Sit There.
    -ILikePie1995.

    My Best Script I Yet Made, Go Check It Out, Its In The Fighting Section. Look For UndeadKiller!

    GET FREE CASH!!!READ ALL ABOUT IT!!!
    http://www.AdPaid.com/ptr/pages/join...d=ilikepie1995

    JOIN AdPaid.Com NOW!!!ITS OWNAGE!!!
    http://www.AdPaid.com/ptr/pages/conf...d=ilikepie1995

  4. #4
    Join Date
    Mar 2007
    Location
    In your computer
    Posts
    244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I updated it, now it doesnt press enter. help?
    Even If You Are On Your Way, You Will Get Run Over If You Just Sit There.
    -ILikePie1995.

    My Best Script I Yet Made, Go Check It Out, Its In The Fighting Section. Look For UndeadKiller!

    GET FREE CASH!!!READ ALL ABOUT IT!!!
    http://www.AdPaid.com/ptr/pages/join...d=ilikepie1995

    JOIN AdPaid.Com NOW!!!ITS OWNAGE!!!
    http://www.AdPaid.com/ptr/pages/conf...d=ilikepie1995

  5. #5
    Join Date
    Aug 2007
    Posts
    429
    Mentioned
    0 Post(s)
    Quoted
    2 Post(s)

    Default

    well where you have

    SCAR Code:
    SendKeys(Chr(32)); // DOESN'T PRESS ENTER.

    chr(32) is space..
    so how would it press enter anyways

  6. #6
    Join Date
    Jan 2007
    Location
    Skaville, Jamaica
    Posts
    1,117
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    TypeSend('MESSAGEHERE');

    No chr necessary.

  7. #7
    Join Date
    Mar 2007
    Location
    In your computer
    Posts
    244
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    well where you have


    ScarScript: By Drunkenoldma
    SendKeys(Chr(32)); // DOESN'T PRESS ENTER.
    chr(32) is space..
    so how would it press enter anyways
    Sorry put it in wrong place, fixed now.Well it doesnt Press enter...

    TypeSend('MESSAGEHERE');
    kk i will try that tommorow, lets hope the script will be released tommorrow.
    Even If You Are On Your Way, You Will Get Run Over If You Just Sit There.
    -ILikePie1995.

    My Best Script I Yet Made, Go Check It Out, Its In The Fighting Section. Look For UndeadKiller!

    GET FREE CASH!!!READ ALL ABOUT IT!!!
    http://www.AdPaid.com/ptr/pages/join...d=ilikepie1995

    JOIN AdPaid.Com NOW!!!ITS OWNAGE!!!
    http://www.AdPaid.com/ptr/pages/conf...d=ilikepie1995

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Why dont any scripts work for me?
    By wadeal in forum OSR Help
    Replies: 7
    Last Post: 07-25-2007, 04:55 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
  •