Jump to content

Jaburak

Members
  • Posts

    1125
  • Joined

  • Days Won

    31

Everything posted by Jaburak

  1. if(extime+86399 > gettimetick(2)) { mes "Please wait 24 hours."; close; } if (getgmlevel() >= 80) goto GM_Menu; L_START: if (getgmlevel() >= 80) next; mes "[Daily Quest]"; mes "Hello "+strcharinfo(0)+"!"; mes "Do you want to start today's Quest?"; mes " "; mes "Total Daily Quests Finished: ^008800"+$DailyQuestTotal+"^000000."; mes "Today Daily Quests Finished: ^0000FF"+$DailyQuestToday+"^000000."; menu "Yes!",-,"Nahh",L_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($QuestItem1)+" of ^FF0000"+getitemname($QuestItem1)+"^000000, "+countitem($QuestItem2)+" of ^FF0000"+getitemname($QuestItem2)+"^000000, "+countitem($QuestItem3)+" 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; end; L_Close: next; mes "[Daily Quest]"; mes "Come back again! Get the Items!"; mes "Goodbye!"; close; end; 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; end; 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; end; 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; end; 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; end; // 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; end; 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; end; // 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; end; 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; end; // 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; end; 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; end; 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 $DailyQuestTotal,$DailyQuestTotal +1; set $DailyQuestToday,$DailyQuestToday +1; set extime,gettimetick(2); close; end; } - script DailyQuestItemChanger -1,{ OnInit: Start: OnHour24: for( set .@i, 0; .@i < 3; set .@i, .@i +1 ) { do set .@tmp[.@i], rand(701,1065); while( getiteminfo( .@tmp[.@i],0 ) == -1 ); } set $QuestItem1, .@tmp[0]; set $QuestItem1HM, rand(1,200); set $QuestItem2, .@tmp[1]; set $QuestItem2HM, rand(1,150); set $QuestItem3, .@tmp[2]; set $QuestItem3HM, rand(1,50); set $DailyQuestToday,0; goto Start; end; }
  2. What client are you using?
  3. Download this; http://rathena.org/board/topic/66962-basic-complete-renewal-data-english-folder/
  4. i cant hit the emperium? why? Maybe you dont have a guild? make sure to add the kafra's contract in the guild skill Yeah, also it didn't work if you only use @summon.
  5. Can you post a screenshot?
  6. Try Rockshield 2.5 or better contact https://harmonize.it/
  7. If you mean, turn it back to old emperium go to; trunk/db/re/mob_db.txt Find: 1288,EMPELIUM,Emperium,Emperium,90,700,1,0,0,1,60,73,64,50,1,17,80,50,26,20,10,12,0,8,26,0x160,300,1288,288,384,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 Replace: 1288,EMPELIUM,Emperium,Emperium,90,700,1,0,0,1,60,73,64,50,1,17,80,50,26,20,10,12,0,8,26,0x120,300,1288,288,384,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
  8. I think it's because you're using eAthena SVN. // Enable Logs? // 1 - Log all events. // Or, determine what to log by adding up the different events: // 0002 - (T) Log trades // 0004 - (V) Log vending transactions // 0008 - (P) Log items drop/picked by players // 0016 - (L) Log items drop/looted by monsters // 0032 - (S) Log NPC transactions (buy/sell) // 0064 - (N) Log Script transactions (items deleted/acquired through quests) // 0128 - (M) Log items stolen from mobs (Steal/Gank) // 0256 - © Log player-used items // 0512 - (M) Log MVP prize items // 1024 - (A) Log player created/deleted items (through @/# commands) // 2048 - ® Log items placed/retrieved from storage. // 4096 - (G) Log items placed/retrieved from guild storage. // 8192 - (E) Log mail system transactions. // Example: Log trades+vending+script items+created items: 2+4+64+1024 = 1094 enable_logs: 0
  9. Just try Emistry stylist. http://rathena.org/board/files/file/2859-advanced-stylist/ Add the number here; // Blacklisted Style for each style and each gender. // --- Female --- .blacklist_hairstyle_0$ = "2,4,6"; .blacklist_haircolor_0$ = "1,3,5"; .blacklist_cloth_0$ = "1,2,3"; // --- Male --- .blacklist_hairstyle_1$ = "3,5,7"; .blacklist_haircolor_1$ = "2,4,6"; .blacklist_cloth_1$ = "4,5,6";
  10. Change it on trunk/db/re/skill_db.txt For example Priest Spirit; Find: 454,9,6,16,0,0x1,0,5,1,yes,0,0x200,0,magic,0, SL_PRIEST,Spirit of the Priest Replace to: 454,9,6,16,0,0x1,0,5,1,yes,0,0,0,magic,0, SL_PRIEST,Spirit of the Priest
  11. setarray .@blacklist[0],188,143,261; // NPC will skip any cloth colors in this array. Add number of hairstyle, clothcolor and haircolor.
  12. Judas can fix Devotion for $10; http://rathena.org/board/topic/78539-judas-services-full-serverclient-setup-addons/
  13. http://eathena-project.googlecode.com/svn/trunk/
  14. trunk/src/map/status.c Find: set_sc( LK_PARRYING , SC_PARRYING , SI_PARRYING , SCB_NONE ); Add Below: set_sc( BS_GREED , SC_PARRYING , SI_PARRYING , SCB_NONE );
  15. Try adding your grf in DATA.INI [Data] 0=yourROdata.grf 1=yourROdata2.grf 2=data.grf 3=sdata.grf 4=pdata.grf 5=vdata.grf
  16. set extime,gettimetick(2); if(extime+86399 > gettimetick(2)) { mes "Please wait 24 hours."; close; }
  17. There's an option 'Delete a session'. Just delete it, if you haven't set the time yet, disable your other woe controller script.
  18. Check more guides here; http://rathena.org/wiki/Custom_Items
  19. Then check your act and spr in this locations; data\sprite\¾ÆÀÌÅÛ data\sprite\¾Ç¼¼»ç¸®\¿© data\sprite\¾Ç¼¼»ç¸®\³²
  20. I think you have the same problem with this guy; http://rathena.org/board/topic/73508-connection-to-char-server-lost-loop/
  21. Make sure that you have the bmp files in; data\texture\À¯ÀúÀÎÅÍÆäÀ̽º\item data\texture\À¯ÀúÀÎÅÍÆäÀ̽º\collection
  22. Here's the latest rAthena SVN; http://svn.code.sf.net/p/rathena/svn/trunk/
×
×
  • Create New...