SRL Archive - OSR Help

it says error identifyer excpected in script. any help?

Ace257

2010-06-09 02:56:07

var a,x,y : integer;
procedure LoadBmps;
begin
a := BitmapFromString(344, 179, 'beNrt3b2LpUUWx3H/gOnEP8Nkw' +
'cAJNhNcOjGdxkCDGzdGw9KpoYtgaCSYbNKIoHCFCxN31AgGMqyJ2M' +
'OCJma70+ME7qk6VafOOc/z3JkFn2d8+X54GHp6+nY3DPW79XKq6qW' +
'XAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA' +
'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAv3OXujjxXH7z2/' +
'Zfv/Pyv936Dj/xi8uvp7ykP/2XAGjnw9OH9p1+9++Rq9+TBvfJ88W' +
'b74Gonn5fHmqT+tXx9f8on9eObi/GBPD+8P//ovx5/4kv0R8if5AC' +
'wEnmrlVYWmr9LAGv4mgMlK/w/3Vy0fOiZUD7W9vvTJ+2ZDQGfGAvN' +
'P7/w4X3tFfBfBvzqvvv8rdK6JQQ0B2pLn82B1mewf9VP1pZuvYXH+' +
'5P/fH3y33+/LH/q8/ibvzy5Pi1fr+HQG/V4juRADAr5VckBYA3lXV' +
'5DIOZAjoL6pJGCfL02fP88PnfPh3fKs++B8O3bkgmtz2Adg+fOAR0' +
'a8F8GrJIDbjgwZgnc6KB90v1VGrW+6UsbLy3dGn76qw+E/Yn1FuTl' +
'rYeQGjs5ALygHPAd/hECLgrSWOD20d2SALPt3foA9vTPj67Ch3c0D' +
'aR7cGxOgBwAts2BEQXTjkFNAPuy2x/P5N08hED6eNolsKFB+jL5Pj' +
'JYeHDvuVYW6iwEOQCsngMWAraA+MWbGgK3n77Shv/7+MQQmOkn6Cf' +
'3k4jYu3zYn4yFBp8DMQ3IAWDF+YHpcEBD4PLsyaF0DFprXWrg7q8p' +
'KNpnlmYM9PP9hWXO0K8z2nQBOQBskAO+7dvzzzc0B2a69LH92tu6L' +
'gr45/bR3TCd2JcPxhMzpPRMLAoYFwAvKgek+esjHx/KzMB4Q4/zft' +
'Z4xxJAb63+kU/a4kLoMEy+Z46CyToCOQBs2h+oCSCfyV19y4EeAlb' +
'0a6VEqfAgFBneXIy1BtevmBkg+BxwBcbkALBWDlgRkX4gwwGbE9jP' +
'jQj6KKDUBfXSgvT4WkQtFtI0uP3xbGSL72D0ZBjxYlFADgBb9gc0C' +
'g47XR3I83s9GXQeoOxK8AXJseRg9BDqJqYWCL1Fy8vDMMEvJej0o3' +
'x/+UorPCYHgC1z4FDe38t4379T20pfnwAsr5Jug59X7IGg+4/kO+h' +
'TWrENFlzHQPoSMkbQYUKuS6xR0CqQ3QZGcgBYPQesh3996mfyxyi+' +
'5kBbZ5QQsOlEG1A8uKfVhpoA8ir5UwYCreeQBgu1aUsahOkClzk2+' +
'WBRQA4AW/QHalMd5YKx7GdMCNiygg+Bw06+VUuA/agltv7AdOqg/G' +
'jNgf0kCmqXoB0+QP0AsEEO2AC/Vg3ZJIBvoWNOwJYX/eyivPDbt60' +
'b4PcU+P5AToM6Y6BzBSEK+mvDuIAcANbOgb5MkIfqriwwTAzGRxp1' +
'qxeKRYMtB6b7mHwU3FyMeqSYA/LacnZBnzAkB4AVc0A7+ZdnbZkgr' +
'hHIeF+PDijNOa0OxByYFg+3+YFaipBf5VYWdHQw0wPpMxI2wUgOAG' +
'vlwEevl+ewC6WDbo1gjPHt+DL7WJ+rnQ4KWoz0l2sOtF6EDwGbW7D' +
'NjL1XkALB1xKQA8C6OSCDglo9OLtWuLgXyb2565bktuDY6wFaDhwm' +
'ownLATvepObA7CxBO6aAHADWHhccxnJhqCDS/kDq2Pt1Rmval2e6X' +
'uDXGp6RAz0KLAfGLIHNUegv0E9BJAeALXLAxuZumWD2nKKRA31rUp' +
'slcDsKF3Mglh7Jt5Jfoy0cpAXEngNanUgOAGvlQJ3oC/uL3V7CUTO' +
'wlAM9CkYO9Pf0MD9wJAf6sGJ+30GvMSYHgBVzoNYBTo8aLit3j+6W' +
'HPCT/MtDA58D2qKfvz9g1chh4dJ2IEoO1OlEcgDYNAf6omGbHJAGe' +
'32qB4+XP+1xOTDmB5bHBeWv/uV1l4EVG9t2A7/ZuS0ZkAPAyuOCkA' +
'NLk4TSbKUta+P99BV5Wiw8MwdseqFmiL22/FP9hlZpPE4ncKMDcgD' +
'YbH5gFAJNc0Abcm3C8sXyBfpBadfPkQMjSfTrr09bFOgLew4sTRXK' +
'NyEHgNVzoE7xhf6An6u3HIjv5m1QIJ/se45GDvRxfc4BN6zw36dtT' +
'O7jgrR0SH8A2DQH4jnDOk8Yigf85EB/c7ccCOsFs/2BODPgQ0CXDm' +
'dOLes5oF9ADgCrjgvSumE4fMzKiae1QO5c06X6gZAkfsHR//Vqp3O' +
'GeemwlxaTA8C6OVDXC/ItRXYukB1CmA40tprAuXFBzoHpmqOrK9b6' +
'gbDbKK4b2i9JDgBr5UB9qw3lxPGowLa/IBUQTioBwjyhqyOaKUuOR' +
'USaA+Mggn1YN9Rr08kBYNUcsLn6cBxZPIYo7Df0ORAPJXvG/EDqVM' +
'QTDNIkYRukkAPAhv2BdgjJ+cns0CDkgO5TTl2C/ysH/Fajvl0xLBr' +
'uw4Gl5ACwwfyAruCH7UVu1UD3/LYckPZrORA7BjkH+n7D+RxIdcUL' +
'V5zoDUf6o8kBYMUc6KP7MTZ3gwJbNWgnmupbuUaBpUGaH/A58Ojuz' +
'BUJkxGBXoY4csDdo2rnIJEDwIo50Ff9pJG2xjgZGoyTh6erBv3lT3' +
'94fxQl9tOEyhUGP30S7lX3OVB7AuEYonixUXnhYWfrEeQAsGoOtLN' +
'DH96f2WiQFg7idmM9vsBfWzCKEusUgd5mMpMDfb3Sn0Lmn7Zk2X8K' +
'OQCsOy6wI8I0B/wNpO5OwzZhONe3D1cgnYc9AjkH/AVqqXBo76450' +
'5JmuzCFHABWzYF4pEBrjAsLB61LMKkkLGP81Jz341b0nAO9kHhmY5' +
'Hb2tCmJckBYMsc0BtJrna5pmg/thvoySTpnbqkR53oW3pCUaKVL+q' +
'znzmLTJcL28yAPh+9Tg4AG/UH9M3d33fszhkb9xxpp/3QLzrs0wvh' +
'EkO7vuSw0+tTbeghL9frz2YPIhvf33oddW2CHAA2y4FW1WMLiOm0w' +
'LQFSe889ZuPUq2grzysm4nydefuFLJxd5KfhSAHgA1yIF1R1Mfvac' +
'tPSoO2K/nmolw2dKTq+BAuNg0nEMZUadmi1YNxREAOAFvkwPS2stq' +
'u82Zkfwe6a7+lk293n8UBgu4m1uafbi4L549p6eDD++0wQxcCt/94' +
'VR5yANgiB9LVY33I3xqvO7x0PPE9XasHdfZPpwd1OcCaf77PdHIuc' +
'b5UvecA/QFguxxIw/x6A/KxAcL5Yvf+SIlgXiCw2QadUZyebNALmM' +
'kBYPUcSKXCunfg8ky792Fufx+OLTrewNNn/NkCIyhs9cFCYO7YE3I' +
'AWDcH/NYh//Q1wdJOr0/Din/vEqSbR2a6/ef5yEG9GWGUImhPwI9N' +
'0uWJ5ACwQQ646bjcMehv0G3e7/o0DBPO4+xBqgxMB52ltQbtA0wvS' +
'0qXpvUoIAeAtfsDJQT+/tfRB5iLAmukWgg0Tg9bbu/TusS2uOD7AE' +
'shYD+XHADW9N3nb7U9fdPhwGxdUK09tr6BDhbC/MD5zGWpM+UBvvp' +
'oenmi/9G9qkF+VXIAWMPVB6+VhtlzoI0O0mTddCmhzyLamoIPBN1r' +
'bDWHodLYSpH9jzj+U/qWRvlVyQFgDdKySvWOlgdLu5OhgY4OnpkDv' +
'vNw2PlnNPmrXZgBSB2M2UOKJmWE+n3kl5RflRwAVsoBeeSt9vsv35' +
'EB+G/wkV9MewLkALBqDvxenl8+e5X/MuDPngMf/43/MgAAAAAAAAA' +
'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA' +
'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA' +
'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgD+a/wHec2lX');
end;

