R > @savealoot and @loadaloot command

[Quesooo]

As the tittle said 

 

can i request a savealoot and loadaloot command 

 

thank you masters

[llchrisll]

Now for dummy people like me, what exactly are those commands doing.

I kinda believe what, but better asking than being wrong.

[hendra814]

On 10/9/2018 at 6:45 PM, Quesooo said:

As the tittle said 

 

can i request a savealoot and loadaloot command 

 

thank you masters

Only for allotid not include @autoloot like before

so call @save to input all item you want to save

and then load it using @load

-	script	AutoSetting	-1,{
	end;	
	
OnLoadcommand:
		if (auto_settings & 1 << 0) atcommand "@alootid +"+auto_settings_alid_1;
		if (auto_settings & 1 << 0) atcommand "@alootid +"+auto_settings_alid_2;
		if (auto_settings & 1 << 0) atcommand "@alootid +"+auto_settings_alid_3;
		end;

	
OnSavecommand:
	while(1) {
		switch(
			select(
				"@alootid "+auto_settings_alid_1+" "+auto_settings_alid_2+" "+auto_settings_alid_3+" ["+((auto_settings & 1 << 1) ?"^00C000ON^000000":"^FF0000OFF^000000")+"]"
			)
		)
		{
			case 1:
				if (auto_settings & 1 << 0) {
					auto_settings_alid_1 = 0;
					auto_settings_alid_2 = 0;
					auto_settings_alid_3 = 0;
					auto_settings = auto_settings^1 << 0;
				} else {
					mes "Input Item ID #1";
					input .@itemid1;
					mes "Input Item ID #2";
					input .@itemid2;
					mes "Input Item ID #3";
					input .@itemid3;
					next;
					mes $cf$;
					mes "^808000==================================^000000";
					mes "Item ID #1 ^0000FF"+getitemname(.@itemid1)+"^000000 ("+.@itemid1+")";
					mes "Item ID #2 ^0000FF"+getitemname(.@itemid2)+"^000000 ("+.@itemid2+")";
					mes "Item ID #3 ^0000FF"+getitemname(.@itemid3)+"^000000 ("+.@itemid3+")";
					mes "^808000==================================^000000";
					next;
					if (select("Cancel","Ok") == 1) close;
						auto_settings_alid_1 = .@itemid1;
						auto_settings_alid_2 = .@itemid2;
						auto_settings_alid_3 = .@itemid3;
						auto_settings = auto_settings|1 << 0;
				}
				break;
		}
	}
	end;
		
OnInit:
	bindatcmd("save",strnpcinfo(0)+"::OnSavecommand",0,99);
	bindatcmd("load",strnpcinfo(0)+"::OnLoadcommand",0,99);
	end;
}

 

Edited October 26, 2018 by hendra814