yuchinin

Idea sharing or script requesting

Oh that just simple. I remember Euphy done that before.Here~ https://github.com/rathena/rathena/blob/master/npc/custom/quests/quest_shop.txt

Would you mind explain more?

Erm sorry but I didn't get it. Could you try to explain it more clearly?

Fixed your error. Try it. prontera,128,211,4 script Guide NPC::Guide NPC 421,{ mes "[Job Guide NPC]"; mes "Hi!, I can warp you to any jobchange Guide."; next; mes "[Warp NPC]"; mes "Where would you like to be warped to?"; next; menu "Towns",town; town: menu "Swordsman Job Quest",wprontera, "Mage Job Quest",walberta, "Archer Job Quest",waldebaran, "Acolyte Job Quest",wamatsu, "Merchant Job Quest",wayot, "Thief Job Quest", wbrasilis, "Gunslinger Job Quest",wcomodo, "Ninja Job Quest",weinbech, "Taekwon Job Quest",weinbroch, "Super Novice Job Quest",wgeffen, "Knight Job Quest",wgonryun, "Wizard Job Quest",whugel, "Hunter Job Quest",wizlude, "Priest Job Quest",wjawaii, "Blacksmith Job Quest",wlighthalzen, "Assassin Job Quest",wlouyang, "Crusader Job Quest",wxmas, "Sage Job Quest",wmanuk, "Bard Job Quest",wmidcamp, "Dancer Job Quest",wmorroc, "Monk Job Quest",wnameless, "Alchemist Job Quest",wniflheim, "Rogue Job Quest",wpayon, "Rebirth Transcendent Job Quest 1",wyuno, "Rebirth Transcendent Job Quest 2",wafeltz; //------------------------------- // Town Warps //------------------------------- wprontera: warp "izlude",125,145; close; walberta: warp "geffen_in",164,124; close; waldebaran: warp "payon_in02",64,71; close; wamatsu: warp "prt_church",184,41; close; wayot: warp "alberta_in",53,43; close; wbrasilis: warp "moc_prydb1",39,129; close; wcomodo: warp "que_ng",152,167; close; weinbech: warp "alberta",30,65; close; weinbroch: warp "Payon",157,141; close; wgeffen: warp "aldeba_in",223,167; close; wgonryun: warp "prt_in",88,101; close; whugel: warp "gef_tower",111,37; close; wizlude: warp "hu_in01",386,374; close; wjawaii: warp "prt_church",16,41; close; wlighthalzen: warp "ein_in01",18,28; close; wlouyang: warp "in_moc_16",19,33; close; wxmas: warp "prt_castle",45,169; close; wmanuk: warp "yuno_in03",154,35; close; wmidcamp: warp "comodo",226,123; close; wmorroc: warp "comodo",193,151; close; wnameless: warp "prt_monk",59,247; close; wniflheim: warp "alde_alche",27,185; close; wpayon: warp "in_rogue",363,123; close; wyuno: warp "yuno_in02",88,164; close; wafeltz: warp "yuno_in05",49,43; close; //------------------------------- }

Ahaha~ Fix the bug and add the min countdown~ try it - script Poring Event -1,{ OnMinute00: .h = gettime(3); // hour .m = gettime(2); // min .s = gettime(1); // sec if(.h%3 == 0){ .Map$ = .Maplist$[rand(getarraysize(.Maplist$))]; .min = .min_before_start; goto OnTimer60000; } end; OnTimer60000: stopnpctimer; if(.min){ announce "A special poring will spawn in [ "+Strtoupper(.Map$)+" ] in "+.min+" minutes",bc_all; .min--; initnpctimer; }else{ announce "A special poring has just spawn in [ "+Strtoupper(.Map$)+" ]",bc_all; monster .Map$,0,0,"--ja--",1002,1,strnpcinfo(3)+.eventlabel$,0; } end; OnPoring: Zeny = Zeny + .zenygain; dispbottom .zenygain+"z gain"; announce strcharinfo(0)+" has just kill the special poring in [ "+Strtoupper(.Map$)+" ]",bc_all; end; OnInit: .zenygain = 1000; setarray .Maplist$,"geffen","prontera","alberta","aldebaran"; .eventlabel$ = "::OnPoring"; .min_before_start = 3; }

Already did isn't it ? OnMinute00: // This label will trigger when the server minutes hit 0, that mean it will trigger every hour on 0 min. .h = gettime(3); // This get the time in hour if(.h%3 == 0) // that mean when the variable < .h > is 3 6 9 12 15 18 21 24 % 3 will always get 0 Thumb up if this help If you don't know that logic you can simply use the OnHour00: OnHour03: OnHour06: OnHour09: ... got it?

It should be working now Note: remember to check your npc syntax, expecially the <TAB>.

What you mean "how to change YES/NO button?", I don't get it. Or you mean this? Sorry I modified your script. .@s = select("Prontera [ "+getmapusers(.Map$[0])+" / 30 ]:Izlude [ "+getmapusers(.Map$[1])+" /30 ]:Alberta [ "+getmapusers(.Map$[2])+" /30 ]"); mes "Confirm entering "+.Map$+" ?"; if(select("Yes","No")==1){ if(getmapusers(.Map$[.@s-1]) >= 30) goto Full; specialeffect2 EF_EARTHSPIKE; specialeffect2 EF_DEVIL; specialeffect2 EF_COIN; specialeffect2 EF_SIGHTRASHER; sleep2 1000; warp .Map$[.@s-1],0,0; announce "[ Arena Warper ] : "+strcharinfo(0)+" Join "+.MapN$[.@s-1]+" Arena Room.",bc_all; } close; Full: next; mes "This Arena is Full"; mes "Please Choose other Arena Room"; close; OnInit: setarray .MapN$,"Prontera","Izlude","Alberta"; setarray .Map$,"pvp_y_1-1","pvp_y_8-2","pvp_y_1-4";

Just done it. give it a try~ - script Poring Event -1,{ OnMinute00: .h = gettime(3); // hour .m = gettime(2); // min .s = gettime(1); // sec .Map$ = .Maplist$[getarraysize(.Maplist$)]; if(.h%3 == 0){ announce "A special poring has just spawn in [ "+Strtoupper(.Map$)+" ]",bc_all; monster .Map$,0,0,"--ja--",1002,1,strnpcinfo(3)+.eventlabel$,0; } end; OnPoring: Zeny = Zeny + .zenygain; dispbottom .zenygain+"z gain"; announce strcharinfo(0)+" has just kill the special poring in [ "+Strtoupper(.Map$)+" ]",bc_all; end; OnInit: .zenygain = 1000; setarray .Maplist$,"geffen","prontera","alberta","aldebaran"; .eventlabel$ = "::OnPoring"; }

I found a bug: getequipisequiped() will stack same bonus when you equip more than 1 equipment eg. Headgear get 1 str bonus, garment get 1 vit bonus when I equip headgear the bonus will be 1 str, then equip garment will get 2 str and 2 vit coz it check everytime you equip a equipment The bonus should be clear before reapply isn't it?

Someone can update this src to latest revision? It's about npc to create vending windows like player do. The author is : Epoque I found a thread about this: http://rathena.org/board/topic/71796-callshop-npc-using-vending/ but the code is out of date. Anyone know how to update it?

goddameit This src act great, but how to add newline in body? I try add \n \r already but fail at end.

After click "dismissal" npc stayed at current location, this make other player hard to find the npc. *Suggestion: Change: if(!.npc_status[.@i]) continue; To: if(!.npc_status[.@i]) {Endd(.@i);continue;}