viewing paste Unknown #743 | C

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109
-       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;
        }
}
Viewed 267 times, submitted by unknown.