procedure UseBitmap;
begin
if(FindBitmap(a,x,y)) then
begin
MoveMouseSmoothEx(x,y+random(0),20,40,45,25,20);
Wait(1000+random(100));
ClickMouse(x,y,true);
end;
end;

procedure FreeBmps;
begin
FreeBitmap(a);
end;

begin
LoadBmps;
UseBmps;
FreeBmps;
end.

YoHoJo

2010-06-09 03:07:03

Change UseBmps; To UseBitmap;

But then you get another error after that anyways.
Your bitmap is WAY TO BIG!

What exactly are you trying to do/find with this?

EvilChicken!

2010-06-09 03:12:39

Please use
tags when posting code.

var
  A, X, Y: Integer;

procedure LoadBmps;
begin
  A := BitmapFromString(344, 179, 'beNrt3b2LpUUWx3H/gOnEP8Nkw' +
  'cAJNhNcOjGdxkCDGzdGw9KpoYtgaCSYbNKIoHCFCxN31AgGMq yJ2M' +
  'OCJma70+ME7qk6VafOOc/z3JkFn2d8+X54GHp6+nY3DPW79XKq6qW' +
  'XAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAA' +
  'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAv3OXujjxXH 7z2/' +
  'Zfv/Pyv936Dj/xi8uvp7ykP/2XAGjnw9OH9p1+9++Rq9+TBvfJ88W' +
  'b74Gonn5fHmqT+tXx9f8on9eObi/GBPD+8P//ovx5/4kv0R8if5AC' +
  'wEnmrlVYWmr9LAGv4mgMlK/w/3Vy0fOiZUD7W9vvTJ+2ZDQGfGAvN' +
  'P7/w4X3tFfBfBvzqvvv8rdK6JQQ0B2pLn82B1mewf9VP1pZuvYXH+ ' +
  '5P/fH3y33+/LH/q8/ibvzy5Pi1fr+HQG/V4juRADAr5VckBYA3lXV' +
  '5DIOZAjoL6pJGCfL02fP88PnfPh3fKs++B8O3bkgmtz2Adg+f OAR0' +
  'a8F8GrJIDbjgwZgnc6KB90v1VGrW+6UsbLy3dGn76qw+E/Yn1FuTl' +
  'rYeQGjs5ALygHPAd/hECLgrSWOD20d2SALPt3foA9vTPj67Ch3c0D' +
  'aR7cGxOgBwAts2BEQXTjkFNAPuy2x/P5N08hED6eNolsKFB+jL5Pj' +
  'JYeHDvuVYW6iwEOQCsngMWAraA+MWbGgK3n77Shv/7+MQQmOkn6Cf' +
  '3k4jYu3zYn4yFBp8DMQ3IAWDF+YHpcEBD4PLsyaF0DFprXWrg 7q8p' +
  'KNpnlmYM9PP9hWXO0K8z2nQBOQBskAO+7dvzzzc0B2a69LH92 tu6L' +
  'gr45/bR3TCd2JcPxhMzpPRMLAoYFwAvKgek+esjHx/KzMB4Q4/zft' +
  'Z4xxJAb63+kU/a4kLoMEy+Z46CyToCOQBs2h+oCSCfyV19y4EeAlb' +
  '0a6VEqfAgFBneXIy1BtevmBkg+BxwBcbkALBWDlgRkX4gwwGb E9jP' +
  'jQj6KKDUBfXSgvT4WkQtFtI0uP3xbGSL72D0ZBjxYlFADgBb9 gc0C' +
  'g47XR3I83s9GXQeoOxK8AXJseRg9BDqJqYWCL1Fy8vDMMEvJe j0o3' +
  'x/+UorPCYHgC1z4FDe38t4379T20pfnwAsr5Jug59X7IGg+4/kO+h' +
  'TWrENFlzHQPoSMkbQYUKuS6xR0CqQ3QZGcgBYPQesh3996mfy xyi+' +
  '5kBbZ5QQsOlEG1A8uKfVhpoA8ir5UwYCreeQBgu1aUsahOkCl zk2+' +
  'WBRQA4AW/QHalMd5YKx7GdMCNiygg+Bw06+VUuA/agltv7AdOqg/G' +
  'jNgf0kCmqXoB0+QP0AsEEO2AC/Vg3ZJIBvoWNOwJYX/eyivPDbt60' +
  'b4PcU+P5AToM6Y6BzBSEK+mvDuIAcANbOgb5MkIfqriwwTAzG Rxp1' +
  'qxeKRYMtB6b7mHwU3FyMeqSYA/LacnZBnzAkB4AVc0A7+ZdnbZkgr' +
  'hHIeF+PDijNOa0OxByYFg+3+YFaipBf5VYWdHQw0wPpMxI2wU gOAG' +
  'vlwEevl+ewC6WDbo1gjPHt+DL7WJ+rnQ4KWoz0l2sOtF6EDwG bW7D' +
  'NjL1XkALB1xKQA8C6OSCDglo9OLtWuLgXyb2565bktuDY6wFa Dhwm' +
  'ownLATvepObA7CxBO6aAHADWHhccxnJhqCDS/kDq2Pt1Rmval2e6X' +
  'uDXGp6RAz0KLAfGLIHNUegv0E9BJAeALXLAxuZumWD2nKKRA3 1rUp' +
  'slcDsKF3Mglh7Jt5Jfoy0cpAXEngNanUgOAGvlQJ3oC/uL3V7CUTO' +
  'wlAM9CkYO9Pf0MD9wJAf6sGJ+30GvMSYHgBVzoNYBTo8aLit3 j+6W' +
  'HPCT/MtDA58D2qKfvz9g1chh4dJ2IEoO1OlEcgDYNAf6omGbHJAGe' +
  '32qB4+XP+1xOTDmB5bHBeWv/uV1l4EVG9t2A7/ZuS0ZkAPAyuOCkA' +
  'NLk4TSbKUta+P99BV5Wiw8MwdseqFmiL22/FP9hlZpPE4ncKMDcgD' +
  'YbH5gFAJNc0Abcm3C8sXyBfpBadfPkQMjSfTrr09bFOgLew4s TRXK' +
  'NyEHgNVzoE7xhf6An6u3HIjv5m1QIJ/se45GDvRxfc4BN6zw36dtT' +
  'O7jgrR0SH8A2DQH4jnDOk8Yigf85EB/c7ccCOsFs/2BODPgQ0CXDm' +
  'dOLes5oF9ADgCrjgvSumE4fMzKiae1QO5c06X6gZAkfsHR//Vqp3O' +
  'GeemwlxaTA8C6OVDXC/ItRXYukB1CmA40tprAuXFBzoHpmqOrK9b6' +
  'gbDbKK4b2i9JDgBr5UB9qw3lxPGowLa/IBUQTioBwjyhqyOaKUuOR' +
  'USaA+Mggn1YN9Rr08kBYNUcsLn6cBxZPIYo7Df0ORAPJXvG/EDqVM' +
  'QTDNIkYRukkAPAhv2BdgjJ+cns0CDkgO5TTl2C/ysH/Fajvl0xLBr' +
  'uw4Gl5ACwwfyAruCH7UVu1UD3/LYckPZrORA7BjkH+n7D+RxIdcUL' +
  'V5zoDUf6o8kBYMUc6KP7MTZ3gwJbNWgnmupbuUaBpUGaH/A58Ojuz' +
  'BUJkxGBXoY4csDdo2rnIJEDwIo50Ff9pJG2xjgZGoyTh6erBv 3lT3' +
  '94fxQl9tOEyhUGP30S7lX3OVB7AuEYonixUXnhYWfrEeQAsGo OtLN' +
  'DH96f2WiQFg7idmM9vsBfWzCKEusUgd5mMpMDfb3Sn0Lmn7Zk 2X8K' +
  'OQCsOy6wI8I0B/wNpO5OwzZhONe3D1cgnYc9AjkH/AVqqXBo76450' +
  '5JmuzCFHABWzYF4pEBrjAsLB61LMKkkLGP81Jz341b0nAO9kH hmY5' +
  'Hb2tCmJckBYMsc0BtJrna5pmg/thvoySTpnbqkR53oW3pCUaKVL+q' +
  'znzmLTJcL28yAPh+9Tg4AG/UH9M3d33fszhkb9xxpp/3QLzrs0wvh' +
  'EkO7vuSw0+tTbeghL9frz2YPIhvf33oddW2CHAA2y4FW1WMLi Om0w' +
  'LQFSe889ZuPUq2grzysm4nydefuFLJxd5KfhSAHgA1yIF1R1M fvac' +
  'tPSoO2K/nmolw2dKTq+BAuNg0nEMZUadmi1YNxREAOAFvkwPS2stq' +
  'u82Zkfwe6a7+lk293n8UBgu4m1uafbi4L549p6eDD++0wQxcC t/94' +
  'VR5yANgiB9LVY33I3xqvO7x0PPE9XasHdfZPpwd1OcCaf77Pd HIuc' +
  'b5UvecA/QFguxxIw/x6A/KxAcL5Yvf+SIlgXiCw2QadUZyebNALmM' +
  'kBYPUcSKXCunfg8ky792Fufx+OLTrewNNn/NkCIyhs9cFCYO7YE3I' +
  'AWDcH/NYh//Q1wdJOr0/Din/vEqSbR2a6/ef5yEG9GWGUImhPwI9N' +
  '0uWJ5ACwQQ646bjcMehv0G3e7/o0DBPO4+xBqgxMB52ltQbtA0wvS' +
  '0qXpvUoIAeAtfsDJQT+/tfRB5iLAmukWgg0Tg9bbu/TusS2uOD7AE' +
  'shYD+XHADW9N3nb7U9fdPhwGxdUK09tr6BDhbC/MD5zGWpM+UBvvp' +
  'oenmi/9G9qkF+VXIAWMPVB6+VhtlzoI0O0mTddCmhzyLamoIPBN1r' +
  'bDWHodLYSpH9jzj+U/qWRvlVyQFgDdKySvWOlgdLu5OhgY4OnpkDv' +
  'vNw2PlnNPmrXZgBSB2M2UOKJmWE+n3kl5RflRwAVsoBeeSt9v sv35' +
  'EB+G/wkV9MewLkALBqDvxenl8+e5X/MuDPngMf/43/MgAAAAAAAAA' +
  'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAA' +
  'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAA' +
  'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgD+a/wHec2lX');
