i want the procedure to do the same job. there must be a shorter way to do it. how would i swap the bitmaps to search for the next one.
Code:procedure CountCargoBay; begin if(findbitmaptolerancein(MyCargo,cx,cy,1,25,1605,927,80))then begin if(findbitmaptolerancein(C0,x,y,1,25,1605,927,80))then begin CargoCount:= 0; Exit; end; if(findbitmaptolerancein(C1,x,y,1,25,1605,927,80))then begin CargoCount:= 1; Exit; end; if(findbitmaptolerancein(C2,x,y,1,25,1605,927,80))then begin CargoCount:= 2; Exit; end; if(findbitmaptolerancein(C3,x,y,1,25,1605,927,80))then CargoCount:= 3; end else begin writeln('Could Not Count Cargo'); end; end;



Reply With Quote








)

.

