-	script	Sample	-1,{
OnInit:
	bindatcmd "storage",strnpcinfo(0)+"::OnAtcommand";
	end;
OnAtcommand:
	if( strcharinfo(3) != "mapname" ){
		openstorage;
	}
	end;
}