Jump to content

kurosuki

Members
  • Posts

    16
  • Joined

  • Last visited

Posts posted by kurosuki

  1. prontera,100,100,5    script    hourlypoints    139,8,11,{
    end;

    OnTouch:
        dispbottom "Stay here to get afk hourly points.";
        attachnpctimer();
        startnpctimer();
        end;

    OnTimer3600000:
        getmapxy(.@map$,.@x,.@y,0);
        if( distance(.x,.y,.@x,.@y)<=11
        && .@map$==.map$ ) {
            if( checkidle() ) {
                set #KAFRAPOINTS, #KAFRAPOINTS + .point_amt;
                dispbottom "You received "+.point_amt+" Kafrapoints by staying afk ingame for 1 hour";
                dispbottom "Current Balance = "+#KAFRAPOINTS+" Kafrapoints";
                set @consecutive_hour, @consecutive_hour + 1;

                //Check for 3 hours consecutive
                if(@consecutive_hour == 3) {
                    set @consecutive_hour,0;
                    set #KAFRAPOINTS, #KAFRAPOINTS + .cpoint_amt;
                    dispbottom "You receive "+.cpoint_amt+" Kafrapoints in afking for 3 consecutive hours";
                    dispbottom "Current Balance = "+#KAFRAPOINTS+" Kafrapoints";
                }
            }
            attachnpctimer();
            initnpctimer();
        } else {
            dispbottom "You left the afk area and will no longer receive Kafrapoints.";
            stopnpctimer();
        }
        end;

    OnInit:
        getmapxy(.map$,.x,.y,1);
        set .cpoint_amt, 50; //Points gained for consecutive time online.
        set .point_amt, 10; //Normal points gained.
    }

     

    Is it possible to remove Kafrapoint System and add

     

    200% HP Recovery

    200% SP Recovery

     

    As Long ur 11x11 Around The Npc?

  2. It seems it contains crusader bard etc? 

     

    Also the script dont work for some reason . thanks for helping me XD

     

    i cant find any errors


    script works :D but i thinks i explained wrong :/ i'm sorry

     

    I only want 

     

    Thief - Assassin

    Swordman - Knight

    Acolyte - Priest

    Merchant - Blackslith

    Archer - Hunter

    Magician - Wizard

  3. Can someone give or link me

    A Job Changer with no Trans or 3rd Jobs Classes?

    *Additional Request*

    -Classes-

    1st Grade :

    - Acolyte
    - Archer
    - Magician
    - Merchant
    - Swordman
    - Thief

    Item needed for Job Change :
    5.000 Zeny
    ??? Item they obtain trough A Quest


    2st Grade :

    - Priest
    - Hunter
    - Wizard
    - Blacksmith
    - Knight
    - Assassin

    Item needed for Job Change :
    500.000 zeny
    ??? Item they obtain trough A Quest

  4. Its a nice ideaa but what about charackter customization?

     

    Its good to know what ur fighting against since ragnarok is not only about Skills , but elements and stats and gear so u actualy never know 100% sure what to expect?

  5. prt_in,73,132,3 script Squishy Pinky Poring 1002,{ //poring

    if (checkquest(20501,HUNTING) != 0 || checkquest(20501,HUNTING) != 1) { //Active.

    mes "Still here?";

    mes "Go Continue killing 500 Porings";

    end;

    }

    if (checkquest(20501,HUNTING) != 2) { // Completed.

    mes "Po~~Poring~";

    mes "Your a great Poring Killer";

    emotion e_kis;

    close;

    }

    }

    }

    else {

    mes "[ " + strnpcinfo(1) + " ]";

    mes "Po~~Poring~";

    mes "Well Done";

    getexp 3000,500;

    erasequest 20501;

    close;

    }

    }

    }

    mes "[ " + strnpcinfo(1) + " ]";

    mes "Po~~Poring~";

    mes "You seek adventure?";

    next;

    switch(select("Yes:No")) {

    case 1:

    mes "[ " + strnpcinfo(1) + " ]";

    mes "Really?!";

    mes "That's great!";

    next;

    mes "[ " + strnpcinfo(1) + " ]";

    mes "Please kill 500 Porings";

    mes "The Reward will be of great Fortune";

    next;

    mes "Po~~Poring~";

    mes "Goodluck killing 500 Porings!";

    close2;

    setquest 20501;

    end;

    case 2:

    mes "[ " + strnpcinfo(1) + " ]";

    mes "Your Missing some great Treasure here";

    close;

    }

    }

     

    ---------------------------------------------

    ---------------------------------------------

     

    I think i screwed too much around :P can someone please help fix this.

    Thanks alot!

    }

  6. why do you duplicate threads?

    i did not Duplicate threads i'm following the Forum Rules.

     

    Scripting Support Rules

    • This section is - like all sections - affected by the general rAthena Board Rules.
    • You may post into this area to demand help concerning scripting code. Scripting code is the content of a file you will load to your server using the "npc: <path>" syntax.
    • You may only post into this area if you are willing to either write new or make changes to scripting code yourself. You can not expect other members to give you full working scripting code - you can be happy though if that happens nevertheless. That said, you might only receive a general advice how to solve your problem without any concrete scripting code. If you have no idea about scripting and want someone to write new or change scripting code for your, post it into the Script Requests.
    • For each new problem, you will have to open a new topic.
    • When you open a new topic, you will have to chose an informative topic title.
    • You have to clearly and elaborately describe your problem.
    • If you demand help for existing scripting code, you have to provide this scripting code in your topic.
    • If your map-server displays error messages concerning the problem you have, you will have to provide these error messages in your topic.
    • You will have to use the code bbcode tag whenever you would like to post either scripting code or map-server error message

    rule nr4. this is a new problem in my script. Emistry helped me Show the npc and fix my error showing in Map_server.dat

    Script is fixed thanks everyone who helped.



  7. // Sad Girl
    new_1-1,124,129,6 script Sad Girl 552,{ //4_F_STARFISHGIRL
    if (checkquest(20500) == -1) { //You don't have this quest.
    mes "Leave me alone!!...";
    next;
    mes "[ " + strnpcinfo(1) + " ]";
    mes "I said leave me alone!!...";
    next;
    mes "^009900[ " + strcharinfo(0) + " ]^000000";
    mes "Why are you crying?";
    mes "Is there something i can do.";
    next;
    mes "[ " + strnpcinfo(1) + " ]";
    mes "This dog stole Gold Pouch !";
    mes "He digged it beneath the ground";
    mes "And i cant find it anymore";
    next;
    mes "[ " + strnpcinfo(1) + " ]";
    mes "Do you want to help me search?";
    if (select("Help Search:Dont help") != 1) {
    mes "[ " + strnpcinfo(1) + " ]";
    mes "You Selfish Human Being!!";
    } else {
    mes "[ " + strnpcinfo(1) + " ]";
    mes "Thank you so much";

    setquest 20500;

    mes "[ " + strnpcinfo(1) + " ]";
    mes "There is a dighole around.";
    close2;
    end;
    }
    }
    if (checkquest(20500) == 2) { //Quest is completed.
    mes "Thanks for helping";
    close2;
    end;
    }
    if (checkquest(20000) == 0 || checkquest(20000) == 1) { //Active.
    if (countitem(7865) > 0) {
    mes "[ " + strnpcinfo(1) + " ]";
    mes "Oh my god, you found it!!";
    delitem 7865,1;
    next;
    completequest 20500;
    getexp 20,15;
    close;
    }
    }
    close;
    }



     

    [The Quest dont notice my item and dont complete quest.]

     

    No error shown in Map_Serv.dat

  8. I cant find the problem here.





    =====================================================
    // Sad Girl
    new_1-1,124,129,6 script Sad Girl 552,{ //4_F_STARFISHGIRL
    if (checkquest(20500) == -1) { //You don't have this quest.
    mes "Leave me alone!!...";
    next;
    mes "[ " + strnpcinfo(1) + " ]";
    mes "I said leave me alone!!...";
    next;
    mes "^009900[ " + strcharinfo(0) + " ]^000000";
    mes "Why are you crying?";
    mes "Is there something i can do.";
    next;
    mes "[ " + strnpcinfo(1) + " ]";
    mes "This dog stole Gold Pouch !";
    mes "He digged it beneath the ground";
    mes "And i cant find it anymore";
    next;
    mes "[ " + strnpcinfo(1) + " ]";
    mes "Do you want to help me search?";
    if (select("Help Search:Dont help") != 1) {
    mes "[ " + strnpcinfo(1) + " ]";
    mes "You Selfish Human Being!!";
    } else {
    mes "[ " + strnpcinfo(1) + " ]";
    mes "Thank you so much";
    next;

    setquest 20500;

    mes "[ " + strnpcinfo(1) + " ]";
    mes "There is a dighole around.";
    close2;
    end;
    }
    if (checkquest(20500) == 2) { //Quest is completed.
    mes "Thanks for helping";
    close2;
    end;
    }
    if (checkquest(20000) == 0 || checkquest(20000) == 1) { //Active.
    if (countitem(7865) > 0) {
    mes "[ " + strnpcinfo(1) + " ]";
    mes "Oh my god, you found it!!";
    delitem 7865,1;
    next;
    completequest 20500;
    getexp 20,15;
    close;
    end;
    }
    // Dighole
    new_1-1,122,125,6 script Dighole 557,{ //4_SOIL
    if( !GiveQuestItem1 ){
    set GiveQuestItem1,1;
    mes "[ " + strnpcinfo(1) + " ]";
    mes "You found the Gold Pouch";
    getitem 7865,1;
    } else {
    mes "Just and empty dighole";
    close;
    end;
    }
    // Dog who digged in Gold Pouch
    new_1-1,124,129,6 script Playfull Dog 81,{ //4_DOG01
    mes "[ " + strnpcinfo(1) + " ]";
    mes "Bark !!";
    close;
    end;
    }
    =====================================================


    i got this in mapserv.sql.bat



    [Error]: Missing 4 right curlys at file 'npc/custom/new/SQ_Sad_Girl.txt', line '83'.

    post-29838-0-27232200-1415382379_thumb.png

  9. Hello i'm currently Busy on a script all things work except

     

                  mes "BlaBlaBla";

    setquest 70001;  (it gives a total differen Quest)

                  next;

                  mes "Go do you're quest";

     

    this is just a sample.

     

    i added this to server/quest/db +@reloadquestdb

     

    // ChiiRO Main Story Qeusts.

    70001,0,0,0,0,0,0,0,"The Adventure Begings - Find Sir Wulpin"

     

    So i'm totaly wandering now

     

    i apreciate even the smallest help.

×
×
  • Create New...