end;

procedure UseBitmap;
begin
  if (FindBitmap(a, x, y)) then
  begin
    MoveMouse(x, y);
    Wait(1000 + random(100));
    ClickMouse(x, y, True);
  end;
end;

procedure FreeBmps;
begin
  FreeBitmap(a);
end;

begin
  LoadBmps;
  UseBmps;
  FreeBmps;
end.


I simply used MoveMouse, as Simba doesn't have the *SmoothEx procedures.

For the ultimae mouse procedures, include SRL and use the (M)Mouse procedures. :)

Ace257

2010-06-09 03:20:10

From: YoHoJo
Change UseBmps; To UseBitmap;

But then you get another error after that anyways.
Your bitmap is WAY TO BIG!

What exactly are you trying to do/find with this?


Well i was looking at someone's tutorial on sythe, but now its under construction so i went to the manual and yeah i saw that i need to change it to usebitmap thanks, but the tutorial told me to paste the pick im looking for in paint and fill in the white background with black it must be too large lol if i make the pick smaller will the code be smaller? and i swear i put tags in for some reason didnt work. :( but thank you soo much for helping! is their anyway i can rep yall?

YoHoJo

2010-06-09 03:37:09

You dont necessarily need to have the entire bitmap of what you need, just a small unique section also works.
Try using the more up to date/accurate tutorials here at the SRL forums instead maybe :D.

