Jump to content

Leaderboard

Popular Content

Showing content with the highest reputation on 11/25/18 in all areas

  1. Version 1.0.0

    884 downloads

    Hello everyone! I'm maken06. This is my second monster, enjoy it ? Don't steal credits, give credits to me, that I cost my effort to do them. Do Not edit my work without my permission, It includes recolors. pd: Do not forget to give me a reputation or reaction
    Free
    3 points
  2. that is the solution, apply it to your server as shown in the commit.
    2 points
  3. Hi guys, while I'm in the army, I was very bored and I decided to work FluxCP. I can answer all questions in PM.
    1 point
  4. Is it a custom command do you have? if not, use this: OnPCDieEvent: .@map$ = strcharinfo(3); if(inarray(.map$,.@map$) != -1){ for(.@y = 5; .@y; .@y--){ message strcharinfo(0),"You will respawn in "+.@y+" second"+((.@y > 1)?"s":"")+"."; sleep2 1000; } recovery 0; repairall; if(.size_buffs) { for(;.@i < .size_buffs;.@i+= 3) sc_start .buffs[.@i],.buffs[.@i + 1],.buffs[.@i + 2]; } warp .@map$,0,0; } end; OnInit: setarray .map$, "pvp_y_1-2","guild_vs2","guild_vs3"; // Buff Duration(ms) Lvl setarray .buffs, SC_INCREASEAGI, 5*60*1000, 10, SC_BLESSING, 5*60*1000, 10; .size_buffs = getarraysize(.buffs); end; You can add all the buffs you want in .buffs array.
    1 point
  5. I didn't understand very well, but here you go: prontera,100,100,4 script Event 100,{ if(.event_open) { cutin "cutin",1; sleep2 5000; warp "map",x,y; } else { mes "Event is not open."; } close; OnMinute00: if(gettime(DT_HOUR)%4 == 0) { .event_open = 1; announce "Event is open for 5 minutes.",bc_all|bc_blue; sleep 5*60*1000; // 5 minutes open .event_open = 0; } end; }
    1 point
  6. You can use the Hikirikawa script and add maps in the array you see in the end. I edited the script a bit to use inarray rather than the loop it used. OnPCDieEvent: .@map$ = strcharinfo(3); if(inarray(.map$,.@map$) != -1){ for(.@y = 5; .@y; .@y--){ message strcharinfo(0),"You will respawn in "+.@y+" second"+((.@y > 1)?"s":"")+"."; sleep2 1000; } recovery 0; warp .@map$,0,0; } end; OnInit: setarray .map$, "pvp_y_1-2","guild_vs2","guild_vs3"; end;
    1 point
  7. https://www.youtube.com/watch?v=sKwfejUfhlo In this video it will teach you how you can install and run ragnarok offline server using the rathena emulator. Make sure to download and install the prerequisites first. ~~ Prerequisites ~~ ► Visual Studio Express 2017 ► MSysGit ► TortoiseGit ► Wamp Server ► rAthena Github
    1 point
  8. Isn't this basically the same thing? Lmao, anyways either will do. ^ Change the event label to what this guy says, sorry, my mistake.
    1 point
  9. https://github.com/rathena/rathena/commit/efd61daeea454b936943430ad8be308df0ca5ca9#comments
    1 point
  10. change : ONPCDieEvent: to OnPCDieEvent
    1 point
  11. 1 point
  12. hi Haziel , do you know how to change item requirement to play lucky roulette feature. Example : Official = need 1 bronze coin Custom = Need 10 bronze coin, where file to change it??
    1 point
  13. Hello there @Questune09, >>>>> step 1: after finshing the quest, under getitem ( the prize ) add this : set CooldownQuest,gettimetick(2); step 2: and before taking the quest add time check: if(gettimetick(2) - CooldownQuest < (60 * 60 * 24)) { next; mes "[ Daily Quest ]"; mes "^FF0000Sorry you have to wait 24 Hours until you can do the Quest again!^000000"; close; } <<<<< or use this prt_in,82,93,2 script Daily Quest 513,{ if (getgmlevel() >= 80) goto GM_Menu; L_START: if (getgmlevel() >= 80) next; mes "[ Daily Quest ]"; mes "Total Daily Quests Finished: ^008800"+$DailyQuestTotal+"^000000."; mes "Today Daily Quests Finished: ^0000FF"+$DailyQuestToday+"^000000."; next; mes "[Daily Quest]"; mes "Hello "+strcharinfo(0)+"!"; mes "Do you want to start today's Quest?"; mes " "; menu "Yes!",-,"Nahh",L_Close; if(gettimetick(2) - CooldownQuest < (60 * 60 * 24)) { next; mes "[ Daily Quest ]"; mes "^FF0000Sorry you have to wait 24 Hours until you can do the Quest again!^000000"; close; } next; mes "[Daily Quest]"; mes "You'll need these item for Today's Quest:"; mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+""; mes "^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+""; mes "^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+""; mes "In exchange you will get ^0000FF"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+""; next; mes "[Daily Quest]"; mes "Do you have the items?"; menu "Yes! I do.",-,"Gimme some time.",L_Close; if(countitem($QuestItem1) >= $QuestItem1HM) && (countitem($QuestItem2) >= $QuestItem2HM) && (countitem($QuestItem3) >= $QuestItem3HM) goto FinishQuest; next; mes "[Daily Quest]"; mes "You only have "+countitem($QuestItem1HM)+" of ^FF0000"+getitemname($QuestItem1)+"^000000, "+countitem($QuestItem2HM)+" of ^FF0000"+getitemname($QuestItem2)+"^000000, "+countitem($QuestItem3HM)+" of ^FF0000"+getitemname($QuestItem3)+"^000000."; mes "Come back when you have it! Better get the items quickly. It's gonna change in a Day!"; close; L_Close: next; mes "[Daily Quest]"; mes "Come back again! Get the Items!"; mes "Goodbye!"; close; GM_Menu: mes "[Daily Quest]"; mes "Hello GM "+strcharinfo(0)+"!"; mes "What can I do for you today?"; menu "Player Menu",L_START,"Change Today's Quest/Prize",L_ChangeQuest,"Close",L_Close; L_ChangeQuest: next; mes "[Daily Quest]"; mes "What will you like to change?"; next; menu "Go back.",GM_Menu,"Prize [^0000FF"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+"]",L_ChangePrize,"Change Quest Randomly",L_ChangeQuestRandom,"Change Quest by Myself",L_ChangeQuestMyself; L_ChangeQuestMyself: next; mes "[Daily Quest]"; mes "Which item would you like to change first?"; menu "Go Back.",L_ChangeQuest,"Item 1 [^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+"]",L_ChangeItem1,"Item 2 [^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+"]",L_ChangeItem2,"Item 3 [^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+"]",L_ChangeItem3; L_ChangeItem1: next; mes "[Daily Quest]"; mes "Alright. What will be the item?"; next; input $QuestItem1; next; L_ChangeItem12: mes "[Daily Quest]"; mes "How much of ^ff0000"+getitemname($QuestItem1)+"^000000 do you want?"; mes "It must be in the range of ^0088001 ~ 200^000000."; next; input $QuestItem1HM; next; if ($QuestItem1HM > 200) goto L_HMItem1Denied; mes "[Daily Quest]"; mes "Item 1 Set."; set $DailyQuestToday,0; mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+"."; next; goto L_ChangeQuest; L_HMItem1Denied: mes "[Daily Quest]"; mes "This item (^ff0000"+getitemname($QuestItem1)+"^000000) must be in a range of ^0088001 ~ 200^000000."; next; goto L_ChangeItem12; L_ChangeItem2: next; mes "[Daily Quest]"; mes "Alright. What will be the item?"; next; input $QuestItem2; next; L_ChangeItem22: mes "[Daily Quest]"; mes "How much of ^ff0000"+getitemname($QuestItem2)+"^000000 do you want?"; mes "It must be in the range of ^0088001 ~ 150^000000."; next; input $QuestItem2HM; next; if ($QuestItem2HM > 150) goto L_HMItem2Denied; mes "[Daily Quest]"; mes "Item 2 Set."; set $DailyQuestToday,0; mes "^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+"."; next; goto L_ChangeQuest; L_HMItem2Denied: mes "[Daily Quest]"; mes "This item (^ff0000"+getitemname($QuestItem2)+"^000000) must be in a range of ^0088001 ~ 150^000000."; next; goto L_ChangeItem22; L_ChangeItem3: next; mes "[Daily Quest]"; mes "Alright. What will be the item?"; next; input $QuestItem3; next; L_ChangeItem32: mes "[Daily Quest]"; mes "How much of ^ff0000"+getitemname($QuestItem3)+"^000000 do you want?"; mes "It must be in the range of ^0088001 ~ 50^000000."; next; input $QuestItem3HM; next; if ($QuestItem3HM > 50) goto L_HMItem3Denied; mes "[Daily Quest]"; mes "Item 3 Set."; set $DailyQuestToday,0; mes "^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+"."; next; goto L_ChangeQuest; L_HMItem3Denied: mes "[Daily Quest]"; mes "This item (^ff0000"+getitemname($QuestItem3)+"^000000) must be in a range of ^0088001 ~ 50^000000."; next; goto L_ChangeItem32; L_ChangeQuestRandom: set $QuestItem1, rand(701,1065); set $QuestItem1HM, rand(1,200); set $QuestItem2, rand(701,1065); set $QuestItem2HM, rand(1,150); set $QuestItem3, rand(701,1065); set $QuestItem3HM, rand(1,50); set $DailyQuestToday,0; mes "[Daily Quest]"; mes "This is the Daily Quest:"; mes "^FF0000"+getitemname($QuestItem1)+"^000000 x "+$QuestItem1HM+""; mes "^FF0000"+getitemname($QuestItem2)+"^000000 x "+$QuestItem2HM+""; mes "^FF0000"+getitemname($QuestItem3)+"^000000 x "+$QuestItem3HM+""; next; goto GM_Menu; L_ChangePrize: next; mes "[Daily Quest]"; mes "Input the Prize"; next; input $DailyQuestPrize; next; mes "[Daily Quest]"; mes "The Prize: "+getitemname($DailyQuestPrize)+" x How many?"; next; input $DailyQuestPrizeHM; next; mes "[Daily Quest]"; mes "This is what you like?"; mes "^0000ff"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+"."; menu "Yup, Thanks.",GM_Menu,"Noo! I made a mistake!",L_ChangePrize; FinishQuest: next; mes "[Daily Quest]"; mes "You got ^0000FF"+getitemname($DailyQuestPrize)+"^000000 x "+$DailyQuestPrizeHM+"."; delitem $QuestItem1,$QuestItem1HM; delitem $QuestItem2,$QuestItem2HM; delitem $QuestItem3,$QuestItem3HM; getitem $DailyQuestPrize,$DailyQuestPrizeHM; set CooldownQuest,gettimetick(2); set $DailyQuestTotal,$DailyQuestTotal +1; set $DailyQuestToday,$DailyQuestToday +1; close; } - script DailyQuestItemChanger -1,{ OnInit: OnClock0000: while ( getitemname( set( $QuestItem1, rand(701,1065) ) ) == "null" ); set $QuestItem1HM, rand(1,200); while ( getitemname( set( $QuestItem2, rand(701,1065) ) ) == "null" ); set $QuestItem2HM, rand(1,150); while ( getitemname( set( $QuestItem3, rand(701,1065) ) ) == "null" ); set $QuestItem3HM, rand(1,50); set $DailyQuestToday,0; end; } i recommend do adding the codes manually
    1 point
  14. for return mapname just add this line mapreg_setregstr(add_str("$@mobdead_m$"+0), map[md->bl.m].name); variable $@mobdead_m$ will save last mob dead map @hakuren U R welcome , glad to help
    1 point
  15. you can try modify src let it return dead x ,y coordinate mob.c find #include "quest.h" add after #include "mapreg.h" find if( md->npc_event[0] && !md->state.npc_killmonster ) add after mapreg_setreg(add_str("$@mobdead_x"), md->bl.x); mapreg_setreg(add_str("$@mobdead_y"), md->bl.y); recompile... It should return last mob dead coordinate x ($@mobdead_x) and y($@mobdead_y)
    1 point
×
×
  • Create New...