Results 1 to 10 of 10

Thread: Procedure Problem

  1. #1
    Join Date
    Dec 2006
    Posts
    173
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Procedure Problem

    Well, in my Macho Chopper, I am making a light logs option. Whenever I try to run it to see if it compiles I get an error saying, Line 331: [Error] (15109:1): Identifier expected. So if you could help me fix it, I would really apprieciate it. Also you can post comments about the procedure and how I can improve it.

    Var
    RX, RY: Integer;

    procedure LightTheLogs;
    begin
    If( LightDaLogs = False) then
    Exit;
    repeat
    If ( Not (LoggedIn) ) Then NextPlayer (False)
    If(FindDTM(TBox, RX, RY, MIX1, MIY1, MIX2, MIY2)) then
    begin
    Mouse(RX, RY,4,4,true);
    wait(100+random(100));
    If(FindDTM(RLog, RX, RY, MIX1, MIY1, MIX2, MIY2)) then
    begin
    Mouse(RX,RY,5,5,true);
    Wait(10+random(10));
    end;
    Until(FindDTM(RLog, RX, RY, MIX1, MIY1, MIX2, MIY2)) = false
    BurntLogs = BurntLogs + 1;
    end;
    end;

    Also Check out my thread in the first script section called " My first script: Macho Chopper V2.1"!!!!!!!!!
    Starting to merchant, if you know of any good clans, PM me please.

  2. #2
    Join Date
    Dec 2006
    Location
    Birmingham/UK
    Posts
    105
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    try running the script without that procedure to make sure it is that procedure which is rong in the script then follow the procedure through on its own and see which errors u get step by step till u finish it maybe that could help finding the part in it which dont work =/ then look up the error sumwhere because im not very good with scripting im only just learning i no bitmaps i havnt done dtm's
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your sig<BR>
    http://www.draynor.net/skill/underse...dvance_war.png

  3. #3
    Join Date
    Dec 2006
    Location
    Third rock from the sun.
    Posts
    2,510
    Mentioned
    4 Post(s)
    Quoted
    1 Post(s)

    Default

    Assuming this:

    SCAR Code:
    BurntLogs = BurntLogs + 1;

    Is around line 331 (Usually one above the line given.), this would be the fix:

    SCAR Code:
    BurntLogs := BurntLogs + 1;

  4. #4
    Join Date
    Dec 2006
    Location
    Birmingham/UK
    Posts
    105
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    he has sharp eyes =] i spose tht would be the error i h8 mistakes like tht every1 makes them lol typos fuck scripts up bigtime i think they stress me ot for sure
    If I see you autoing with level 3/default clothes/crap name I WILL report you. Auto Correctly. - put this in your sig<BR>
    http://www.draynor.net/skill/underse...dvance_war.png

  5. #5
    Join Date
    Dec 2006
    Posts
    173
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Hmmmm. Thanks for the posts but I tried it with the fix and it had the same error message. I look at one of JAD's tutorials and it said it had to do with something about each begin needing an end and each repeat needing an until.

    Anyone else have an idea of how to fix this?
    Starting to merchant, if you know of any good clans, PM me please.

  6. #6
    Join Date
    Nov 2006
    Location
    NSW, Australia
    Posts
    3,487
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Yep, give me a second to look through

    Post, the whole script eh?
    [CENTER][img]http://signatures.mylivesignature.com/54486/113/4539C8FAAF3EAB109A3CC1811EF0941B.png[/img][/CENTER]
    [CENTER][BANANA]TSN ~ Vacation! ~ says :I Love Santy[/BANANA][/CENTER]

    [CENTER][BANANA]Raymond - Oh rilie? says :Your smart[/BANANA][/CENTER]

  7. #7
    Join Date
    May 2006
    Posts
    1,230
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    procedure LightTheLogs;
    begin
      If(LightDaLogs = False) then
        Exit;
      repeat
        If ( Not (LoggedIn) ) Then NextPlayer (False)
        If(FindDTM(TBox, RX, RY, MIX1, MIY1, MIX2, MIY2)) then
        begin
          Mouse(RX, RY,4,4,true);
          wait(100+random(100));
          If(FindDTM(RLog, RX, RY, MIX1, MIY1, MIX2, MIY2)) then
          begin
            Mouse(RX,RY,5,5,true);
            Wait(10+random(10));
          end;
        end;
      Until(not FindDTM(RLog, RX, RY, MIX1, MIY1, MIX2, MIY2))
      BurntLogs := BurntLogs + 1;
    end;

    also you may want to change the DTM named TBox to something else, TBox is a variable name in SCAR

    and for

    SCAR Code:
    If ( Not (LoggedIn) ) Then NextPlayer (False)
    you shouldn't have players exit while in the middle of your script, and this is in a loop! very
    bad, it should just be
    SCAR Code:
    If ( Not (LoggedIn) ) Then Exit;

    EDIT: Santa, your fat belly full of milk and cookies is slowing you down :P Your too late now xD

  8. #8
    Join Date
    Nov 2006
    Location
    NSW, Australia
    Posts
    3,487
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    Forget it, RS_Monkey owns
    [CENTER][img]http://signatures.mylivesignature.com/54486/113/4539C8FAAF3EAB109A3CC1811EF0941B.png[/img][/CENTER]
    [CENTER][BANANA]TSN ~ Vacation! ~ says :I Love Santy[/BANANA][/CENTER]

    [CENTER][BANANA]Raymond - Oh rilie? says :Your smart[/BANANA][/CENTER]

  9. #9
    Join Date
    May 2006
    Posts
    1,230
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by SantaClause View Post
    Forget it, RS_Monkey owns
    rofl, I'll take that as a compliment, and I already was working on the problem, but I was too lazy to refresh the page Didn't see your post until after i posted.

  10. #10
    Join Date
    Dec 2006
    Posts
    173
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Thank you for the help, The RS Monkey! This really helped me. Also SantaClause I appreciate your effort in trying to help me. Now I am onto updating my script!
    Starting to merchant, if you know of any good clans, PM me please.

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Procedure TypeSendRandom & Procedure AutoResponder!
    By Ultra in forum Research & Development Lounge
    Replies: 12
    Last Post: 01-08-2008, 07:04 PM
  2. Procedure lagging problem
    By Macho Man67 in forum OSR Help
    Replies: 4
    Last Post: 07-30-2007, 01:28 AM
  3. Replies: 8
    Last Post: 05-24-2007, 11:57 PM
  4. Replies: 4
    Last Post: 05-09-2007, 11:19 AM
  5. Procedure that calls random procedure?
    By Secet in forum OSR Help
    Replies: 2
    Last Post: 03-03-2007, 03:56 PM

Posting Permissions

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