View Full Version : Error: Closing parenthesis expected at line 67???
Romio
04-04-2017, 01:26 PM
my code:
procedure trade();
begin
trading := BitmapFromString(136, 11, 'meJx9l9GKE0EQRf30/YAQMMFgo' +
'i/qi7CIK7Igxs26rC6C+6C4CP6NN3N2bm6qewLFUFPdXZPcM1XdM z' +
'vfPn33ZXGxw+TLlh9v5xc7XYs9v/ym0bMnZyWuoIZk6093GZ9/uGm' +
'TOBV5PKesZc5me49psm4VfPb5p4M2grouL3+0c3Sr5fgvdr91 1TSv' +
'8hzflrivSuJb5SHny5uH17cPq69/FJSvOJHW3tz9Kw6+5uuKedQs4' +
'ILIKEawiC+n5SLTzJZLriq8zMUItBYpHCyaeEhOIitWgBrr1P wTlC' +
'VyMjUX+DouYWWrq18KwkXXKTQJJTHlVabkhiJ/0ZSJgjbER08iftu' +
'JY1PLD1zGPBnPCPLme5uTrTNFVCZYVQPFqJSMtHxZnm+CbwHh hfkb' +
'PNOPQFgjk28KTpIITMTxwoUmJmd2vrVjWDgpJg6SuljKKBMyQ xn17' +
'SoyIJqLKBVLNUo5+PVWKnz4FjEzJzNLp0rfjwZu4cuth0Qhq4 nCMZ' +
'cCCBxy3PpyJo3LXHDaF76rZ4sg/fmQysvZg5S/7WOsgoIZ8fd5pRF' +
'HQ8QTRKmCfdphl3nMP/pTXNptiHiXS3li7jU4cMkHMTrFpRt8+/2v' +
'uZhO1gu7j2tnr+37a+uZBKf6VQIqG03LpfWTC3/ThVCaFbdq8vmTf' +
'BLIBpgdzyJTqoVLKdV8GfI3mEtpvIzSx9h0SmngT8GCiMRPLp bIfc' +
'zCMroe/0hX5OTi3pikpMMUl+w/Odrdx9u9AF84SpBsmYehVsy8eq0' +
'zcxjIcss5pfps3mjIkL5HE9YiWs1sPDMjSw6VGgHQ+ljbdnIb UQeb' +
'H28xhwyDkqXiCjj6Gz0wtc21HuoGT5RMGUX/1NxSd+MtFwzlVcgum' +
'fLoDDJNBggRoS4oDdqXP2p4z9kXrNJ60Me3HNVK+6IBukBaqT ODk7' +
'tMfJDwXqMhDgOrwZgMl0dnmGx9nG3T+ypJ3weMVDXlnYq05rO BRHZ' +
'lSWpToN
if FindBitmapToleranceIn(trading, x, y, 14, 503, 518, 556, 50) then
begin
movemouse(x, y);
end
end
begin
trade();
end. <--- this ends at line 65
Citrus
04-04-2017, 01:35 PM
with tags everything becomes so clear...
procedure trade();
begin
trading := BitmapFromString(136, 11, 'meJx9l9GKE0EQRf30/YAQMMFgo' +
'i/qi7CIK7Igxs26rC6C+6C4CP6NN3N2bm6qewLFUFPdXZPcM1XdM z' +
'vfPn33ZXGxw+TLlh9v5xc7XYs9v/ym0bMnZyWuoIZk6093GZ9/uGm' +
'TOBV5PKesZc5me49psm4VfPb5p4M2grouL3+0c3Sr5fgvdr91 1TSv' +
'8hzflrivSuJb5SHny5uH17cPq69/FJSvOJHW3tz9Kw6+5uuKedQs4' +
'ILIKEawiC+n5SLTzJZLriq8zMUItBYpHCyaeEhOIitWgBrr1P wTlC' +
'VyMjUX+DouYWWrq18KwkXXKTQJJTHlVabkhiJ/0ZSJgjbER08iftu' +
'JY1PLD1zGPBnPCPLme5uTrTNFVCZYVQPFqJSMtHxZnm+CbwHh hfkb' +
'PNOPQFgjk28KTpIITMTxwoUmJmd2vrVjWDgpJg6SuljKKBMyQ xn17' +
'SoyIJqLKBVLNUo5+PVWKnz4FjEzJzNLp0rfjwZu4cuth0Qhq4 nCMZ' +
'cCCBxy3PpyJo3LXHDaF76rZ4sg/fmQysvZg5S/7WOsgoIZ8fd5pRF' +
'HQ8QTRKmCfdphl3nMP/pTXNptiHiXS3li7jU4cMkHMTrFpRt8+/2v' +
'uZhO1gu7j2tnr+37a+uZBKf6VQIqG03LpfWTC3/ThVCaFbdq8vmTf' +
'BLIBpgdzyJTqoVLKdV8GfI3mEtpvIzSx9h0SmngT8GCiMRPLp bIfc' +
'zCMroe/0hX5OTi3pikpMMUl+w/Odrdx9u9AF84SpBsmYehVsy8eq0' +
'zcxjIcss5pfps3mjIkL5HE9YiWs1sPDMjSw6VGgHQ+ljbdnIb UQeb' +
'H28xhwyDkqXiCjj6Gz0wtc21HuoGT5RMGUX/1NxSd+MtFwzlVcgum' +
'fLoDDJNBggRoS4oDdqXP2p4z9kXrNJ60Me3HNVK+6IBukBaqT ODk7' +
'tMfJDwXqMhDgOrwZgMl0dnmGx9nG3T+ypJ3weMVDXlnYq05rO BRHZ' +
'lSWpToN
if FindBitmapToleranceIn(trading, x, y, 14, 503, 518, 556, 50) then
begin
movemouse(x, y);
end
end
begin
trade();
end.
Dan the man
04-04-2017, 01:46 PM
Fixed the standards up.
Your Bitmap declaration was missing a closing bracket, a apostrophe and a semicolon. You also need to declare trading, x and y as integers.
See code below:
procedure trade();
var
trading, x, y: integer;
begin
trading := BitmapFromString(136, 11, 'meJx9l9GKE0EQRf30/YAQMMFgo' +
'i/qi7CIK7Igxs26rC6C+6C4CP6NN3N2bm6qewLFUFPdXZPcM1XdM z' +
'vfPn33ZXGxw+TLlh9v5xc7XYs9v/ym0bMnZyWuoIZk6093GZ9/uGm' +
'TOBV5PKesZc5me49psm4VfPb5p4M2grouL3+0c3Sr5fgvdr91 1TSv' +
'8hzflrivSuJb5SHny5uH17cPq69/FJSvOJHW3tz9Kw6+5uuKedQs4' +
'ILIKEawiC+n5SLTzJZLriq8zMUItBYpHCyaeEhOIitWgBrr1P wTlC' +
'VyMjUX+DouYWWrq18KwkXXKTQJJTHlVabkhiJ/0ZSJgjbER08iftu' +
'JY1PLD1zGPBnPCPLme5uTrTNFVCZYVQPFqJSMtHxZnm+CbwHh hfkb' +
'PNOPQFgjk28KTpIITMTxwoUmJmd2vrVjWDgpJg6SuljKKBMyQ xn17' +
'SoyIJqLKBVLNUo5+PVWKnz4FjEzJzNLp0rfjwZu4cuth0Qhq4 nCMZ' +
'cCCBxy3PpyJo3LXHDaF76rZ4sg/fmQysvZg5S/7WOsgoIZ8fd5pRF' +
'HQ8QTRKmCfdphl3nMP/pTXNptiHiXS3li7jU4cMkHMTrFpRt8+/2v' +
'uZhO1gu7j2tnr+37a+uZBKf6VQIqG03LpfWTC3/ThVCaFbdq8vmTf' +
'BLIBpgdzyJTqoVLKdV8GfI3mEtpvIzSx9h0SmngT8GCiMRPLp bIfc' +
'zCMroe/0hX5OTi3pikpMMUl+w/Odrdx9u9AF84SpBsmYehVsy8eq0' +
'zcxjIcss5pfps3mjIkL5HE9YiWs1sPDMjSw6VGgHQ+ljbdnIb UQeb' +
'H28xhwyDkqXiCjj6Gz0wtc21HuoGT5RMGUX/1NxSd+MtFwzlVcgum' +
'fLoDDJNBggRoS4oDdqXP2p4z9kXrNJ60Me3HNVK+6IBukBaqT ODk7' +
'tMfJDwXqMhDgOrwZgMl0dnmGx9nG3T+ypJ3weMVDXlnYq05rO BRHZ' +
'lSWpToN');
if FindBitmapToleranceIn(trading, x, y, 14, 503, 518, 556, 50) then
begin
movemouse(x, y);
end;
end;
begin
trade();
end.
Romio
04-04-2017, 01:48 PM
wait, i cant get it working
Romio
04-04-2017, 01:53 PM
Fixed the standards up.
Your Bitmap declaration was missing a closing bracket, a apostrophe and a semicolon. You also need to declare trading, x and y as integers.
See code below:
procedure trade();
var
trading, x, y: integer;
begin
trading := BitmapFromString(136, 11, 'meJx9l9GKE0EQRf30/YAQMMFgo' +
'i/qi7CIK7Igxs26rC6C+6C4CP6NN3N2bm6qewLFUFPdXZPcM1XdM z' +
'vfPn33ZXGxw+TLlh9v5xc7XYs9v/ym0bMnZyWuoIZk6093GZ9/uGm' +
'TOBV5PKesZc5me49psm4VfPb5p4M2grouL3+0c3Sr5fgvdr91 1TSv' +
'8hzflrivSuJb5SHny5uH17cPq69/FJSvOJHW3tz9Kw6+5uuKedQs4' +
'ILIKEawiC+n5SLTzJZLriq8zMUItBYpHCyaeEhOIitWgBrr1P wTlC' +
'VyMjUX+DouYWWrq18KwkXXKTQJJTHlVabkhiJ/0ZSJgjbER08iftu' +
'JY1PLD1zGPBnPCPLme5uTrTNFVCZYVQPFqJSMtHxZnm+CbwHh hfkb' +
'PNOPQFgjk28KTpIITMTxwoUmJmd2vrVjWDgpJg6SuljKKBMyQ xn17' +
'SoyIJqLKBVLNUo5+PVWKnz4FjEzJzNLp0rfjwZu4cuth0Qhq4 nCMZ' +
'cCCBxy3PpyJo3LXHDaF76rZ4sg/fmQysvZg5S/7WOsgoIZ8fd5pRF' +
'HQ8QTRKmCfdphl3nMP/pTXNptiHiXS3li7jU4cMkHMTrFpRt8+/2v' +
'uZhO1gu7j2tnr+37a+uZBKf6VQIqG03LpfWTC3/ThVCaFbdq8vmTf' +
'BLIBpgdzyJTqoVLKdV8GfI3mEtpvIzSx9h0SmngT8GCiMRPLp bIfc' +
'zCMroe/0hX5OTi3pikpMMUl+w/Odrdx9u9AF84SpBsmYehVsy8eq0' +
'zcxjIcss5pfps3mjIkL5HE9YiWs1sPDMjSw6VGgHQ+ljbdnIb UQeb' +
'H28xhwyDkqXiCjj6Gz0wtc21HuoGT5RMGUX/1NxSd+MtFwzlVcgum' +
'fLoDDJNBggRoS4oDdqXP2p4z9kXrNJ60Me3HNVK+6IBukBaqT ODk7' +
'tMfJDwXqMhDgOrwZgMl0dnmGx9nG3T+ypJ3weMVDXlnYq05rO BRHZ' +
'lSWpToN');
if FindBitmapToleranceIn(trading, x, y, 14, 503, 518, 556, 50) then
begin
movemouse(x, y);
end;
end;
begin
trade();
end.
thaankyou sir
You should check this thread out for general simba knowledge https://villavu.com/forum/showthread.php?t=58935
goodgamescript
04-04-2017, 07:20 PM
You should check this thread out for general simba knowledge https://villavu.com/forum/showthread.php?t=58935
This!
Hmm one other suggestion,dont forget to free and load your bitmaps the correct way.
Eg:
procedure LoadBtm; //all btms go here
begin
trading := BitmapFromString(136, 11, 'meJx9l9GKE0EQRf30/YAQMMFgo' +
'i/qi7CIK7Igxs26rC6C+6C4CP6NN3N2bm6qewLFUFPdXZPcM1XdM z' +
'vfPn33ZXGxw+TLlh9v5xc7XYs9v/ym0bMnZyWuoIZk6093GZ9/uGm' +
'TOBV5PKesZc5me49psm4VfPb5p4M2grouL3+0c3Sr5fgvdr91 1TSv' +
'8hzflrivSuJb5SHny5uH17cPq69/FJSvOJHW3tz9Kw6+5uuKedQs4' +
'ILIKEawiC+n5SLTzJZLriq8zMUItBYpHCyaeEhOIitWgBrr1P wTlC' +
'VyMjUX+DouYWWrq18KwkXXKTQJJTHlVabkhiJ/0ZSJgjbER08iftu' +
'JY1PLD1zGPBnPCPLme5uTrTNFVCZYVQPFqJSMtHxZnm+CbwHh hfkb' +
'PNOPQFgjk28KTpIITMTxwoUmJmd2vrVjWDgpJg6SuljKKBMyQ xn17' +
'SoyIJqLKBVLNUo5+PVWKnz4FjEzJzNLp0rfjwZu4cuth0Qhq4 nCMZ' +
'cCCBxy3PpyJo3LXHDaF76rZ4sg/fmQysvZg5S/7WOsgoIZ8fd5pRF' +
'HQ8QTRKmCfdphl3nMP/pTXNptiHiXS3li7jU4cMkHMTrFpRt8+/2v' +
'uZhO1gu7j2tnr+37a+uZBKf6VQIqG03LpfWTC3/ThVCaFbdq8vmTf' +
'BLIBpgdzyJTqoVLKdV8GfI3mEtpvIzSx9h0SmngT8GCiMRPLp bIfc' +
'zCMroe/0hX5OTi3pikpMMUl+w/Odrdx9u9AF84SpBsmYehVsy8eq0' +
'zcxjIcss5pfps3mjIkL5HE9YiWs1sPDMjSw6VGgHQ+ljbdnIb UQeb' +
'H28xhwyDkqXiCjj6Gz0wtc21HuoGT5RMGUX/1NxSd+MtFwzlVcgum' +
'fLoDDJNBggRoS4oDdqXP2p4z9kXrNJ60Me3HNVK+6IBukBaqT ODk7' +
'tMfJDwXqMhDgOrwZgMl0dnmGx9nG3T+ypJ3weMVDXlnYq05rO BRHZ' +
'lSWpToN');
end;
procedure freebtms;
begin
freebitmap(trading);
end;
begin //main loop
LoadBtm;
addOnTerminate('freebtms');
end.
jstemper
04-04-2017, 07:27 PM
This!
Hmm one other suggestion,dont forget to free and load your bitmaps the correct way.
Eg:
procedure LoadBtm;
begin
trading := BitmapFromString(136, 11, 'meJx9l9GKE0EQRf30/YAQMMFgo' +
'i/qi7CIK7Igxs26rC6C+6C4CP6NN3N2bm6qewLFUFPdXZPcM1XdM z' +
'vfPn33ZXGxw+TLlh9v5xc7XYs9v/ym0bMnZyWuoIZk6093GZ9/uGm' +
'TOBV5PKesZc5me49psm4VfPb5p4M2grouL3+0c3Sr5fgvdr91 1TSv' +
'8hzflrivSuJb5SHny5uH17cPq69/FJSvOJHW3tz9Kw6+5uuKedQs4' +
'ILIKEawiC+n5SLTzJZLriq8zMUItBYpHCyaeEhOIitWgBrr1P wTlC' +
'VyMjUX+DouYWWrq18KwkXXKTQJJTHlVabkhiJ/0ZSJgjbER08iftu' +
'JY1PLD1zGPBnPCPLme5uTrTNFVCZYVQPFqJSMtHxZnm+CbwHh hfkb' +
'PNOPQFgjk28KTpIITMTxwoUmJmd2vrVjWDgpJg6SuljKKBMyQ xn17' +
'SoyIJqLKBVLNUo5+PVWKnz4FjEzJzNLp0rfjwZu4cuth0Qhq4 nCMZ' +
'cCCBxy3PpyJo3LXHDaF76rZ4sg/fmQysvZg5S/7WOsgoIZ8fd5pRF' +
'HQ8QTRKmCfdphl3nMP/pTXNptiHiXS3li7jU4cMkHMTrFpRt8+/2v' +
'uZhO1gu7j2tnr+37a+uZBKf6VQIqG03LpfWTC3/ThVCaFbdq8vmTf' +
'BLIBpgdzyJTqoVLKdV8GfI3mEtpvIzSx9h0SmngT8GCiMRPLp bIfc' +
'zCMroe/0hX5OTi3pikpMMUl+w/Odrdx9u9AF84SpBsmYehVsy8eq0' +
'zcxjIcss5pfps3mjIkL5HE9YiWs1sPDMjSw6VGgHQ+ljbdnIb UQeb' +
'H28xhwyDkqXiCjj6Gz0wtc21HuoGT5RMGUX/1NxSd+MtFwzlVcgum' +
'fLoDDJNBggRoS4oDdqXP2p4z9kXrNJ60Me3HNVK+6IBukBaqT ODk7' +
'tMfJDwXqMhDgOrwZgMl0dnmGx9nG3T+ypJ3weMVDXlnYq05rO BRHZ' +
'lSWpToN');
end;
procedure freebtms;
begin
freebitmap(trading);
end;
begin //main loop
addOnTerminate('freebtms');
end.
you are freeing a bitmap that doesn't exist
goodgamescript
04-04-2017, 07:39 PM
you are freeing a bitmap that doesn't exist
ikr i fixed it in the main post about 2mins after i did it lol typed fast =p
Powered by vBulletin® Version 4.2.1 Copyright © 2024 vBulletin Solutions, Inc. All rights reserved.