Jump to content

Joseph

Members
  • Posts

    341
  • Joined

  • Last visited

Everything posted by Joseph

  1. Huh? More informations?
  2. Its possible if you use cell_basilica with PvP on.
  3. Here.. - script Restrict -1,{ OnPCLoadMapEvent: if ( strcharinfo(3) == "izlude" && getgroupid() == 0 ) warp "Prontera",151,191; end; OnInit: setmapflag "izlude",mf_loadevent; end; }
  4. - script Item Giver -1,{ OnPCLoginEvent: setarray .@Item[0],671,1; // <ItemID>,<ItemAmount> while(1) { sleep2 900000; // 15 minutes for ( set .@i, 0; .@i < getarraysize(.@Item); set .@i, .@i + 2 ) { if ( checkvending() ) continue; getitem .@Item[.@i], .@Item[.@i + 1]; } } }
  5. I'd suggest that the dialogues to be exactly the same as iRO.
  6. Nobody is allowed to go Izlude?
  7. Search for this line: if (countitem(6242) < @mamount) goto L_Invalid; Add this below it: if ( (Zeny + (100000000*.@mamount)) > 2000000000 ) { mes "You cannot hold more than 2b Zeny"; close; }
  8. callfunc( "RefineFunc",<itemID>,<BitMasks>,<MaxRefine>,<CheckEquip>,<RefineMode>,<ItemAmount> ) function script RefineFunc { for( set .@i,1; .@i <= 10; set .@i,.@i + 1 ) set .@Menu$,.@Menu$ + (( getarg(1) & pow( 2,(.@i-1 ) ) && getequiprefinerycnt( .@i ) < getarg(2) && getequipisequiped( .@i) )?"^FF0000+"+getequiprefinerycnt( .@i )+" ^0000FF"+getequipname( .@i )+" "+( getitemslots( getequipid( .@i ) )?"["+getitemslots( getequipid( .@i ) )+"]":"" )+"^000000":"" )+":"; select( .@Menu$ ); if( countitem( getarg(0) ) < getarg(5) ) mes "You didnt have ^FF0000"+getarg(5)+" x "+getitemname( getarg(0) )+"^000000 to refine."; else if( getarg(3) == 1 && !getequipisenableref( @menu ) ) mes "I cant refine this items. Because it is ^FF0000Un-Refineable^000000."; else{ if( getarg(4) ) while( getequiprefinerycnt( @menu ) < getarg(2) ) successrefitem ( @menu ); else successrefitem ( @menu ); delitem getarg(0),getarg(5); mes "You have gained : "; mes "^FF0000+"+getequiprefinerycnt( @menu )+" ^0000FF"+getequipname( @menu )+"^000000"; } close; }
  9. Search for the Item ID of TCG Card in data/idnum2displaynametable.txt and db/item_db.txt and replace it with the desired name.
  10. Joseph

    Restock

    When does the restock take place?
  11. Joseph

    request

    I suppose this is just part of the script. Please provide us the full script.
  12. Please take note that IP address can be easily changed. Anyway, this is the script: amatsu,116,146,3 script Seyra 90,{ set .@n$, "[seyra]"; setarray .@rwd[0],2115,1,2357,1,2421,1,2524,1; // Rewards: <item id>,<item amount> query_sql ("SELECT `last_ip` FROM `login` WHERE `account_id`=" + getcharid(3) + "", .@lip$); if ( getd("$" + .@lip$ + "_NG") > 0 || #NewbieGift > 0) { mes .@n$; mes "I'm sorry, the rewards are exclusively for new players."; close; } mes .@n$; mes "Welcome! Here are some free gifts"; mes "for newcomers:"; for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 ) mes .@rwd[.@i+1] + " x " + getitemname(.@rwd[.@i]); close2; set #NewbieGift, 1; setd "$" + .@lip$ + "_NG", getd("$" + .@lip$ + "_NG") + 1; for ( set .@i, 0; .@i < getarraysize(.@rwd); set .@i, .@i + 2 ) getitem .@rwd[.@i], .@rwd[.@i+1]; end; OnInit: waitingroom "Newbie Gift!",0; end; }
  13. There you go. // Edited version by painisinsane/Eclipse. // Creator of EclipseRO // Please dont remove Credits! // Credits: [url="http://www.paste-it.net/public/a5d2cd4/"]http://www.paste-it....public/a5d2cd4/[/url] quiz_01 mapflag nowarpto quiz_01 mapflag nowarp quiz_01 mapflag noteleport quiz_01 mapflag nomemo quiz_01 mapflag nosave SavePoint quiz_01 mapflag nobranch quiz_01 mapflag noicewall quiz_01 mapflag nopenalty quiz_01 mapflag nobranch quiz_01 mapflag noexp quiz_01 mapflag noreturn quiz_01 mapflag pvp_noparty quiz_01 mapflag restricted 1 - script RFYL#disable -1,{ OnInit: disablenpc "Zombie Master"; disablenpc "Present For You"; } yuno_pre,32,95,4 script Zombie Minion 1015,{ if (getgmlevel() >= 40) goto LMS_Admin; mes "[Minion]"; mes "Hello " + strcharinfo(0) + ", my master is busy."; mes "*sigh*"; close; LMS_Admin: mes "[Minion]"; mes "Hello " + strcharinfo(0) + ", would you like me to call my Boss?"; mes "He is the only one who can start it!"; menu "Start Event",RFYL,"Spectate",M_warp,"End Event",M_EndEvent,"No Thanks",leave; RFYL: next; mes "[Minion]"; mes "Ok, I'll call him this instant."; close2; set $@offvar,1; goto StartEvent; M_warp: mes "[Minion]"; mes "Very well, I will warp you to the map!"; warp "quiz_01",42,369; close; leave: next; mes "[Minion]"; mes "Ok " + strcharinfo(0) +", nice seeing you."; close; M_EndEvent: mes "[Minion]"; mes "Ok master, I will stop the event for you right away!"; next; set $@offvar,1; disablenpc "Zombie Master"; disablenpc "Present For You"; killmonsterall "quiz_01"; areawarp "quiz_01",10,10,450,450,"rachel",120,135; stopnpctimer; disablenpc "Zombie Minion"; warp "rachel",120,135; sleep 180000; enablenpc "Zombie Minion"; OnMinute00: StartEvent: announce "Zombie Vs. Novice event Will begin in 3 minutes. Proceed to the Event Area.",0; killmonsterall "quiz_01"; sleep 55000; announce "Zombie Vs. Novice event will begin in 2 minutes! proceed to the Event Area.",0; sleep 5000; announce "Zombie Master: I have now appeared in poring_c01!",0; enablenpc "Zombie Master"; sleep 60000; announce "Zombie Vs. Novice event will begin in 1 minute!",0; sleep 30000; mapannounce "quiz_01","In 30 seconds the zombies will spawn!",0; sleep 25000; announce "Zombie Vs. Novice event will begin in ~5~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~4~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~3~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~2~",0; sleep 1000; announce "Zombie Vs. Novice event will begin in ~1~",0; sleep 1000; announce "Zombie Vs. Novice event has now begun!!",0,0x00FF00; disablenpc "Zombie Master"; disablenpc "Present For You"; sleep 10000; monster "quiz_01",42,369,"Zombie",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-2",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-3",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; mapannounce "quiz_01","Round 2!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 3!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 4!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 5!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 6!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 55000; monster "quiz_01",42,369,"Zombie-4",1015,1; mapannounce "quiz_01","Round 7! Final Round!",0; sleep 10000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 20000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 30000; monster "quiz_01",42,369,"Zombie-4",1015,1; sleep 40000; monster "quiz_01",42,369,"Zombie-4",1036,1; sleep 50000; monster "quiz_01",42,369,"Zombie-4",1036,1; sleep 60000; monster "quiz_01",42,369,"Zombie-4",1015,1; initnpctimer; end; OnTimer0500: if ( getmapusers("quiz_01") == 0 ) { killmonsterall "quiz_01"; announce "'Zombie Vs. Novice' event has ended. No one joined.",0; stopnpctimer; end; } else if ( getmapusers("quiz_01") > 1 ) { mapannounce "quiz_01",getmapusers("quiz_01") +"has survived the event.",0,0x00FF00;; initnpctimer; end; } initnpctimer; end; OnPCDieEvent: getmapxy .@mapnvz$,.@xnvz,.@ynvz,0; if ( .@mapnvz$ == "quiz_01") { sleep2 1; warp "prontera",142,179; atcommand "@alive "+ strcharinfo(0); dispbottom "you have lost..."; } sleep2 0500; if ( .@mapnvz$ == "quiz_01" && getmapusers("quiz_01") == 1 ) { killmonsterall "quiz_01"; mapannounce "quiz_01","You have won, approach the Present For You Npc please.",0; enablenpc "Present For You"; stopnpctimer; end; } end; } quiz_01,42,378,3 script Present For You 72,{ mes "[Present For You]"; mes "Please tell me your name."; next; input .@name$; if(.@name$ != strcharinfo(0)) { mes "[Present For You]"; mes "Are you sure that is your name?"; close; } mes "[Present For You]"; mes "Congrats. You've won."; close2; announce "Present For You: We have a winner! "+.@name$+" has won the Novice vs Zombie event!",0; getitem 7227, 3; // Change This item id to what ever you want warp "prontera",142,179; disablenpc "Present For You"; end; } poring_c01,110,95,4 script Zombie Master 999,{ if (BaseLevel > 1) goto NO; if (class == 0) goto event; if (class > 0) goto NO; event: mes "[^0000FFZombie Master^000000]"; mes "You wish to participate the Zombie Vs. Novice event?"; next; switch(select("Yes","No")) { case 1: sc_end SC_ALL; sc_start SC_DECREASEAGI,1200000,10; percentheal 100,100; sc_start SC_STRIPSHIELD,1200000,5; sc_start SC_STRIPWEAPON,1200000,5; sc_start SC_STRIPARMOR,1200000,5; sc_start SC_STRIPHELM,1200000,5; statusup2 bStr,-999; statusup2 bAgi,-999; statusup2 bVit,-999; statusup2 bInt,-999; statusup2 bDex,-999; statusup2 bLuk,-999; warp "quiz_01",42,369; end; break; case 2: mes "[^0000FFZombie Master^000000]"; mes "Come back when your ready."; close; break; NO: mes "[^0000FFZombie Master^000000]"; mes "You are not a Novice, level 1."; close; } OnInit: disablenpc "Zombie Master"; disablenpc "Present For You"; end; }
  14. announce "message",0,0x81DAF5;
×
×
  • Create New...