Ace257

2010-06-09 03:38:35

also im going to have atleast 24 of these bitmaps is their a way i can make them smaller? sorry i am new to the whole bitmap thing.

Ace257

2010-06-09 03:39:35

From: YoHoJo
You dont necessarily need to have the entire bitmap of what you need, just a small unique section also works.
Try using the more up to date/accurate tutorials here at the SRL forums instead maybe :D.


lol your right.
yes i knw i was just about to look at the tutorials.
and i'm making this script to go in another script for this game puzzle that basically clicks on all the orange colors then black then silver colors. I need to make this script because their are symbols on each color that if you click lets say a sword then another sword it gives you a bonus. right now the script i have only clicks random pieces depending on the color. Thats wwhy i need another script to determine the picture not just the color. if you want pics i can post?

YoHoJo

2010-06-09 03:39:43

Read some tutorials around here, too tired to explain, and they will be more thorough.
Also, please tell us what you are making the script for so we can help you out better too.

Edit:
Please dont double post, use the button and add onto your previous message.

Ace257

2010-06-09 04:02:02

i edited the second one lol. Is there a way i can upload a picture to here from my desktop? to show you, because i need help on decided what to crop out

Rct33

2010-06-09 04:44:27

Go to a site, for example http://www.cubeupload.com and upload the image and click on find codes and paste the link into a tag.

Ace257

2010-06-09 10:21:13

here is what the board looks like, except the pieces change color after you click on them to two other colors. I've created a script for the colors, and now im trying to create a script for the symbols inside using DTM's plz let me knw if you have any suggestions or could help me out. thanks!

http://www.cubeupload.com/img/b37c00puzzlepirates.png