Jump to content

Boneash

Members
  • Posts

    9
  • Joined

  • Last visited

Posts posted by Boneash

  1. prontera,149,159,5    script    Alex Seller    612,{
        mes "[Alex Seller]";
        mes "What would you like to do?";
        next;
        switch(select("White Slim Potion")) {
        
        case 1:
                input @amount,0,countitem(7227);
                if (countitem(7227) < 1) goto L_NE;
            if (countitem(547) >= 100) goto L_GA;
            delitem 7227,@amount;
            getitem 547,1000;
            close;
    
    L_NE:
            mes "[Alex Seller]";
            mes "I'm Sorry but you don't have enough TCG CARD.";
            close;
        L_GA:
            mes "[Alex Seller]";
            mes "Please use all your White Slim Potion first before buying.";
            close;    
        case 7:
            next;
            mes "[Alex Seller]";
            mes "Okay bye!";
            close;
        }
    OnInit:
    end;
    
    }

    what i mean is npc trader for consumbles
    example
    selling 100 potion for 1 tcg how many tcg do you want to spend.
    then admin can set how many btix per 1tcg?

  2. I made an npc seller with input confirm it's ok but my problem when buying 100 slim potions for 5 tcg is given to me is only 100 slim potions should only be 500. 1 tcg per 100 slim potion.


    here my script

        case 1:
                input @amount,0,countitem(7227);
                if (countitem(7227) < 1) goto L_NE;
            if (countitem(547) >= 100) goto L_GA;
            delitem 7227,@amount;
            getitem 547,1000;
            close;

  3. hello sir can you add this?

    can you arrange this to me sir?

     

    // Test NPC by Alex
    // Scripted by myself
    //
    // Learning scripting by myself
    // ==============================================
    prontera,139,211,5	script	Hat Maker#h1-1::Hat Maker	930,{
    npctalk "Hello"+strcharinfo(0)+"my name CrazyMan";
    next;
    mes "The purpose of this NPC is to";
    mes "provide you the quest of the latest";
    mes "headgears here in TESTRO!";
    mes "Would you like to brows on the new headgear?";
    H_top:
    menu "0-2",H_01,"Cancel",H_cancel;
    end;
    
    //__________Hat List__________//
    
    H_01:
    menu
    
    "Alice Doll",I_alice,
    "Hockey Mask",I_hockey,
    "Return to Menu",H_top;
    
    //____________Item requirements____________//
    
    
    //__________Model___________//
    //I_;
    //        next;
    //        mes "";
    // menu "Make",M_,"Return To Menu",H_top;
    
    I_alice:
    next;
    mes "5x Marionett Dolls";
    mes "100x Alice's Apron";
    mes "5x Soft Apron";
    menu "Make",M_alice,"Return to Menu",H_top;
    
    I_hockey:
    next;
    mes "200x Suspicious Hat";
    mes "2x Blank Eyes";
    mes "10x Gold";
    mes "10x TCG Card";
    menu "Make",M_hockey,"Return to Menu",H_top;
    
    
    //____________model______________//
    //M_:
    //      if(countitem()< || countitem()< || Zeny < )
    //      goto M_insufficient;
    //      delitem ,;
    //      delitem ,;
    //      set zeny,zeny-;
    //      getitem ,;
    //      close;
    
    M_alice:
    if(countitem(5141)<5 || countitem(7047)<100 || countitem(661)<5)
    goto M_insufficient;
    delitem 5141,5;
    delitem 7047,100;
    delitem 661,5;
    getitem 5137,1;
    close;
    
    M_hockey:
    if(countitem(7567)<200 || countitem(5102)<2 || countitem(969)<10 || countitem(7227)<10)
    goto M_insufficient;
    delitem 7567,200;
    delitem 5102,2;
    delitem 969,10;
    delitem 7227,10;
    getitem 5314,1;
    close;
    
    //________not enough or not the correct items________
    
    M_insufficient:
    next;
    mes "CrazyMan I am sorry";
    mes "You don't have the required materials.";
    mes "Please come back when you do...";
    close;
    
    OnEnable:
    waitingroom "Expires: "+getAutoNPCActiveExpiration(strnpcinfo(3)),0;
    end;
    OnDisable:
    delwaitingroom;
    end;
    OnInit:
    //start on june 1 and finish on june 30
    registerAutoNPC "6","1","30",strnpcinfo(3),"Soul Quest Special Event limited quest (prontera 143,211)";
    end;
    }

     

  4. can you help me with my custom script? its working a bit then i add next line

    its not showing up anymore. can you help me what missing in line? thanks!

    here my sample test custom scripts

    //Test Alex HAT MAKER
    // Scripted by Alex
    //
    // Test Tutorial by Alex
    // ==============================================
    prontera,140,209,3	script	Hat Maker#h1-1::Hat Maker	930,{
        npctalk "Hello "+strcharinfo(0)+"my name CrazyMan";
        next;
        mes"The purpose of this NPC is to";
        mes"provide you the quest of the latest";
        mes"headgears here in TESTRO!";
        mes"Would you  like to brows on the new headgears?
        goto H_top;  
    
     H_top:
     menu "0-2",H_01,"Cancel",H_cancel;
    
    //__________Hat List__________//
    
     H_01:
     menu
    
     "Alice Doll",I_alice,
     "Hockey Mask",I_hockey,
     "Return to Menu",H_top;
    
    //_____________Item requirements_______________//
    
    
    //________model___________//
    //I_:
    //      next;
    //      mes "";
    //      menu "Make",M_,"Return to Menu",H_top;
    
     I_alice:
         next;
         mes "5x Marionett Dolls";
         mes "100x Alice's Apron";
         mes "5x Soft Apron";
         menu "Make",M_alice,"Return to Menu",H_top;
    
     I_hockey:
         next;
         mes "200x Suspicious Hat";
         mes "2x Blank Eyes";
         mes "10x Gold";
         mes "10x TCG Card";
         menu "Make",M_hockey,"Return to Menu",H_top;
    
    
    //____________model______________//
    //M_:
    //      if(countitem()< || countitem()< || Zeny < )
    //      goto M_insufficient;
    //      delitem ,;
    //      delitem ,;
    //      set zeny,zeny-;
    //      getitem ,;
    //      close;
    
     M_alice:
         if(countitem(5141)<5 || countitem(7047)<100 || countitem(661)<5)
         goto M_insufficient;
         delitem 5141,5;
         delitem 7047,100;
         delitem 661,5;
         getitem 5137,1;
         close;
    
     M_hockey:
         if(countitem(7567)<200 || countitem(5102)<2 || countitem(969)<10 || countitem(7227)<10)
         goto M_insufficient;
         delitem 7567,200;
         delitem 5102,2;
         delitem 969,10;
         delitem 7227,10;
         getitem 5314,1;
         close;
    
    //________not enough or not the correct items________
    
     M_insufficient:
         next;
         mes "CrazyMan I am sorry";
         mes "You don't have the required materials.";
         mes "Please come back when you do...";
         close;
    
     H_cancel:
    
     close;
    
     OnInit:
    
     waitingroom "Limited QUEST EVENT",0;
    
     end;
    }

     

     

  5. gumawa ako ng custom npc ko kaso nung niload ko walang lumalabas

    pa fix nmn to mga paps 

     

    eto

    gusto ko mangyari ganito sana

    Hello name, my name is crazyman.

    msg
    The purpose of this NPC is to
    provide you the quest of the latest
    headgears here in TestRO!
    Would you like to brows on the new
    headgears?
    NEXT
    Here are the quest items you can
    aquire in this NPC.
    NEXT
    item
    item
    item
    so you want item
    headgear huh.
    Here are the things you need for
    it!
    NEXT
    quest items
    NEXT
    you meet requirement?
    NEXT
    yes!
    nope. 
    I am sorry but you simply are short
    of the requirements!
    please come again.

    //Test Alex HAT MAKER
    // Scripted by Alex
    //
    // Test Tutorial by Alex
    // ==============================================
    prontera,140,209,3	script	Hat Maker#h1-1::Hat Maker	930,{
        npctalk "Hello "+strcharinfo(0)+"my name CrazyMan";
        next;
        mes"The purpose of this NPC is to";
        mes"provide you the quest of the latest";
        mes"headgears here in TESTRO!";
        mes"Would you  like to brows on the new headgears?
        goto H_top;  
    
     H_top:
     menu "0-2",H_01,"Cancel",H_cancel;
    
    //__________Hat List__________//
    
     H_01:
     menu
    
     "Alice Doll",I_alice,
     "Hockey Mask",I_hockey,
     "Return to Menu",H_top;
    
    //_____________Item requirements_______________//
    
    
    //________model___________//
    //I_:
    //      next;
    //      mes "";
    //      menu "Make",M_,"Return to Menu",H_top;
    
     I_alice:
         next;
         mes "5x Marionett Dolls";
         mes "100x Alice's Apron";
         mes "5x Soft Apron";
         menu "Make",M_alice,"Return to Menu",H_top;
    
     I_hockey:
         next;
         mes "200x Suspicious Hat";
         mes "2x Blank Eyes";
         mes "10x Gold";
         mes "10x TCG Card";
         menu "Make",M_hockey,"Return to Menu",H_top;
    
    
    //____________model______________//
    //M_:
    //      if(countitem()< || countitem()< || Zeny < )
    //      goto M_insufficient;
    //      delitem ,;
    //      delitem ,;
    //      set zeny,zeny-;
    //      getitem ,;
    //      close;
    
     M_alice:
         if(countitem(5141)<5 || countitem(7047)<100 || countitem(661)<5)
         goto M_insufficient;
         delitem 5141,5;
         delitem 7047,100;
         delitem 661,5;
         getitem 5137,1;
         close;
    
     M_hockey:
         if(countitem(7567)<200 || countitem(5102)<2 || countitem(969)<10 || countitem(7227)<10)
         goto M_insufficient;
         delitem 7567,200;
         delitem 5102,2;
         delitem 969,10;
         delitem 7227,10;
         getitem 5314,1;
         close;
    
    //________not enough or not the correct items________
    
     M_insufficient:
         next;
         mes "CrazyMan I am sorry";
         mes "You don't have the required materials.";
         mes "Please come back when you do...";
         close;
    
     H_cancel:
    
     close;
    
     OnInit:
    
     waitingroom "Limited QUEST EVENT",0;
    
     end;
    }

     

×
×
  • Create New...