Results 1 to 6 of 6

Thread: Identifier Expected

  1. #1
    Join Date
    Apr 2007
    Location
    Finland
    Posts
    938
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Identifier Expected

    Okay this got me freaky, the begins and ends are ok but still Identifier Expected on line 9!! (Without counting SRL lines)
    Or is it just may eyes can't they spot the error.

    I didn't even do anything yet just installed BMPs, aww
    SCAR Code:
    Program PwnzorChopper;

    {.include SRL/SRL.scar}

    var
      MouseCoordX, MouseCoordY : Integer;

    var
      99NT, 99NT2, 88NT : Integer; //ERROR HERE! What...?

    var
      88NT2, 33NT, 33NT2, 33NT3, 22NT, 22NT2 : Integer;

    var
      1010DT, 77DT : Integer;
     
    Procedure CheckAxe;
    begin
      MouseCoordX := 586;
      MouseCoordY := 290;
      Wait(250+random(50));
      Gametab(5);
      Wait(100+random(50));
      MMouse(MouseCoordX, MouseCoordY, 10, 10);
      Wait(350+random(150));
      if (IsUpText('axe')) then
        Writeln('Axe Found')
      else
        Writeln('No Axe Found')                              //ANTI-RANDOMS
      Wait(100+random(200));
      Gametab(4);
      Wait(100+random(200));
    end;

    Procedure BitMaps1;
    begin
      Wait(2);
      99NT := BitmapFromString(9, 9, 'z78DA4D515B12C32' +
           '008BCD20A28F43335E9FD8FD405924E27E34EC47D800A24C0A518' +
           '5B4343F60A875C8D163346A16C83912541BE6B18B0BB7EABB0822' +
           'A381EFEC484BEA94A1F6A65151EAD4D1C579D7EC8878647846D47' +
           'C05CB9273FD3D79392FCC4CC729E671D5C99DBBDA5CF3812E5CA8' +
           '99E0E3BE53711E43024935AA8B2CF3F2D7D96C3432FA99BC9B92A' +
           '8B89933BF1CE6A557E63016C1AE579ABFABFDD7A8A9C8889AD62B' +
           'DD243A5111834297FA103F0AA1739EA6EA37A989D9B5A9CBC2BD8' +
           'D9AA9AD1BAC33C47BD85594FDD952FA8BD64EE');
      Wait(2);
      99NT2 := BitmapFromString(9, 9, 'z78DA6D50C90DC3' +
           '300C5B89946C477E266EBAFF48D5E1147D14010C42A178484D174' +
           'F59DA48851A67E2E91842CDBFF9BE1B9A896E6C1D72AB3508726B' +
           '1004466CF16EE8E0E8E8E69CD0917A6BABDB809E0231CCD0640BC' +
           'CD835991BFF283B364F68AE7CD26840AA1DE5A5086678A94672BC' +
           'A4B942EF18C1CAADF22AE5AF97E7E1F24FC28B94258BB7EB44367' +
           '3CEF5B8EC24EE553A3579747E737AFEAB98D1D155F3267F98D934' +
           '3BB69C6CC76C7700A88E16EDF605FC9E75D5BA6126395367142E8' +
           '5EC1B93F0F58920B6647E00B45A6322');
      Wait(2);
      88NT := BitmapFromString(8, 8, 'z78DA4D50C911032' +
           '10C6B493E30CA7393A1FF96E2233BD98F01C996640C060983512E' +
           'A102A8BB86D1A1EE5CC956D528561275568733A7989DF54AB64EB' +
           '98AD55888C21A590CE84E05EA2EFC46667694C7BD7D5FFF1E6B35' +
           'EC40D0D62081455F2B6BB2A929B1B8814EA557CDEAA7BD3E810D3' +
           '99BA43722C75301BB1D4FF6679D0CAD8651FBE5A9EDEE0C0F6476' +
           'BF91CEFFD837AA46641E3D55ED3DBEF53FE0A472E47F9E542EB56' +
           '6BF61CF4F8D');
      Wait(2);
    end;

    Procedure BitMaps2;
    begin
      Wait(2);
      88NT2 := BitmapFromString(8, 8, 'z78DA5D5051AE04' +
           '2108BB520BE8E0E7AC99BDFF915EC1C9FBD898985A0AB47A062C1' +
           'C9EBC2347DAC53440EF48DC02295CD5470CF85495D24DB80F4CF0' +
           '7688FF1CDED2C5BC5DD26307226D15B6AF309CDD7BB572D68DF5D' +
           '3252787693C675E192C6F9CEF1698BC1D9F07AB0A7B6A17EF8999' +
           '3EFCE44AFF9F6672C74FB935949E955A1E02A39C680E6731663D7' +
           '3F5FC55D96D0D8C747F7B3B517529573347D3FFE3BD8BDC3AA68D' +
           '9BD9BFA7AA6F82DB82ECD48F6D29F30FFA2E4E5E');
      Wait(2);
      33NT := BitmapFromString(3, 3, '90A0567080225868' +
           '0948502270802250601A38482238401E48582C');
      Wait(2);
      33NT2 := BitmapFromString(3, 3, '303027304020303' +
           '01E30301E58604010100628281B181807000800');
      Wait(2);
      33NT3 := BitmapFromString(3, 3, '788834809046384' +
           '822707834708034383824607032889049809046');
      Wait(2);
      22NT := BitmapFromString(2, 2, '5860365860275058' +
           '27485816');
      Wait(2);
      22NT2 := BitmapFromString(2, 2, '809046788834788' +
           '82078804D');
      Wait(2);
    end;

    Procedure BitMaps3
    begin
      Wait(2);
      1010DT := BitmapFromString(10, 10, 'z78DA4D' +
           '525B8EC43008BB9279B4A59F93A473FF23AD713AD22A2A8AC0D88' +
           '6D467C0C23BAEC828F740A45D36794E9B0E7C1D5E3819D30E4B2B' +
           '3CBCC32E4F2FC60A60B1ABEC61266D88615A1199064BA079EC641' +
           'EE22F55276E71A2911656C440FC6BF30B73081364480C2FEFCE24' +
           '676C75E557DF31E439950FF52EE9FAEFDE55F52EF19081CEE3CD4' +
           'B6BABBC1EA4856900E4A1765E730DE5A7A63B365B3390536E5FFC' +
           'BF8C54B43DF6E8AE1963474C9E8FB63D146F39D73EB843679C6F6' +
           'FABF78B2431ED79887F4F2D47E41146EAFD0E0FF1EE2731426A8A' +
           'A1DEAF542E75E5F6D06FDD2F86FE8AC7A97EE25615DAF36757B7F' +
           'A6F1BAACA55FF4B8E3F2C587BB7');
      Wait(2);
      77DT := BitmapFromString(7, 7, '0C0C00181C0' +
           'B2C301B242C132C301918180B0C10001C20102C301B282C170004' +
           '0000040014180D0004000A0C002226141214080E1208242817343' +
           'C2624241920221612140C14140812140C18181000040018180B1C' +
           '1E0F181C08161A0C14140D12120C161A020C0C031C1C152020131' +
           '81C141014041C200924281024280A14140914141014180B141810' +
           '0C0C00141410080803');
      Wait(2);
    end;

    Procedure FreeBitMaps1;
    begin
      Wait(2);
      FreeBitMap(99NT);
      Wait(2);
      FreeBitMap(99NT2);
      Wait(2);
      FreeBitMap(88NT);
      Wait(2);
    end;

    Procedure FreeBitMaps2;
    begin
      Wait(2);
      FreeBitMap(88NT2);
      Wait(2);
      FreeBitMap(33NT);
      Wait(2);
      FreeBitMap(33NT2);
      Wait(2);
      FreeBitMap(33NT3);
      Wait(2);
      FreeBitMap(22NT);
      Wait(2);
      FreeBitMap(22NT2);
      Wait(2);
    end;
     
    Procedure FindTree;
    begin
    end;

    Procedure DropLogs;
    begin
    end;



    begin

    end.

  2. #2
    Join Date
    Jan 2007
    Posts
    513
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Where exactly in your script is line 9?
    Srl simply rocks.

  3. #3
    Join Date
    Apr 2007
    Location
    Finland
    Posts
    938
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

  4. #4
    Join Date
    Sep 2006
    Posts
    6,089
    Mentioned
    77 Post(s)
    Quoted
    43 Post(s)

    Default

    Don't start your variables with a number
    Hup Holland Hup!

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

    Default

    Tough I don't think it would work..


    Change this
    var
    MouseCoordX, MouseCoordY : Integer;

    var
    99NT, 99NT2, 88NT : Integer; //ERROR HERE! What...?

    var
    88NT2, 33NT, 33NT2, 33NT3, 22NT, 22NT2 : Integer;

    var
    1010DT, 77DT : Integer;
    into this

    var
    MouseCoordX, MouseCoordY, 99NT, 99NT2, 88NT, 88NT2, 33NT, 33NT2, 33NT3, 22NT, 22NT2, 1010DT, 77DT : Integer;
    Srl simply rocks.

  6. #6
    Join Date
    Apr 2007
    Location
    Finland
    Posts
    938
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by nielsie95 View Post
    Don't start your variables with a number
    kk, I'll just do NT99 then (NormalTree9x9pixels and DT = DarkTree , my personal quick coding that is created in 5 sec

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Identifier Expected
    By Torrent of Flame in forum OSR Help
    Replies: 9
    Last Post: 02-23-2008, 01:21 PM
  2. Identifier Expected
    By HairyDuncan2 in forum OSR Help
    Replies: 1
    Last Post: 10-06-2007, 08:58 AM
  3. Identifier expected
    By badandymitch in forum OSR Help
    Replies: 4
    Last Post: 05-31-2007, 11:57 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
  •