Started "scripting" today, im trying to understand, but im not just there yet.
Im making a simple Ironminer script for a old RSPS, what i want is to be able to watch a movie half screen when it's filling my inventory with Iron. I'll walk back to bank manually, cause i can do that without losing my focus on the movie.
So, this is my "script".
Program Ironminer;
//{$DEFINE SMART}
{$include SRL\SRL.simba}
{$i SRL\SRL\Misc\paintsmart.simba}
Procedure StatsGuise(wat:String);
Begin
Status(wat);
Disguise(wat);
End;
Function Mining:Boolean;
Var x, y: Integer;
Begin
// FindObjTPA(var x, y: integer; color, tol, cts, ObjWidth, ObjHeight, minCount :Integer; UpText: tstringarray): Boolean;
x:=MSCX;
y:=MSCY;
If FindObjTPA (x, y, 2240332, 20, 1, 20, 20, 200, ['Mine']) Then
Begin
Statsguise ('New window');
GetMousePos (x, y)
Begin
Mouse (x, y, 5, 5, False);
ClickMouse (x, y, 1)
End;
End;
End;
Begin
SetupSRL;
//Repeat
Mining;
//Until(false);
End.

