Jump to content

Famous

Members
  • Posts

    455
  • Joined

  • Last visited

Everything posted by Famous

  1. how to remove skills on misc? bump?
  2. [Error]: Loading NPC file: npc/custom/Zhen/vipsytem.txt script error on npc/custom/Zhen/vipsytem.txt line 63 expect ';' or '{' at function syntax 58 : mes "[^FF0000Clahador^000000]"; 59 : mes "Thank you!"; 60 : mes "Come Again!"; 61 : close; 62 : * 63 : function script' 'getPremium { 64 : set .@ticks, getarg(0); 65 : if (.@ticks <= 0) { 66 : debugmes "getPremium - tried to set a timer in the past"; 67 : end; 68 : }
  3. id number: 7588 1000 pcs per jobs
  4. http://www.eathena.ws/board/index.php?act=attach&type=post&id=4668 can I request this script edit to put some quest items requirements for changing 3rd job.. thank you!
  5. I also patch it @@ -9828,3 +9848,39 @@ return 0; } + +//VIP system + +bool pc_isVIP(struct map_session_data *sd) +{ + if( !battle_config.vip_active ) + return false; + if( sd == NULL ) + return false; + if( sd->bl.type != BL_PC ) + return false; + if( sd->VIP_Tick <= 0 ) + return false; + return ( sd->VIP_Tick > (int)time(NULL) ); +} + +int pc_search_inventory2(struct map_session_data *sd,int item_id) +{ + int i; + nullpo_retr(-1, sd); + + ARR_FIND( 0, MAX_INVENTORY, i, sd->status.inventory[i].nameid == item_id && sd->status.inventory[i].card[0] == -17 && sd->status.inventory[i].card[1] == -19 && sd->status.inventory[i].card[2] == -37 && sd->status.inventory[i].card[3] == -43 && (sd->status.inventory[i].amount > 0 || item_id == 0) ); + return ( i < MAX_INVENTORY ) ? i : -1; +} + +int pc_delitem3(struct map_session_data *sd,int item_id) +{ + int i; + nullpo_retr(-1, sd); + if(sd==NULL) + return 0; + for( i=0; i<MAX_INVENTORY; i++) + if( sd->status.inventory[i].nameid == item_id && sd->status.inventory[i].card[0] == -17 && sd->status.inventory[i].card[1] == -19 && sd->status.inventory[i].card[2] == -37 && sd->status.inventory[i].card[3] == -43 ) + pc_delitem(sd, i, 1, 0, 1, LOG_TYPE_NONE); + return 0; +} I'm wondering what line should put this + pc_delitem(sd, i, 1, 0, 1, LOG_TYPE_NONE); + return 0; +} what is the next line after this? part? bump anyone?
  6. I tested this http://rathena.org/board/topic/81747-2012-04-10aragexe-v3-booking-system/ and I got disconnect [Warning]: clif_parse: Received unsupported packet (packet 0x08c9, 2 bytes received), disconnecting session #7. [Warning]: The packet_db table only has support up to version 30. [Warning]: Skipping packet version 31. [Warning]: The packet_db table only has support up to version 30. [Warning]: Skipping packet version 32. [Warning]: The packet_db table only has support up to version 30. [Warning]: Skipping packet version 33. [Warning]: The packet_db table only has support up to version 30. [Warning]: Skipping packet version 34. [Warning]: The packet_db table only has support up to version 30. [Warning]: Skipping packet version 35. [Warning]: The packet_db table only has support up to version 30. my svn is out dated -.- upon clicking the cash shop icon.. nothing hapened can't click it
  7. prontera,150,180,4 script VIP system 100,{ callfunc "func_setviptick",10000; end; } function script func_setviptick { set .@time,gettimetick(2)+getarg(0); setviptick .@time; set #VIP_TICK,.@time; return; } I tested this vip system http://rathena.org/board/files/file/2869-vip-temporary-rasie-reel/ and the script is not working
  8. aa see thanks.... I'm looking for diff because I don't want to rechange the whole svn.. its hard for me to update all over again what I've already implemented
  9. better to afford anti ddos hosting
  10. great I really miss u rathena
  11. prontera,155,181,5 script Farm Zone 757,{ function RandomizeItem; while( 1 ){ mes "How can i help you ?"; switch( select( "Information:Farm Items" )){ Case 1: mes "This is a Farm Zone."; mes "You are able to Hunt Monster inside this Room."; mes "Every Monster will award you random items."; next; mes "But there is some Condition.."; mes "You can only go in ^FF0000once every "+.RoomCleanMin+" minutes for 1 times.^000000"; mes "And Maximum of ^FF0000"+.MaxPlayers+" Players per "+.RoomCleanMin+" Minutes.^000000"; mes "Maximum Hunting Limit ^FF0000"+.MaxItemLimit+"^000000"; next; mes "There will be a ^FF0000Room Cleaning^000000 from time to time..."; mes "All players will be kicked out, it is your bad luck if you meet this."; mes "Delay will still apply even though you just go in for 1 Seconds.."; next; break; Case 2: if( #HuntRoomDelay > gettimetick(2) ){ set .last,#HuntRoomDelay - gettimetick(2); set .@min, .last % ( 24 * 3600 ) % 3600 / (60); mes "Wait for ^FF0000"+.@min+" Minutes^000000."; close; }else if( getarraysize( .Hunter ) >= .MaxPlayers ){ mes "Currently the Room is Full. Please try again later."; close; }else{ warp .Map$,0,0; set .Hunter[getarraysize( .Hunter )],strcharinfo(0); set #HuntRoomDelay,gettimetick(2) + ( .DelayMin * 60 ); set #FarmHunt,0; end; } } } OnInit: // Maximum Player can join per X Minutes. set .MaxPlayers,5; // Adding X Minutes of Delay before can go in again. set .DelayMin,15; // Maximum Hunt Limit per round inside the Zone. set .MaxItemLimit,200; // Map that will be used in thos Zone. set .Map$,"guild_vs5"; // Clear Map Every X Minutes. set .RoomCleanMin,15; // Mapflag Initialization setmapflag .Map$,mf_nogo; setmapflag .Map$,mf_nomobloot; setmapflag .Map$,mf_nomvploot; setmapflag .Map$,mf_nowarpto; setmapflag .Map$,mf_nochat; setmapflag .Map$,mf_novending; setmapflag .Map$,mf_nocommand,60; setmapflag .Map$,mf_nogo; setmapflag .Map$,mf_nojobexp; setmapflag .Map$,mf_nobaseexp; while( 1 ){ killmonster .Map$,"All"; mapwarp .Map$,"prontera",155,181; monster .Map$,0,0,"[ Farm Zone ] Resident",-1,80,strnpcinfo(0)+"::OnNormalKill"; monster .Map$,0,0,"[ Farm Zone ] Guardian",-3,5,strnpcinfo(0)+"::OnBossKill"; deletearray .Hunter,getarraysize( .Hunter ); announce "[ Farm Zone ] : Farming Zone has been Cleaned up, another 5 Players may go in now.",bc_blue; sleep ( .RoomCleanMin * 60000 ); mapannounce .Map$,"[ Farm Zone ] : Room Clean Up now...All Users will be warped Out.",0; killmonster .Map$,"All"; sleep 3000; } end; OnNormalKill: RandomizeItem( 0,rand(1,5) ); monster .Map$,0,0,"--ja--",-1,1,strnpcinfo(0)+"::OnNormalKill"; end; OnBossKill: RandomizeItem( 1,rand(1,3) ); monster .Map$,0,0,"--ja--",-3,1,strnpcinfo(0)+"::OnBossKill"; end; // Function that used to Generate Random Items function RandomizeItem { set #FarmHunt,#FarmHunt + getarg(1); // Normal Monster in Zone Drops Lists if( getarg(0) == 0 ) setarray .ItemList[0],13989,14232,13517,7139,12033,12016,14534; // Normal Boss in Zone Drops Lists if( getarg(0) == 1 ) setarray .ItemList[0],14536,12912,12267,12266,14601,13830,13831,13832,13833; for( set .@i,1; .@i <= getarg(1); set .@i,.@i + 1 ){ getitem .ItemList[ rand( getarraysize( .ItemList ) ) ],1; } deletearray .ItemList,getarraysize( .ItemList ); dispbottom "[ Farm Zone ] : Farmed "+#FarmHunt+" / "+.MaxItemLimit+" Items"; if( #FarmHunt >= .MaxItemLimit ){ message strcharinfo(0),"Limit Reach , you may join again later."; sleep2 2000; warp "prontera",155,181; } return; } }
  12. is this one time use only?? thank man its working thumbs up!
  13. Can I request Auto Job changer 1time use per account only
  14. thanks for replying I'll try this thank you so much!! @Anakid 0x10 - Skill ignores elemental adjustments
  15. Can I request Earthquake Skill will not affected by warm wind (skill "TK_SEVENWIND") or any element for example earth property bcu'z I'm using Earth Quake skill via staff weapon..
  16. case HT_ANKLESNARE: { struct block_list* target = map_id2bl(group->val2); if( target ) status_change_end(target, SC_ANKLE, INVALID_TIMER);}break;+case PF_SPIDERWEB: {+ struct block_list* target = map_id2bl(group->val2);+ if( target)+ status_change_end(target, SC_SPIDERWEB, INVALID_TIMER);+}+break; can I ask which line should u input this? already fix the problem thnx chowking
×
×
  • Create New...