HI NEED HELP IN FISHING

[Chellevin 0]

how can i prevent the character for abusing the fishing.. in my case my fishing script is just click the fishing hole then leave your character.. all night long.. how can i prevent that?? here is my fishing script

prontera,160,172,0	script	Fishing Hole	723,{
	
//Fishing rod
set .@Rod,2764;
//Fishing Lure
set .@Lure,2775;
//Auto-Fish
set .@Auto,1;
//Auto-Fish on Fail
set .@AutoFail,1;
Fish:
	if (isequipped(.@Rod)) && (isequipped(.@Lure)){
		specialeffect EF_BUBBLE,"Fishing Hole";
		dispbottom "[Fishing] Casting...";
		set .@fcast,15;
			if (isequipped(2550)) { //Fisher's Muffler
				set .@fcast,.@fcast - 2;
			}
			if (isequipped(2443)) { //Fisher's Boots
				set .@fcast,.@fcast - 2;
			}
			if (isequipped(2764)) { //Fishing Pole
				set .@fcast,.@fcast - 3;
			}
			if (isequipped(2775)) { //Fishing Lure
				set .@fcast,.@fcast - 1;
			}
		progressbar "ffffff",.@fcast;
		if (rand(1,100) == 4){
		getitem 7539,5; //Fish with Blue Back
		specialeffect2 EF_TEMP_OK;
		mapannounce strcharinfo(3),strcharinfo(0)+" has caught a Fish with Poring Coin!",bc_map,"0xff77ff";
		if(.@Auto==1){
		goto Fish;}else{
		end;}
		}
			if (rand(1,6) == 1) ||(rand(1,6) == 3) || (rand(1,6) == 6){
			setarray .@Catch[0],607,603,14232,7227;// List of Junk/Other
			set .@CatchRand,.@Catch[rand(getarraysize(.@Catch))];
			getitem .@CatchRand,1;
			}
			else {
			dispbottom "[Fishing] Nothing was caught...";
			if(.@AutoFail == 1){
			goto Fish;} else{
			end;}
			}
		if (rand(1,100) == 3){
		setarray .@Rare[0],674,7227,13517;
		set .@RareCatch, .@Rare[rand(getarraysize(.@Rare))];
		getitem .@RareCatch,1; //Reward
		mapannounce strcharinfo(3),strcharinfo(0)+" has caught a "+getitemname(.@RareCatch)+"!",bc_map,"0x33CC00";
		}
		if(.@Auto == 1){
		goto Fish;} else{
		end;}
		}
	else {
	dispbottom "[Fishing] You need a Rod and Lure.";
	end;
	}
}

Use code box next time please. Thanks! -Aeromesi

[HappyMan 0]

prontera,129,192,5	script	Fisher Man::Fisher	709,{
	mes "Hello There!";
	mes "Want to go Fishing?";
	mes "You need 100 Butil ng Bigas for the Entrance Fee";
	next;
	mes "You still need";
	mes "15 Butil Ng Bigas";
	mes "To catch a Fish";
	next;
	mes "Still want to go?";
	menu "Yeah",yes,"No",no;
no:
	mes "okay";
	close;
yes:

if( countitem( 7539 ) >= 100 ){
	warp "lhz_dun05",209,133;
	delitem 7539,100;
}	
	else {
		mes "You Need 100 Butil Ng Bigas to get In.";
		close;

}
}


lhz_dun05	mapflag	nowarp
lhz_dun05	mapflag	noteleport
lhz_dun05	mapflag	nomemo
lhz_dun05	mapflag	nogo 
lhz_dun05	mapflag	nodrop
lhz_dun05	mapflag	nosave
lhz_dun05	mapflag	nobranch





lhz_dun05,213,130,4	script	Fishing Spot::fishing	1158,{
	if(countitem(7539) > 15){
delitem 7539,15;
		specialeffect2 EF_BUBBLE;

			if (rand(1,20) == 2) {
				getitem 7539,50; //Bnb
				specialeffect EF_BUBBLE;
				announce "" + strcharinfo(0) + " Ay Nakakuha ng Isang Kilong Bigas Sa Pangingisda!!!",bc_map,"0xff77ff";
				end;
			}
		set .@rhea_ran,rand(1,70);
		if (.@rhea_ran < 20) {
			getitem 604,1; //Dead Branch
		}
		else if (.@rhea_ran == 20) {
			getitem 678,1; //Gayuma
		}
		else if (.@rhea_ran == 21) {
			getitem 909,2; //Jellopy
		}
		else if (.@rhea_ran == 22) {
			getitem 14232,10; //Yggdrasil Berry Box
		}
		else if (.@rhea_ran == 23) {
			getitem 7227,1; //B-RO Card
		}
		else if (.@rhea_ran == 24) {
			getitem 7227,1; //B-RO Card
		}
		else if (.@rhea_ran == 25) {
			getitem 14232,10; //Yggdrasil Berry Box
		}
		else if (.@rhea_ran == 26) {
			getitem 678,1; //Gayuma
		}
		else if (.@rhea_ran == 27) {
			getitem 604,10; //Dead Branch
		}
		else if (.@rhea_ran == 28) {
			getitem 678,1; //Gayuma
		}
		else if ((.@rhea_ran > 28) && (.@rhea_ran < 40)) {
			getitem 12103,1; //bloody
		}
		else {
			close;
		}
		if (rand(1,200) == 3) {
			getitem 7539,50; //bnb
		}
		if (rand(1,500) == 3) {
			getitem 7828,50; //bnb
			mapannounce "prontera","" + strcharinfo(0) + " Has Caught 50 Badges From Fishing",bc_map,"0x00ffff";
		}
		if (rand(1,3000) == 3) {
			getitem 12103,100; //bloody Branch
			mapannounce "prontera","" + strcharinfo(0) + " Has Caught an 100 Bloody Branch!!",bc_map,"0x44ff44";
		}
		end;
	}
	else {
		mes "You Need 15 Butil ng bigaS.";
		close;
	}
}

lhz_dun05,206,137,1	duplicate(fishing)	Fishing Spot#10	1158
lhz_dun05,213,123,1	duplicate(fishing)	Fishing Spot#11	1158
lhz_dun05,206,116,1	duplicate(fishing)	Fishing Spot#12	1158
lhz_dun05,208,116,1	duplicate(fishing)	Fishing Spot#13	1158
lhz_dun05,210,116,1	duplicate(fishing)	Fishing Spot#14	1158
lhz_dun05,208,123,1	duplicate(fishing)	Fishing Spot#15	1158
lhz_dun05,210,123,1	duplicate(fishing)	Fishing Spot#16	1158
lhz_dun05,212,139,1	duplicate(fishing)	Fishing Spot#17	1158

try this one.