SRL Archive - OSR Help

I've made my first script for Teak PowerChopping, and I'm trying to get the drop procedure to work, but to no avail. This script is really just a compilation of a bunch of other scripts, since there isn't a good teak powerchopper out at the moment. I keep getting the error message: [Error] Type mismatch at line 134. I'm fairly certain it's something rather simple I'm doing wrong, but if you guys could take a look at it and let me know where I went wrong, that would be awesome :D

Cheers,
Mister_iCon

[ATTACH]21334[/ATTACH]

not that i've used it, but

procedure MouseItem(I: Integer; button: Integer);

but you have used it like this

MouseItem(LogPattern, False);

use an int, not false would be my suggestion.

From: EngageTheRage
not that i've used it, but

procedure MouseItem(I: Integer; button: Integer);

but you have used it like this

MouseItem(LogPattern, False);

use an int, not false would be my suggestion.

So how would that work, like an example line? Cause from the tutorial I watched, that's exactly what he had, and he explained it as false was a right click, and true would be a left click? I'm trying to get the procedure to go through the set pattern that I give it and right click through that pattern.

so you are trying to right click and drop i take it? i tend to use MMouse so your code would look something like this:

For I:=0 To 27 Do
  Begin
    SlotBox:=InvBox(LogPattern[I]);
    If FindDTM(LogDTM, X, Y, SlotBox.X1, Slotbox.Y1, SlotBox.X2, SlotBox.Y2) Then
    Begin
      MMouse(X, Y, 3, 3);       // moves the move to the location +/- 3 in both x and y
      ClickMouse2(false);       // right clicks 
      ChooseOption('Dro');
    End;
  End; 

thats just how i do it though :D

From: EngageTheRage
so you are trying to right click and drop i take it? i tend to use MMouse so your code would look something like this:

For I:=0 To 27 Do
  Begin
    SlotBox:=InvBox(LogPattern[I]);
    If FindDTM(LogDTM, X, Y, SlotBox.X1, Slotbox.Y1, SlotBox.X2, SlotBox.Y2) Then
    Begin
      MMouse(X, Y, 3, 3);       // moves the move to the location +/- 3 in both x and y
      ClickMouse2(false);       // right clicks 
      ChooseOption('Dro');
    End;
  End; 

thats just how i do it though :D

Finally got it working, just substituted false for mouse_right

Am now trying to integrate in two drop patterns so that it isn't so basic, not quite sure how to do that though, some help would be lovely.

Error: Type mismatch at line 228

I'm pretty sure I need my I integer to represent both values, just not sure how to implement that..

Here's my code:

[ATTACH]21332[/ATTACH]