SRL Archive - MSI Suggestions

Some objects for fishing


3Garrett3

2010-06-21 22:20:46

I heard RM was thinking about making a fisher, and I know that MSI is planning on maybe incorporating a fisher at some point, so I have some objects that might be helpful. No commit privs, so I'll post here:

Add to objects.scar:


OBJ_FISH_NET: // 3Garrett3
with Result do
begin
Name := 'Net Spot';
UpText := 'ishing';
Option := 'Net';
Colors := [11248543];
Tol := 7;
Hue := 0.23;
Sat := 0.36;
FindAllColors := False;
W := 15;
H := 15;
Accuracy := 10;
ExcludeSelf := True;
RightClickOnly := False;
Tries := 5;
Anim := False;
WaitToMove := True;
BadColors := [];
BadColorTolerance := 10;
end;

OBJ_FISH_BAIT: // 3Garrett3
with Result do
begin
Name := 'Bait Spot';
UpText := 'ishing';
Option := 'Bait';
Colors := [11248543];
Tol := 7;
Hue := 0.23;
Sat := 0.36;
FindAllColors := False;
W := 15;
H := 15;
Accuracy := 10;
ExcludeSelf := True;
RightClickOnly := True;
Tries := 5;
Anim := False;
WaitToMove := True;
BadColors := [];
BadColorTolerance := 10;
end;

OBJ_BANK_DB: // 3Garrett3
With Result Do
Begin
Name := 'Draynor bank';
UpText := 'ooth';
Option := 'uick';
Colors := [802132];
Tol := 6;
Hue := 0.03;
Sat := 0.25;
FindAllColors := False;
W := 40;
H := 40;
Accuracy := 40;
ExcludeSelf := True;
RightClickOnly := True;
Tries := 5;
Anim := False;
WaitToMove := True;
BadColors := [];
BadColorTolerance := 10;
End;

I have tested them quite a bit, but they may be off. It was about 2 hours of work getting all of the colours for ACA and figuring out how to declare objects and everything, so I hope I did it right.

The following should be added to Globals.scar:


OBJ_BANK_DB = 12;

OBJ_FISH_NET = 13;
OBJ_FISH_BAIT = 14;

I just added them in after the currently existing ones.

I hope some of this might be helpful, who knows. If not, let me know and I'll do my best to collect more colours and such.

NCDS

2010-06-21 22:37:34

Committed.

Sir R. M8gic1an

2010-06-22 05:33:05

Garrett, PM Wizzup the username and PW you'd like for the MSI svn ;)

~RM