Jump to content

gmchocko

Members
  • Posts

    5
  • Joined

  • Last visited

Posts posted by gmchocko

  1. On 4/4/2018 at 12:39 AM, Vegas said:

    Thanks^^
    Edit: I get an error message.
     

    
    line 35
        parse_callfunc: expected ')' to close argument list
        30 :        next;
        31 :        set .@hg,getequipid(.@part); // Saving Item ID
        32 :        set .@ref,getequiprefinerycnt(.@part);  // Saving Refine Level, if there is one
        33 :        set .@card1,getequipcardid(.@part,0); // Save Item ID of Card Slot 1
        34 :        mes .n$;
    *   35 :        mes "Selected Costume Headgear: "+getitemname(getequipid(.@part)+"."';'
        36 :        mes "Now please select the Enchantment:";
        37 :        next;
        38 :        for ( set .@e,0; .@e < getarraysize(.enchant_id); set .@e,.@e + 1)
        39 :                set .@e_m$,.@e_m$ + "> "+getitemname(.enchant_id[.@e])+ ( (.enchant_id[.@e+1] != 0)?":":"");
        40 :        set .@rune,select(.@e_m$) - 1;

     

    hello! wat if this npc is not for free. how to  require pods or coins for payment?

  2. here's my script

     

     

    // http://rathena.org/board/topic/83017-pro-lotti-girl-refine-master/
    prontera,164,164,3    script    Lotti Girl    714,{
        mes "[Lotti Girl]";
        mes "Hello Sir! Are you out";
        mes "shopping in the city?!";
        next;
        mes "[Lotti Girl]";
        mes "I'm Lotti! I'll exchange cool";
        mes "random prizes for every";
        mes "^ff00001 Lottery Ticket^000000.";
        next;
        mes "[Lotti Girl]";
        mes "Our Grand prize is:";
        mes "^ff0000Costume Kirin Wing^000000";
        mes "Special prizes are:";
        mes "^ff0000Costume Flying Angel Wing^000000";
        mes "^ff0000____^000000";
        mes "and ^ff0000____^000000";
        next;
        mes "[Lotti Girl]";
        mes "You can still get random item";
        mes "if you failed to get the grand";
        mes "prize and special prizes.";
        if (countitem(7528) < 1)
            close;
        next;
        if(Weight >= MaxWeight/2) goto Low;

        Low:
        mes "You are Overweight!";
        close;

        next;
        if(select("Deal me in!:No way...")==2)
            close;
        mes "[Lotti Girl]";
        mes "Here we go...";
        delitem 7528,1;
        set .@Total,8;
        //<%>,<ItemID>,<Amount>
        setarray .@P1[0],0,8012,1;
        setarray .@P2[0],1,8011,1;
        setarray .@P3[0],5,8006,1;
        setarray .@P4[0],20,8010,1;
        setarray .@P5[0],90,13517,5;
        setarray .@P6[0],80,12080,10;
        setarray .@P7[0],90,30110,5;
        setarray .@P8[0],80,12075,10;
        setarray .@Default[0],30095,5;
        set .@i, rand(1,.@Total);
        if (rand(1,100) > getd(".@P"+.@i+"[0]"))
        {
            for(set .@j,0; .@j<getarraysize(.@Default); set .@j,.@j+2)
            {
                getitem .@Default[.@j], .@Default[.@j+1];
                if(!.@k[0])
                    setarray .@k[0], .@Default[.@j], .@Default[.@j+1];
            }
        }
        else{
            for(set .@j,1; .@j<getarraysize(getd(".@P"+.@i)); set .@j,.@j+2)
            {
                getitem getd(".@P"+.@i+"["+.@j+"]"), getd(".@P"+.@i+"["+(.@j+1)+"]");
                if (!.@k[0])
                {
                    set .@gz,.@i;
                    setarray .@k[0], getd(".@P"+.@i+"["+.@j+"]"), getd(".@P"+.@i+"["+(.@j+1)+"]");
                    break;
                }
            }
        }
        if(1<=.@gz&&.@gz<=4)
            announce "Congratulations! "+strcharinfo(0)+" just received "+getitemname(.@k[0])+" x "+.@k[1]+" from Lotti Girl (prontera 139 173)!",0;
        specialeffect2 248;
        close;
        
        OnInit:
        waitingroom "[Lotti Girl]",0;
        }
    }

  3. On 4/18/2012 at 1:25 AM, Nameless2you said:

    per character or per account..?

    I'll just make both..

    For account, meaning only 1 character in each account can ever get the item

     

    
    prontera,150,150,5 script Reward NPC 99,{
    
    set .@MaxBLevel,255; //Set your servers max base level here.
    set .@MaxJLevel,70;  //Set your servers max job level here.
    set .@item,501;      //Set your reward item here.
    
    if (BaseLevel != .@MaxBLevel && JobLevel != .@MaxJLevel && #LReward != 1) end;
    mes "Congratulations, you've achieve the max level in the server, here's your reward!";
    getitem .@item,1;
    set #LReward,1;
    close;
    
    }
     

     

    For character, meaning if he deletes the character he can get the reward again, or if he uses another character that is max level he can get the item once on that character as well..

     

    
    prontera,150,150,5 script Reward NPC 99,{
    
    set .@MaxBLevel,255; //Set your servers max base level here.
    set .@MaxJLevel,70;  //Set your servers max job level here.
    set .@item,501;      //Set your reward item here.
    
    if (BaseLevel != .@MaxBLevel && JobLevel != .@MaxJLevel && LReward != 1) end;
    mes "Congratulations, you've achieve the max level in the server, here's your reward!";
    getitem .@item,1;
    set LReward,1;
    close;
    
    }
    both same 

     

     

×
×
  • Create New...