SRL Archive - OSR Help

[RSPS] Script will not work - Executes successfull but does nothing?


Namedontcare

2013-02-19 18:45:10

Okay, so I'm trying to get a script to run that will thiev money from this stall on a private server, but when I try to get it to run, it says that it has executed successfully, and then does nothing!

Here is the code:

Program DeskThiever;
{$i srl/srl.simba}

Procedure ClickDesk;
var
X,Y: Integer;

begin
if FindColorTolerance(X, Y, 1356303, 363, 121, 363, 121, 5) then
begin
mmouse(x, y, 1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
end;
end;

begin
SetupSRL;
ClickDesk;
end.


If anyone could help, it would be greatly appreciated, thanks.

shebee

2013-02-19 18:50:47

You don't have a loop.
The script just runs once and is done.


begin
SetupSRL;
t:= 0
repeat
ClickDesk;
Inc(t) // increments t
until(t=10)
end.

Just a simple example, "t=10" would be how many times to run the script.

i luffs yeww

2013-02-19 18:51:40

It seems like it's just not finding the color.

Namedontcare

2013-02-19 19:25:28

I did what you said shebee, and now I get this.

[Error] (20:1): Unknown identifier 't' at line 19
Compiling failed.


I'm very new at this.

_______________

And i luffs yeww, I'm not sure if I'm even doing this correctly. :(

i luffs yeww

2013-02-19 19:27:27

From: Namedontcare
I did what you said shebee, and now I get this.



I'm very new at this.


What he posted wasn't full code. You need to make a variable called t which is an integer.

x[Warrior]x3500

2013-02-19 19:42:12

i think a big issue is that ur running srl, when srl will not work for a private server

Namedontcare

2013-02-19 19:42:25

Alright, I did that. Now it runs, but it only clicks the colour if I move the screen around a lot, and I'm not sure why it isn't clicking all the time. It's only clicking like once every 30 seconds.

Also, I saw somebody say that the colour picker lets you see the top left and the bottom right coordinates? I don't see that at all when I pick a colour, I just get one set of coords.

EDIT: x[Warrior]x3500, I saw that in Rjj95's private server scripting tutorial, he used SRL.

x[Warrior]x3500

2013-02-19 21:06:44

From: Namedontcare
Alright, I did that. Now it runs, but it only clicks the colour if I move the screen around a lot, and I'm not sure why it isn't clicking all the time. It's only clicking like once every 30 seconds.

Also, I saw somebody say that the colour picker lets you see the top left and the bottom right coordinates? I don't see that at all when I pick a colour, I just get one set of coords.

EDIT: x[Warrior]x3500, I saw that in Rjj95's private server scripting tutorial, he used SRL.

well i was saying that srl wouldnt work, simply because i wanted to warn u ahead of time. SRL is developed for the current rs, so things are obviously different in rsps. for instance, you might run into errors when it comes to gametab function. i just wanted to let you know ahead of time that even though srl can do some basic things, the more advanced stuff probably wont be useable in rsps.

also, in srl we have the 50px offset for the stupid bar at the top of the client. so u might wanna change that for ur rsps.

and the picker will only give u an x and a y (and a color) for each point u pick. so u can easily use this to create a box

Namedontcare

2013-02-19 21:26:51

Program DeskThiever;
{$i srl/srl.simba}

Procedure ClickDesk;
var
X,Y: Integer;
Sayno: Integer;
Saythieving: Integer;
Saynexus: Integer;

begin
if FindColorTolerance(X, Y, 9554905, 264, 89, 264, 89, 10) then
begin
mmouse(x, y, 1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
else
if FindBitmapToleranceIn(Sayno, X, Y, 607, 421, 607, 421, 10) then
WriteLn('No');
else
if FindBitmapToleranceIn(Saythieving, X, Y, 584, 423, 584, 423, 10) then
WriteLn('Thieving');
else
if FindBitmapToleranceIn(Saynexus, X, Y, 553, 426, 553, 426, 10) then
WriteLn('Nexus');
end;
end;

var t: Integer;
begin
Sayno := BitmapFromString(236, 18, 'meJy9muGO2zYQhO/936AN/OOkH' +
'3VfoUDRoEhQxEGAAoHRFv2RV6nijedGM7Ok7q6tQRj0klyJ5MfRkt' +
'bjr58fZ2n97a9Ky/s/zx/+lrTZ8f3fpR8/fhmXcgWvzLfX3ao4OZh' +
'qZDwfh+hI6mpugx/tp3d/xKLNuBVx6ZapfGWQygnSZtkmHXn2U0Uw' +
'wsObt59RuuVRtOWraLOUvTKcmDT+udVEni9RV/H0w7sr7k3qcE8jF' +
'd0s/A9gH4e84xmtCuDxQohLoOM21jnC6jRhOgZgM97gbft2XFHB2e' +
'ZSxpvRBXWnW3OBHzzLipgCXD9Rpzw/7D+Z5Pff1qwocF16zGQ3Rxj' +
'kZwna6wHuRHUzxqvE+tP+5l5cwiXi+ET7ccgZ5q6JMMwwM7QnAp7l' +
'mrEXHWa9FeDl2ys4n54EaeE2YuyQA0IeKJnBdf+MltErV7FhBLjDu' +
'IzlTYpgPKjDXxm+BFxdhAcOx8tNGO6GCEM9luix0orbbuGwcnZSLJ' +
'jVvUU+OWZgWRax7TwjMKhvJ1Ykess7sWWpmt/99JGNJcUAQ25AUCz' +
'OI9U8TVOB5YkbCB0mXahmsGM8EIn1/GARvSy55gvA6AJjeRoK79Ry' +
'Tuq9WBjsAO9kmRhGeCD1JeB05uMqYESFVeYZkMPCVwTV4gGo4+oVS' +
'3QMrynk4PkSHR4J14xwYZhnn6XM+RRj90Rgcf53GY7d4XUnK50Z9l' +
'BhnM57AYkkR1E9rsMrhRysn4AKpdyvjnzxwN/+k3nG7XUMC8/8HUc' +
'GGC+278M4RHIOpsiwfA7qpz+F2T6GvGNycM/y1HCG/Wm1LaUTxZ8H' +
'1fhlDIsCi9IKw+s+AhG1RH1nmNGFJe7dmFLBW6IO8DkIOTgvoTJUV' +
'yiqoavoIha5kDqZolECGIrYycCbrya+UOxFtHd+HFfur0TdzNJD+l' +
'STykNnvH6E0yvHa0WN5frg2fdHC52huX1qkWjB/TPDbJ9u7nhvKD6' +
'lifcXedRx8UFeYIt5OOFSFhlpdcSt31I39Sy/sW3MF6XIr/0WwK8r' +
'60KQ85v02AzUxXmJnjnvertSAIP6zHzk3+0SIWPfx5bKl25XvmiM+' +
'SnA9c2l39r+8omL8OnYZgCOjO1rGB4A4HlX+yhT/CCWLg8Y3pJ3vw' +
'tjfI0MunCE4UHH4bmbi8HOq2NY6o/9wIIopSxdnrktzYe9O6CoJt/' +
'//HsXS7DPLmYe9GUAVeWPMMwYR7u75Q+T48C4n+c+PrbKYJg/Xr+u' +
'UptHtBWkkedtXdepKcNTPYmxBILtWGfK8ErBPLdiS6fJwhvvE2Xn6' +
'Hu9TofHcfK0L93YnhIk3JBLBzo8eFzKs7urf6ZNkN+S2GMdZrjy5/' +
'v53nqLb3cr7hYhH2HY+ez2ces+nMDHdfvIHK20YXQ/Zzpr8l0b158' +
'qM+en+skM+2Yw7ulkjXgswWfItcUb15fHEzobdVhY5blju4At3uQq' +
'YjynjRh77oqi//gI8FjC18tYRU/4i63feFY63dkbOPeG4nOhc7NYY' +
'bVQGQ0F0YdEAsfMnQbKuRk+HkuI/BaEjDcH4fKTUxlv43ZFB+Fwpa' +
'M2zt8yV5ZHnl/X3qg8qNapU9dw3ccVcg8deFVNDhkiTs/y+azET3n' +
'ptfwnEm/soH+Oh9n+uP+ngO0OxnL/N1nq4FBuuf9vwsjhJ97KkLgi' +
'xg8sxYKxMMz3jHMMIvbq4+BdFiReM8Wog//9v47PAYAHMHd3FYueU' +
'Ll8iW9HcIqvYcil4wrlmsKbZOpmfHGJIMgVfV10DEtpxy3ncYbsbZ' +
'ki8CYMsz7jbTeJIjzAWPYnz8v95R+Gmeuv94PEjWFuEhlGQtup7vn' +
'k+p+wYDiqyrOQjghJPqByyW9fxOeLQ/v0874WZH1FFLVTl6czPRHh' +
'8ZLx2WGYp9BCPzukB+9jOGxg2GOMCjBcfiUeJjKvUY2FUpfix/1rx' +
'kKyj1tHcjdrcUV06WC17nI+7yK/TzDf2Juq7nn/Z7feQAFMDI/Xl/' +
'ppGvp6Oe/3F11CVMy8OY1FXUcpw+l2vC/kOrzsj2IcWk8uvOfbyzx' +
'dbLzetXTZvz4qkbA8pyRI5szLwok4ubxwptMqjLl9oKUxKohNuqWh' +
'90YxiRRxX+BZZEG6A4u7kpFhupzhda85Ik14A42L3rzVCLkqIMoFs' +
'X6qIHFCVN2Y/gHRWLhB');

Saythieving := BitmapFromString(287, 20, 'meJzFnN1uGzcQhfX+18mFIxj2a' +
'i/sPkICFxGKGEVtBClgGGnQC79KaU11fPacGS5lF41BCNzZ4c8u5+' +
'MMKcpnn+7PPt1f3jx/trT9/PWMJNNvD5GuvjxGZnf7V/ucf//REu5' +
'K4rtNP4rgMu6G/PqPvz21u/j8KemX+yfPoz/SvXic9ClaWa5qNUVV' +
'SNJuS/zGRBMv1lO86hiRSgf1hP75l+9RiserCVtChbgbyiiy3T+0h' +
'Lsx+lwEyviEPmqA2URtoYkMKom7SNHDlomCKB62h1ssRytswGyxUF' +
'5NUk/LA6V2GflI0OG8t/uKxIP+s8jq27xA4crcvaqrp5LlqHawdRL' +
'7vKTEpfKw3lQ/TFemR2ENuCGFwSDP9TB3TI3A5dgGJkBJLJzNG/mm' +
'yTbMOLuJdqoawUrgAl8vLuyozPnBFG4u7TwPQWqulXn8D8SN01eBh' +
'lJBVp/QlM0KqFRnBKLVJO6po8l0xKdzBAWHju8yd8xUWNrm8OdUAj' +
'RBdZUshmLVQXRgEZ8Yn9HbDlziuaIeZD78+ucIX6Jzdfsd0Qj7LAS' +
'EHSuqjAejf5ILeDtZlRtqwrSVVH/1efOnuEuaSN9PKh+njymrighc' +
'TBnTdE4ksoNjHsVzsYcCXB5ApqiOgLNqwKmCOywHMHqbFuFQcLP8C' +
'6YCLvgvD2WRmpr7LzQNOngExbTmZbglw9o+ozbRD6GTVfE1At2g53' +
'qG6y7hyN0WX27sr8fdEq7OKxIvnzKC5ioAWbkimn1N5bzE/mfDjSG' +
'ajuEfWGtycU9eCvKI8eLTSRFbTU13R+s7BJ/sqjjjUWhYuAMIshoa' +
'0W0GjT1X6ETyXk3HGFKcF8PlwTmPWuikuIltMEouETMbAaq6m4Z2K' +
'Uqe79DNPR9B+AXkLIZMuahQYokHgS5JEd7ZUsvJWjiybP3VEmPCZh' +
'NkOUouccsXy4Q8YIGEW8RlCk4qYTkw8bgRO4TvPt45XKBJKkTEyI8' +
'jZOFFxWhGWFjBNWfRIxsSey6YpVy+haPKhqtokCmWatmd/bdwpY8z' +
'CBdbZuW5Vp2gICZ8pW4rRS/FROw2ClbzgyPpAZv7ndS/yK5Ip5Kq2' +
'pTKidZZ72++OVzwVryLGHA1GFMPm8LFkwk+0yEDX7ts02NT/w2a6C' +
'Bcq2qp42A5d9jpOwkur9/bSimIJniXz221GohT4RKf5VscogNwIhp' +
'k/7KjRRY6LEi6hwp55WicXHZMKOv6jm3l3Vw5hevyRuFiM0YwKebN' +
'NVe3XCjIsAFMx5WaT8XMlFgp1+aewm+NyKt62KrlKcStOK1pc3O2i' +
'hxp0VnguyBIHtbfLdeWViitS/zG1TII3A3pAwK2yrVBzYWboxV5FO' +
'c6AibnO6bLHsrlHpGypLOh4Wsx1M/6Mm9It1Mdfky8bY4hI8MTtY8' +
'vFFjZ82yu7mhYv7J8adTr945tlhRwqInoTppe7XnaE4cxnYtcIiFi' +
'5N278RBIbf3iwhEcFl9ynh1ctX0hEvi16bCOg5w9UZrvWGal3ymbe' +
'i4EeAKXQOTzQKd7nW60lV1fB8PHlIX/QojIcow+infM742eaLO0Iu' +
'+M98FjqhG4YgvFW+k8XYrz6+DyPLuwkEfBEbi4CYGL/Ui1TEvXZSl' +
'coplO9R2PtgqXh46cT1dbEhZ24EJPVtmPjUSXj8wb/H54sGZaF2Cw' +
'0nDFY7wNwQXbY/1UnuZH4PJ20z6Mw5U+HfeK/65tfRTyc1oloeYUL' +
'ul/WpuryXhVTQgCosnrNb6EPuZYSCovJquP+EPkyUIJBSsr7cg5Dh' +
'QXdkE7FQwXr7lWw7wRz8XzSSXnseAX6E7qcPl4SD/OM/ODp2OX4bH' +
'lq+Hq6HijEtkiL91w6+V9j+eCd09Ji3dP8UWYO8qO5/LwD3mZ0PgS' +
'HeOuuoeqqpVGebAcqzSMrIBiuSxM3OZRih1NVTbNiw7SxfF74cinc' +
'E2HQ1CRx+66jDsLff2VhpHMEd7JRN+F8Zvn2nxoeMTxrtIwb1N4NK' +
'FV5J1baf2VnLHCp3suRyNuMVxSbQqj+5qKguetPEMvfS6vLc1L8d1' +
'yPxA66Y7ETN/CCFmiz1bH35R5uOgWyxsOLKlCPvdo1V6H73hAElsW' +
'2Lt49/Fu9fiuzAaiOS9Py+/oiItccgrhYUAf8VZR4Uw785w/ZB4rT' +
'yFrkNRaoDmvbUpXdss1eOzn/jHU+EsrroFr7gSxXudJiUMCeerz02' +
'ur6mdMWD4tv/FkebX+2u4fRCfggkXJuVxc4pvrNHjzHT/nJRU6sGk' +
'eWDFT289fsdfBpEzLL75xF6cTU74ELn6ZiIQJpUcfIB8LsdW32B50' +
'cEYuJvY+WfNy5ndG+nD5VPBvbYcYj4ESuNIji46nTx2pi5wtDvTXk' +
'kr89TqwFVxVEChAcR7fhXlZtiLYm8AlVfFvTxyxiinWF8+FW3zoYr' +
'tXz+WsRanLwykOQUYIvbBjUXw5H/f9QBn3aj7+8KfBxUVSuJBQdtV' +
'TuNX5FA240nnYgZKYpyLXPWmV4ZDDo8fUOebGTwsxBj9lRN/PoWDq' +
'xPss++gwZas0weNUrHXOLrqxAS6uE1aHIxnOkeDGiYHi0JGrAlk4M' +
'QiauIfiyy6PP6JMzzhNxdknkCL+S/Bx5zUtf/YliPmAVohV5pSiWi' +
'VRYwRS2/YZPgUtsdsDFNz/6mg9n7/SDgRZBFcffK2nKJh2eOQF4nA' +
'Ig+CYBA4VPk4Ky7f7RVjInotB64AzkqblOi4k7Kr48G2kFs49lz2y' +
'gz7gh10R8kXU1zQ5/Eu9mLiq68OJXHZnPI3M9INl978O1/zi4BZmj' +
'8zrIsPU6pjoVXsT43e5e67OVFAVqZjVvh3h8lv8LKhZ5it5HEi8Kn' +
'kzbPYO17ycDGXOxPl2vrXd6yosFLCSAkpiPKkPOpWsiRZQH2gnMBK' +
'Hf+9vvrGQz7czREAMP+wKAFO4+EyvJ2B1fM/6jwImih5jFLZ79W5z' +
'HU4wa7i8un0J7dJ1QR+rnQUwgwX7IKc9qRDrpIrltN3BGSa95bh5z' +
'FC9QI80fOBc6FFfGgfKz1um5f4GjKcK8Nx/pcTJSfULI6uTGK5/AB' +
'togSo=');

Saynexus := BitmapFromString(344, 16, 'meJy9W9Fu3DYQvP8H+mLUaC6HQ' +
'6LTQ9y3okiRtkjhIIkR9IygRQOjLfrgXymttcajmSXFc9IKhLBaLi' +
'lK2pldUtLZ92/P5rL9+bqUb16+C+Hrn46lhNxfuMnz19fD209cWw6' +
'jsFzK4eovPnxEGT/8HaV0dfHrP1KKHvv/rnx7fduuZQM35uHVhiqd' +
'dJa4My6nt6in1CzLzU/1+/d/plVFWaq4tgghh4ASnaCEw0DmfqIKS' +
'vSwe/MJtUVGVZGjqmhCHwIX9jQ+LJbswzhF6s+NruR0sBT7tBPpp+' +
'yf/vJ7zYABWOBZ9sW47EECT15dlcPYO6JPKtE/UwE0GA/LneXF+xs' +
'8X7nP7C0psmqe/D+QQz9R1DgBrYIE2mSS0kgN+6lND95XCx5HgxyY' +
'IoDZsnfIw8D5gWuZIhj+8LT91FwIBJwgrLJKAozf1Vi2iut0v8oD3' +
'i0bOM8UebPcApicBnBWkJYnP3xoGzghDJQPxEggFCLqoQKxeXF1Hz' +
'ugYcdr47rm53DUkwLr55NALbgXZXqW1H71evOrOCanSO9Pqu8nCia' +
'EWhPhASYEBv6eSIPTBqYOyQc47gtpyN4NejC+6sCpQQpPB7XjPSWH' +
'FPjeapjyhMB+5AClgAoKrmMiUISUKKScU8LQkzagq2CAwgwB/+ABZ' +
'AUNAuQkJ3rDUy5CcapQsrMJCsZlvi0e6DzQgs/yFJ14dCqIMbtB6O' +
'944HjrNp4MNBKMNmUJDzRuEZAb40nh3I740m2NfDiC11ICgepozMC' +
'4Hub8f6D0QIJ+rWck+WUPr6uF3ZrrYgwonJ+I4NMQqW3wQEo43H+A' +
'DiRQ44GgAoa/U0GBcCklJThpjiD8A+xjbKGM4jdwmCcRzANAvWhka' +
'hBCcEXKDO7GDQiz83div1ZbwMsYDyzHnvVu00BTg1tWqUl6i/65N9' +
'aEvG8mAKualG0OtizgJLBID7K1ArEXVNaAzyUuk0EEHuDEgHENDZ8' +
'RhzWMr6JebDxi1iYUkgwEsjgDD9ydygM83/cE4PnlR4bzwyzg8qPz' +
'ANggilwUKIIvZ0sripyuyGHKA2M2fWCfT130JFD31DrcUsyCH8JSb' +
'CJJCEL4sjyQXk4nD3ja3y4XRsLOBmlwT6N2WstJgkMsGsJt/LyMes' +
'lC09y1FrVlsTEFbFrbThLa+UOAPZ1xs72n67wmkPJApAHOBlzVMy8' +
'QDhHSAEcVgzTFch6Q7TDPClPvAhUcsrVE0a+Cup8HgKbggTYViGeK' +
'gURSP2/Y12YKfjq/DykPyHju5OPtnubjnVnB43hAMgFfOXQGQJGoD' +
'Xs4jEQQ9jGO7KFx0EHPJxLQeaSuZfU1XLtxwx6T7gipnGZ7tGVslv' +
'k+XhQ2eIARJxh3fa1K+pFJCixDcBLYUYYGe3lweLhwWmQCMiRxb2w' +
'CHFHW9NJPD3XAUgTgMR1w7VztsztNpVed3pP0pGVjEvBxSvHT1c7F' +
'QTk2HDLDiMG4XF5IO5GI71TjCecuW2AXt0Ty3zADWt2GIRmbGLvAT' +
'dKeA+xQYnmQE+zQpHm+DFLAG4v/XPVlZb40uZO7ec2W9SxEKzaAq7' +
'DskTT0jhfWuyzxWmK39PkIHpD4KxQBmdcZZM0BBWuJURtpid8N4YE' +
'0G0Gr/bKHmswhvn3fGNrSjwhiiZ4lSUDmz8CHTRwOtHh4oFcMaDjM' +
'aw6hEfSx4zFU0/jl9pwGoK14/mbePDNJOWGgNwKRcnMP6fJgOtmP2' +
'jJNKEqx3Cy3GpaDbVwfZ3E9XwWG7TwgzLzQX35s38aLaREgzRM8sn' +
'D6Kpf8+TwgLISuYC9jwKFUpWOr8QCogEfbyGok+qcD7pSdVVyupT1' +
'yc5gHmFUE4wxtt5eVAdQO8xIizxqYWEIjDiYRWWK680AatRs8IJwj' +
'KTH3wMBJOSEmC7waH/o2D5RpgvBAW2aMF1Qif+jkgUb+g8eKBU++y' +
'Yf5FQwrN7Z5+hf6cfmaIPXVznzAndntnQeiB+EBqW2ctz1OgfbDCu' +
'SxtUwBY7y15JG3x8BbPw/ws3A9K92StwO9/23wgKcHCAe+enCYvyI' +
'IjURk1sPS8eurfM4hfjnOCeiBzVIKii0gzzJIg3MGFP4uKGrPXn4A' +
'D7DcwwmxbNhvL1MVXB3f+Vo+IHM6vktYrkEycKBl5LDh0L/0yZsav' +
'lbz2zQHqOUDKXukCE1zgzZ3VXlgkpEkSKtxWgN8HA+Mza8I2KanH8' +
'h4oDVLZoAYbS1nWF0fSGtTB3NvdB6QSYEI6CfFO+ufzRAupcjPltF' +
'fMmosFQoPnL/+rQCZq7bLHwfwvgDfEXE+UHiglHReAPvoE/p0HhEB' +
'XdYJHd0ibJf/IAgDy8LgML8RkFOPy88MYJxGlnGez0oCuakv313ML' +
'x9dLzwjnMBAllOMtnbBcm3Owno/O/TgBG/OA+Ox1TC7z5b1NvV84D' +
'C9tBWbtC1kF5jMsYEHwAzSM4cDaNi7fG1hs5xKxAsIyO1ElNOANJR' +
'vMiBLlZsxXp4SP6Sdc9wPEgjgo2eeC5zRf0Z3qJ+E81dX9+Qw8UDY' +
'o1UIwQ/b+u9I/O2QGODmsyy0KZYjfQkwzIu0zAbDctmHqybHvoGTo' +
'MORXheyPAk3glwP7nEzGeZcYFaLkrWGqPKT1gpa8UvDcTkHSTtf7f' +
'OkwhiUq258d3Rq/4xo1oPbOUlIHYOxLDZ44XiY1wnZ5XCIOYUv+sl' +
'cQFDcqZRcQmT+/IazfflSlzEIqJbEAOkBI7cI4IH4xWBLHxuH5Vc/' +
'HtEqVhHvG04U0fiuWIaxm784kkA/LD/TQu12/kMhpQLhAX7uuzeL2' +
'qntjfuSu40n8A2YIEK1YY7v5O98rIMEGoRQG1Va9dDweJv+TcAl/W' +
'2hxiTCUekV1QihxktyCQ1uqfGA1KZFVgLxjYG3ZS+CvwkPcLf4S5H' +
'jmqQEKfzFXqJ8DfhcoqpAW0hAABjhOBig7IUKwAMc2fGR4T0PfPfm' +
'bj+hHhkC9wAq2NGnSk5K8uHQ3Uxh+uZQ0I07EJbP7HtjPhznlX8QA' +
't/Acf6/rPAAN0l5AAVtHS+M/ZQHPPCBB9LodhItpDD06J/yQPtPhE' +
'Yy8HA484lwVApnvaipYZoatWnHnw4TwirwEcclGRD8Npqn+cBh+Rf' +
'DYf6hqRbxhRnaVc4hIAGO+E4C55d/CA9IAWy9/At3z+bo');
SetupSRL;
t:= 10
repeat
ClickDesk;
Inc(t)
until(t=10)
FreeBitmap(Sayno);
FreeBitmap(Saythieving);
FreeBitmap(Saynexus);
end.


Alright, so I managed to get it to click the colour and stick to it. I'm now trying to figure out how to make it type these words into the chatbox when it sees the bitmap image. When I try to run it, I get an error "[Error] C:\Simba\Scripts\NexusThievV1.simba(18:7): Identifier expected at line 17
Compiling failed." If anyone could explain why this is happening, I'd greatly appreciate it.

EDIT: Yeah i luffs yeww, didn't mean to post that =p

i luffs yeww

2013-02-19 21:28:48

From: Namedontcare
http://file:///C:/Users/Owner/Desktop/Stuff/problemwithidentifier.html


Lol. That's not how files work, by the way. :)

EDIT: Add "end" before the "else" on line 17.

Namedontcare

2013-02-19 21:43:35

Program DeskThiever;
{$i srl/srl.simba}
var
Sayno: Integer;
Saythieving: Integer;
Saynexus: Integer;

Procedure ClickDesk;
var
X,Y: Integer;
begin
if FindColorTolerance(X, Y, 9554905, 264, 89, 264, 89, 10) then
begin
mmouse(x, y, 1,1);
wait(250);
ClickMouse(X, Y, mouse_Left)
if FindBitmapToleranceIn(Sayno, X, Y, 607, 421, 607, 421, 10) then
WriteLn('No')
else
if FindBitmapToleranceIn(Saythieving, X, Y, 584, 423, 584, 423, 10) then
WriteLn('Thieving')
else
if FindBitmapToleranceIn(Saynexus, X, Y, 553, 426, 553, 426, 10) then
WriteLn('Nexus');
end;
end;

var t: Integer;
begin
Sayno := BitmapFromString(236, 18, 'meJy9muGO2zYQhO/936AN/OOkH' +
'3VfoUDRoEhQxEGAAoHRFv2RV6nijedGM7Ok7q6tQRj0klyJ5MfRkt' +
'bjr58fZ2n97a9Ky/s/zx/+lrTZ8f3fpR8/fhmXcgWvzLfX3ao4OZh' +
'qZDwfh+hI6mpugx/tp3d/xKLNuBVx6ZapfGWQygnSZtkmHXn2U0Uw' +
'wsObt59RuuVRtOWraLOUvTKcmDT+udVEni9RV/H0w7sr7k3qcE8jF' +
'd0s/A9gH4e84xmtCuDxQohLoOM21jnC6jRhOgZgM97gbft2XFHB2e' +
'ZSxpvRBXWnW3OBHzzLipgCXD9Rpzw/7D+Z5Pff1qwocF16zGQ3Rxj' +
'kZwna6wHuRHUzxqvE+tP+5l5cwiXi+ET7ccgZ5q6JMMwwM7QnAp7l' +
'mrEXHWa9FeDl2ys4n54EaeE2YuyQA0IeKJnBdf+MltErV7FhBLjDu' +
'IzlTYpgPKjDXxm+BFxdhAcOx8tNGO6GCEM9luix0orbbuGwcnZSLJ' +
'jVvUU+OWZgWRax7TwjMKhvJ1Ykess7sWWpmt/99JGNJcUAQ25AUCz' +
'OI9U8TVOB5YkbCB0mXahmsGM8EIn1/GARvSy55gvA6AJjeRoK79Ry' +
'Tuq9WBjsAO9kmRhGeCD1JeB05uMqYESFVeYZkMPCVwTV4gGo4+oVS' +
'3QMrynk4PkSHR4J14xwYZhnn6XM+RRj90Rgcf53GY7d4XUnK50Z9l' +
'BhnM57AYkkR1E9rsMrhRysn4AKpdyvjnzxwN/+k3nG7XUMC8/8HUc' +
'GGC+278M4RHIOpsiwfA7qpz+F2T6GvGNycM/y1HCG/Wm1LaUTxZ8H' +
'1fhlDIsCi9IKw+s+AhG1RH1nmNGFJe7dmFLBW6IO8DkIOTgvoTJUV' +
'yiqoavoIha5kDqZolECGIrYycCbrya+UOxFtHd+HFfur0TdzNJD+l' +
'STykNnvH6E0yvHa0WN5frg2fdHC52huX1qkWjB/TPDbJ9u7nhvKD6' +
'lifcXedRx8UFeYIt5OOFSFhlpdcSt31I39Sy/sW3MF6XIr/0WwK8r' +
'60KQ85v02AzUxXmJnjnvertSAIP6zHzk3+0SIWPfx5bKl25XvmiM+' +
'SnA9c2l39r+8omL8OnYZgCOjO1rGB4A4HlX+yhT/CCWLg8Y3pJ3vw' +
'tjfI0MunCE4UHH4bmbi8HOq2NY6o/9wIIopSxdnrktzYe9O6CoJt/' +
'//HsXS7DPLmYe9GUAVeWPMMwYR7u75Q+T48C4n+c+PrbKYJg/Xr+u' +
'UptHtBWkkedtXdepKcNTPYmxBILtWGfK8ErBPLdiS6fJwhvvE2Xn6' +
'Hu9TofHcfK0L93YnhIk3JBLBzo8eFzKs7urf6ZNkN+S2GMdZrjy5/' +
'v53nqLb3cr7hYhH2HY+ez2ces+nMDHdfvIHK20YXQ/Zzpr8l0b158' +
'qM+en+skM+2Yw7ulkjXgswWfItcUb15fHEzobdVhY5blju4At3uQq' +
'YjynjRh77oqi//gI8FjC18tYRU/4i63feFY63dkbOPeG4nOhc7NYY' +
'bVQGQ0F0YdEAsfMnQbKuRk+HkuI/BaEjDcH4fKTUxlv43ZFB+Fwpa' +
'M2zt8yV5ZHnl/X3qg8qNapU9dw3ccVcg8deFVNDhkiTs/y+azET3n' +
'ptfwnEm/soH+Oh9n+uP+ngO0OxnL/N1nq4FBuuf9vwsjhJ97KkLgi' +
'xg8sxYKxMMz3jHMMIvbq4+BdFiReM8Wog//9v47PAYAHMHd3FYueU' +
'Ll8iW9HcIqvYcil4wrlmsKbZOpmfHGJIMgVfV10DEtpxy3ncYbsbZ' +
'ki8CYMsz7jbTeJIjzAWPYnz8v95R+Gmeuv94PEjWFuEhlGQtup7vn' +
'k+p+wYDiqyrOQjghJPqByyW9fxOeLQ/v0874WZH1FFLVTl6czPRHh' +
'8ZLx2WGYp9BCPzukB+9jOGxg2GOMCjBcfiUeJjKvUY2FUpfix/1rx' +
'kKyj1tHcjdrcUV06WC17nI+7yK/TzDf2Juq7nn/Z7feQAFMDI/Xl/' +
'ppGvp6Oe/3F11CVMy8OY1FXUcpw+l2vC/kOrzsj2IcWk8uvOfbyzx' +
'dbLzetXTZvz4qkbA8pyRI5szLwok4ubxwptMqjLl9oKUxKohNuqWh' +
'90YxiRRxX+BZZEG6A4u7kpFhupzhda85Ik14A42L3rzVCLkqIMoFs' +
'X6qIHFCVN2Y/gHRWLhB');

Saythieving := BitmapFromString(287, 20, 'meJzFnN1uGzcQhfX+18mFIxj2a' +
'i/sPkICFxGKGEVtBClgGGnQC79KaU11fPacGS5lF41BCNzZ4c8u5+' +
'MMKcpnn+7PPt1f3jx/trT9/PWMJNNvD5GuvjxGZnf7V/ucf//REu5' +
'K4rtNP4rgMu6G/PqPvz21u/j8KemX+yfPoz/SvXic9ClaWa5qNUVV' +
'SNJuS/zGRBMv1lO86hiRSgf1hP75l+9RiserCVtChbgbyiiy3T+0h' +
'Lsx+lwEyviEPmqA2URtoYkMKom7SNHDlomCKB62h1ssRytswGyxUF' +
'5NUk/LA6V2GflI0OG8t/uKxIP+s8jq27xA4crcvaqrp5LlqHawdRL' +
'7vKTEpfKw3lQ/TFemR2ENuCGFwSDP9TB3TI3A5dgGJkBJLJzNG/mm' +
'yTbMOLuJdqoawUrgAl8vLuyozPnBFG4u7TwPQWqulXn8D8SN01eBh' +
'lJBVp/QlM0KqFRnBKLVJO6po8l0xKdzBAWHju8yd8xUWNrm8OdUAj' +
'RBdZUshmLVQXRgEZ8Yn9HbDlziuaIeZD78+ucIX6Jzdfsd0Qj7LAS' +
'EHSuqjAejf5ILeDtZlRtqwrSVVH/1efOnuEuaSN9PKh+njymrighc' +
'TBnTdE4ksoNjHsVzsYcCXB5ApqiOgLNqwKmCOywHMHqbFuFQcLP8C' +
'6YCLvgvD2WRmpr7LzQNOngExbTmZbglw9o+ozbRD6GTVfE1At2g53' +
'qG6y7hyN0WX27sr8fdEq7OKxIvnzKC5ioAWbkimn1N5bzE/mfDjSG' +
'ajuEfWGtycU9eCvKI8eLTSRFbTU13R+s7BJ/sqjjjUWhYuAMIshoa' +
'0W0GjT1X6ETyXk3HGFKcF8PlwTmPWuikuIltMEouETMbAaq6m4Z2K' +
'Uqe79DNPR9B+AXkLIZMuahQYokHgS5JEd7ZUsvJWjiybP3VEmPCZh' +
'NkOUouccsXy4Q8YIGEW8RlCk4qYTkw8bgRO4TvPt45XKBJKkTEyI8' +
'jZOFFxWhGWFjBNWfRIxsSey6YpVy+haPKhqtokCmWatmd/bdwpY8z' +
'CBdbZuW5Vp2gICZ8pW4rRS/FROw2ClbzgyPpAZv7ndS/yK5Ip5Kq2' +
'pTKidZZ72++OVzwVryLGHA1GFMPm8LFkwk+0yEDX7ts02NT/w2a6C' +
'Bcq2qp42A5d9jpOwkur9/bSimIJniXz221GohT4RKf5VscogNwIhp' +
'k/7KjRRY6LEi6hwp55WicXHZMKOv6jm3l3Vw5hevyRuFiM0YwKebN' +
'NVe3XCjIsAFMx5WaT8XMlFgp1+aewm+NyKt62KrlKcStOK1pc3O2i' +
'hxp0VnguyBIHtbfLdeWViitS/zG1TII3A3pAwK2yrVBzYWboxV5FO' +
'c6AibnO6bLHsrlHpGypLOh4Wsx1M/6Mm9It1Mdfky8bY4hI8MTtY8' +
'vFFjZ82yu7mhYv7J8adTr945tlhRwqInoTppe7XnaE4cxnYtcIiFi' +
'5N278RBIbf3iwhEcFl9ynh1ctX0hEvi16bCOg5w9UZrvWGal3ymbe' +
'i4EeAKXQOTzQKd7nW60lV1fB8PHlIX/QojIcow+infM742eaLO0Iu' +
'+M98FjqhG4YgvFW+k8XYrz6+DyPLuwkEfBEbi4CYGL/Ui1TEvXZSl' +
'coplO9R2PtgqXh46cT1dbEhZ24EJPVtmPjUSXj8wb/H54sGZaF2Cw' +
'0nDFY7wNwQXbY/1UnuZH4PJ20z6Mw5U+HfeK/65tfRTyc1oloeYUL' +
'ul/WpuryXhVTQgCosnrNb6EPuZYSCovJquP+EPkyUIJBSsr7cg5Dh' +
'QXdkE7FQwXr7lWw7wRz8XzSSXnseAX6E7qcPl4SD/OM/ODp2OX4bH' +
'lq+Hq6HijEtkiL91w6+V9j+eCd09Ji3dP8UWYO8qO5/LwD3mZ0PgS' +
'HeOuuoeqqpVGebAcqzSMrIBiuSxM3OZRih1NVTbNiw7SxfF74cinc' +
'E2HQ1CRx+66jDsLff2VhpHMEd7JRN+F8Zvn2nxoeMTxrtIwb1N4NK' +
'FV5J1baf2VnLHCp3suRyNuMVxSbQqj+5qKguetPEMvfS6vLc1L8d1' +
'yPxA66Y7ETN/CCFmiz1bH35R5uOgWyxsOLKlCPvdo1V6H73hAElsW' +
'2Lt49/Fu9fiuzAaiOS9Py+/oiItccgrhYUAf8VZR4Uw785w/ZB4rT' +
'yFrkNRaoDmvbUpXdss1eOzn/jHU+EsrroFr7gSxXudJiUMCeerz02' +
'ur6mdMWD4tv/FkebX+2u4fRCfggkXJuVxc4pvrNHjzHT/nJRU6sGk' +
'eWDFT289fsdfBpEzLL75xF6cTU74ELn6ZiIQJpUcfIB8LsdW32B50' +
'cEYuJvY+WfNy5ndG+nD5VPBvbYcYj4ESuNIji46nTx2pi5wtDvTXk' +
'kr89TqwFVxVEChAcR7fhXlZtiLYm8AlVfFvTxyxiinWF8+FW3zoYr' +
'tXz+WsRanLwykOQUYIvbBjUXw5H/f9QBn3aj7+8KfBxUVSuJBQdtV' +
'TuNX5FA240nnYgZKYpyLXPWmV4ZDDo8fUOebGTwsxBj9lRN/PoWDq' +
'xPss++gwZas0weNUrHXOLrqxAS6uE1aHIxnOkeDGiYHi0JGrAlk4M' +
'QiauIfiyy6PP6JMzzhNxdknkCL+S/Bx5zUtf/YliPmAVohV5pSiWi' +
'VRYwRS2/YZPgUtsdsDFNz/6mg9n7/SDgRZBFcffK2nKJh2eOQF4nA' +
'Ig+CYBA4VPk4Ky7f7RVjInotB64AzkqblOi4k7Kr48G2kFs49lz2y' +
'gz7gh10R8kXU1zQ5/Eu9mLiq68OJXHZnPI3M9INl978O1/zi4BZmj' +
'8zrIsPU6pjoVXsT43e5e67OVFAVqZjVvh3h8lv8LKhZ5it5HEi8Kn' +
'kzbPYO17ycDGXOxPl2vrXd6yosFLCSAkpiPKkPOpWsiRZQH2gnMBK' +
'Hf+9vvrGQz7czREAMP+wKAFO4+EyvJ2B1fM/6jwImih5jFLZ79W5z' +
'HU4wa7i8un0J7dJ1QR+rnQUwgwX7IKc9qRDrpIrltN3BGSa95bh5z' +
'FC9QI80fOBc6FFfGgfKz1um5f4GjKcK8Nx/pcTJSfULI6uTGK5/AB' +
'togSo=');

Saynexus := BitmapFromString(344, 16, 'meJy9W9Fu3DYQvP8H+mLUaC6HQ' +
'6LTQ9y3okiRtkjhIIkR9IygRQOjLfrgXymttcajmSXFc9IKhLBaLi' +
'lK2pldUtLZ92/P5rL9+bqUb16+C+Hrn46lhNxfuMnz19fD209cWw6' +
'jsFzK4eovPnxEGT/8HaV0dfHrP1KKHvv/rnx7fduuZQM35uHVhiqd' +
'dJa4My6nt6in1CzLzU/1+/d/plVFWaq4tgghh4ASnaCEw0DmfqIKS' +
'vSwe/MJtUVGVZGjqmhCHwIX9jQ+LJbswzhF6s+NruR0sBT7tBPpp+' +
'yf/vJ7zYABWOBZ9sW47EECT15dlcPYO6JPKtE/UwE0GA/LneXF+xs' +
'8X7nP7C0psmqe/D+QQz9R1DgBrYIE2mSS0kgN+6lND95XCx5HgxyY' +
'IoDZsnfIw8D5gWuZIhj+8LT91FwIBJwgrLJKAozf1Vi2iut0v8oD3' +
'i0bOM8UebPcApicBnBWkJYnP3xoGzghDJQPxEggFCLqoQKxeXF1Hz' +
'ugYcdr47rm53DUkwLr55NALbgXZXqW1H71evOrOCanSO9Pqu8nCia' +
'EWhPhASYEBv6eSIPTBqYOyQc47gtpyN4NejC+6sCpQQpPB7XjPSWH' +
'FPjeapjyhMB+5AClgAoKrmMiUISUKKScU8LQkzagq2CAwgwB/+ABZ' +
'AUNAuQkJ3rDUy5CcapQsrMJCsZlvi0e6DzQgs/yFJ14dCqIMbtB6O' +
'944HjrNp4MNBKMNmUJDzRuEZAb40nh3I740m2NfDiC11ICgepozMC' +
'4Hub8f6D0QIJ+rWck+WUPr6uF3ZrrYgwonJ+I4NMQqW3wQEo43H+A' +
'DiRQ44GgAoa/U0GBcCklJThpjiD8A+xjbKGM4jdwmCcRzANAvWhka' +
'hBCcEXKDO7GDQiz83div1ZbwMsYDyzHnvVu00BTg1tWqUl6i/65N9' +
'aEvG8mAKualG0OtizgJLBID7K1ArEXVNaAzyUuk0EEHuDEgHENDZ8' +
'RhzWMr6JebDxi1iYUkgwEsjgDD9ydygM83/cE4PnlR4bzwyzg8qPz' +
'ANggilwUKIIvZ0sripyuyGHKA2M2fWCfT130JFD31DrcUsyCH8JSb' +
'CJJCEL4sjyQXk4nD3ja3y4XRsLOBmlwT6N2WstJgkMsGsJt/LyMes' +
'lC09y1FrVlsTEFbFrbThLa+UOAPZ1xs72n67wmkPJApAHOBlzVMy8' +
'QDhHSAEcVgzTFch6Q7TDPClPvAhUcsrVE0a+Cup8HgKbggTYViGeK' +
'gURSP2/Y12YKfjq/DykPyHju5OPtnubjnVnB43hAMgFfOXQGQJGoD' +
'Xs4jEQQ9jGO7KFx0EHPJxLQeaSuZfU1XLtxwx6T7gipnGZ7tGVslv' +
'k+XhQ2eIARJxh3fa1K+pFJCixDcBLYUYYGe3lweLhwWmQCMiRxb2w' +
'CHFHW9NJPD3XAUgTgMR1w7VztsztNpVed3pP0pGVjEvBxSvHT1c7F' +
'QTk2HDLDiMG4XF5IO5GI71TjCecuW2AXt0Ty3zADWt2GIRmbGLvAT' +
'dKeA+xQYnmQE+zQpHm+DFLAG4v/XPVlZb40uZO7ec2W9SxEKzaAq7' +
'DskTT0jhfWuyzxWmK39PkIHpD4KxQBmdcZZM0BBWuJURtpid8N4YE' +
'0G0Gr/bKHmswhvn3fGNrSjwhiiZ4lSUDmz8CHTRwOtHh4oFcMaDjM' +
'aw6hEfSx4zFU0/jl9pwGoK14/mbePDNJOWGgNwKRcnMP6fJgOtmP2' +
'jJNKEqx3Cy3GpaDbVwfZ3E9XwWG7TwgzLzQX35s38aLaREgzRM8sn' +
'D6Kpf8+TwgLISuYC9jwKFUpWOr8QCogEfbyGok+qcD7pSdVVyupT1' +
'yc5gHmFUE4wxtt5eVAdQO8xIizxqYWEIjDiYRWWK680AatRs8IJwj' +
'KTH3wMBJOSEmC7waH/o2D5RpgvBAW2aMF1Qif+jkgUb+g8eKBU++y' +
'Yf5FQwrN7Z5+hf6cfmaIPXVznzAndntnQeiB+EBqW2ctz1OgfbDCu' +
'SxtUwBY7y15JG3x8BbPw/ws3A9K92StwO9/23wgKcHCAe+enCYvyI' +
'IjURk1sPS8eurfM4hfjnOCeiBzVIKii0gzzJIg3MGFP4uKGrPXn4A' +
'D7DcwwmxbNhvL1MVXB3f+Vo+IHM6vktYrkEycKBl5LDh0L/0yZsav' +
'lbz2zQHqOUDKXukCE1zgzZ3VXlgkpEkSKtxWgN8HA+Mza8I2KanH8' +
'h4oDVLZoAYbS1nWF0fSGtTB3NvdB6QSYEI6CfFO+ufzRAupcjPltF' +
'fMmosFQoPnL/+rQCZq7bLHwfwvgDfEXE+UHiglHReAPvoE/p0HhEB' +
'XdYJHd0ibJf/IAgDy8LgML8RkFOPy88MYJxGlnGez0oCuakv313ML' +
'x9dLzwjnMBAllOMtnbBcm3Owno/O/TgBG/OA+Ox1TC7z5b1NvV84D' +
'C9tBWbtC1kF5jMsYEHwAzSM4cDaNi7fG1hs5xKxAsIyO1ElNOANJR' +
'vMiBLlZsxXp4SP6Sdc9wPEgjgo2eeC5zRf0Z3qJ+E81dX9+Qw8UDY' +
'o1UIwQ/b+u9I/O2QGODmsyy0KZYjfQkwzIu0zAbDctmHqybHvoGTo' +
'MORXheyPAk3glwP7nEzGeZcYFaLkrWGqPKT1gpa8UvDcTkHSTtf7f' +
'OkwhiUq258d3Rq/4xo1oPbOUlIHYOxLDZ44XiY1wnZ5XCIOYUv+sl' +
'cQFDcqZRcQmT+/IazfflSlzEIqJbEAOkBI7cI4IH4xWBLHxuH5Vc/' +
'HtEqVhHvG04U0fiuWIaxm784kkA/LD/TQu12/kMhpQLhAX7uuzeL2' +
'qntjfuSu40n8A2YIEK1YY7v5O98rIMEGoRQG1Va9dDweJv+TcAl/W' +
'2hxiTCUekV1QihxktyCQ1uqfGA1KZFVgLxjYG3ZS+CvwkPcLf4S5H' +
'jmqQEKfzFXqJ8DfhcoqpAW0hAABjhOBig7IUKwAMc2fGR4T0PfPfm' +
'bj+hHhkC9wAq2NGnSk5K8uHQ3Uxh+uZQ0I07EJbP7HtjPhznlX8QA' +
't/Acf6/rPAAN0l5AAVtHS+M/ZQHPPCBB9LodhItpDD06J/yQPtPhE' +
'Yy8HA484lwVApnvaipYZoatWnHnw4TwirwEcclGRD8Npqn+cBh+Rf' +
'DYf6hqRbxhRnaVc4hIAGO+E4C55d/CA9IAWy9/At3z+bo');
SetupSRL;
t:= 10
repeat
ClickDesk;
Inc(t)
until(t=10)
FreeBitmap(Sayno);
FreeBitmap(Saythieving);
FreeBitmap(Saynexus);
end.


It's not giving me the Identifier error anymore, but it is saying this: "The following bitmaps were not freed: [0, 1, 2]" and then stopping. I've defined the bitmaps as integers at the top of the script.

i luffs yeww

2013-02-19 23:02:54

From: Namedontcare
It's not giving me the Identifier error anymore, but it is saying this: "The following bitmaps were not freed: [0, 1, 2]" and then stopping. I've defined the bitmaps as integers at the top of the script.


You have `t := 10` before your repeat..until loop, and then you stop when t = 10, which it will never be at the end of the loop, as you increment the value by one before checking. So you have an infinite loop. If you take out that line it will end properly.

Namedontcare

2013-02-20 10:41:30

Thanks a lot for your help, I should be able to figure out the rest by myself. :)