-   script  Login_Events#login1 -,{
 
    callfunc "F_LOGINCOMMANDS";
    end;
 
OnPCLoginEvent:
    if(#autolootPC == 1) atcommand strcharinfo(0)+":@autoloot 100";
    if(#noks2PC$ == "") set #noks2PC$,"self";
    if(#noksPC == 1) atcommand strcharinfo(0)+":@noks "+#noks2PC$;
    // By default there are On, so we make an inverse check
    if(#showexpPC == 0) atcommand strcharinfo(0)+":@showexp";
    if(#showdelayPC == 0) atcommand strcharinfo(0)+":@showdelay";
    end;
}
 
function    script  F_LOGINCOMMANDS {
 
    mes "[GinRO]";
    mes "Please select a setting to modify it~";
L_StartLabel:
    next;
    // Autoloot
    if(#autolootPC == 0)
        { set .@menuPC$[0],"^CC6600Off^000000"; }
    else
        { set .@menuPC$[0],"^0066CCOn^000000"; }
    // NoKs
    if(#noksPC == 0)
        { set .@menuPC$[1],"^CC6600Off^000000"; }
    else
        { set .@menuPC$[1],"^0066CCOn^000000"; }
    // ShowExp
    if(#showexpPC == 0)
        { set .@menuPC$[2],"^CC6600Off^000000"; }
    else
        { set .@menuPC$[2],"^0066CCOn^000000"; }
    // Showdelay
    if(#showdelayPC == 0)
        { set .@menuPC$[3],"^CC6600Off^000000"; }
    else
        { set .@menuPC$[3],"^0066CCOn^000000"; }
    menu "@autoloot "+.@menuPC$[0],L_ALoot,"@noks "+.@menuPC$[1]+" ["+#noks2PC$+"]",L_NoKS,"@showexp "+.@menuPC$[2],L_ShowEXP,"@showdelay "+.@menuPC$[3],L_Showdelay,"Cancel",-;
 
    close;
 
L_ALoot:
    if(#autolootPC == 0) {
        set #autolootPC,1;
        set .@menuPC$[0],"^0066CCOn^000000";
        atcommand strcharinfo(0)+":@autoloot 100";
        goto L_StartLabel;
    } else {
        set #autolootPC,0;
        set .@menuPC$[0],"^CC6600Off^000000";
        atcommand strcharinfo(0)+":@autoloot 0";
        goto L_StartLabel;
    }
 
L_NoKS:
    if(#noksPC == 0) {
        set #noksPC,1;
        set .@menuPC$[1],"^0066CCOn^000000";
        switch(select("party","self","guild")) {
            case 1:
                set #noks2PC$,"party";
                atcommand strcharinfo(0)+":@noks party";
                goto L_StartLabel;
            case 2:
                set #noks2PC$,"self";
                atcommand strcharinfo(0)+":@noks self";
                goto L_StartLabel;
            case 3:
                set #noks2PC$,"guild";
                atcommand strcharinfo(0)+":@noks guild";
                goto L_StartLabel;
        }
    } else {
        set #noksPC,0;
        set #noks2PC$,"none";
        set .@menuPC$[1],"^CC6600Off^000000";
        atcommand strcharinfo(0)+":@noks";
        goto L_StartLabel;
    }
 
L_ShowEXP:
    if(#showexpPC == 0) {
        set #showexpPC,1;
        set .@menuPC$[2],"^0066CCOn^000000";
        atcommand strcharinfo(0)+":@showexp";
        goto L_StartLabel;
    } else {
        set #showexpPC,0;
        set .@menuPC$[2],"^CC6600Off^000000";
        atcommand strcharinfo(0)+":@showexp";
        goto L_StartLabel;
    }
L_Showdelay:
    if(#showdelayPC == 0) {
        set #showdelayPC,1;
        set .@menuPC$[3],"^0066CCOn^000000";
        atcommand strcharinfo(0)+":@showdelay";
        goto L_StartLabel;
    } else {
        set #showdelayPC,0;
        set .@menuPC$[3],"^CC6600Off^000000";
        atcommand strcharinfo(0)+":@showdelay";
        goto L_StartLabel;
    }
}