Noctis

Members
  • Content Count

    226
  • Avg. Content Per Day

    0
  • Joined

  • Last visited

Community Reputation

13 Good

5 Followers

About Noctis

  • Rank
    Marin

Profile Information

  • Gender
    Male
  • Location
    Portugal
  • Server
    TristonRO
  • Github
    Rathena

Recent Profile Visitors

873 profile views
  1. Noctis

    Error Lasagna npcs and warps

    Try this lasagna_npcs.txt
  2. This happens when I'am in pvp
  3. Noctis

    Compile error after pulled

    Dont work..
  4. Noctis

    Compile error after pulled

    So after pull the recent rathena updates, I got this errors when compiling
  5. Noctis

    Premium Account Seller

    Do you have the @aura command?
  6. Noctis

    Custom Hairstyle dont work

    I did that. I tried ti extract them on my grf or on my data and nothing..
  7. Noctis

    Custom Hairstyle dont work

    2016 client even with enable 64 k hairstyles it dont work
  8. Noctis

    It's possible ?

    Edit skill_cast_db I think its there
  9. Noctis

    Custom Hairstyle dont work

    The hair 30+ always show this same hair lol
  10. Noctis

    Missing reg_value

    function script f_vend_house { if($varglo & getarg(0)) goto L_Purchased; mes "[Vendeur de maison]"; mes "Would you like to buy this house?"; mes "It costs "+getarg(4)+" zeny."; next; if(select("Yes:No")-1) { mes "[Vendeur de maison]"; mes "Maybe next time then... Good luck!"; close; } if(zeny < getarg(4)) { mes "[Vendeur de maison]"; mes "You don't have enough zeny!"; close; } set Zeny,Zeny-getarg(4); set $varglo,$varglo | getarg(0); set varglo, varglo | getarg(0); mes "Please input your character name to seal the deal!"; input([email protected]$); announce strcharinfo(0)+" just bought "+getarg(5)+"!",8; donpcevent(getarg(7)+"::OnInit"); close; L_Purchased: if(varglo & getarg(0)) { mes "[Vendeur de maison]"; mes "What would you like to do?"; set [email protected]$, "Warp:"+ (getarg(6)&1?"^FF0000Deny":"^0000FFAllow")+"^000000 Public:"+ (getarg(6)&2?"^FF0000Deny":"^0000FFAllow")+"^000000 Friends:"+ (getarg(6)&4?"^FF0000Deny":"^0000FFAllow")+"^000000 Guild Members:"+ (getarg(6)&8?"^FF0000Deny":"^0000FFAllow")+"^000000 Party Members:"+ (getarg(6)<0?"^0000FFStop Selling":"^FF0000Sell")+"^000000:Abandon:End"; next; switch(select([email protected]$)) { case 1: break; case 2: return 1; case 3: return 2; case 4: return 4; case 5: return 8; case 6: if(getarg(6)>=0) { mes "[Vendeur de maison]"; mes "How much would you like to sell this mansion for?"; next; input([email protected]); mes "[Vendeur de maison]"; mes "Are you sure you want to sell "+getarg(5)+" for "[email protected]+" Zeny?"; next; if(select("Yes:No")-1) { mes "[Vendeur de maison]"; mes "Wow that was a close one!"; next; goto "L_Purchased"; } close2; set(@mode,[email protected]); return -1; } else { mes "[Vendeur de maison]"; mes "Do you really want to stop selling this address?"; next; if(select("Yes:No")-1) { mes "[Vendeur de maison]"; mes "Wow that was a close one!"; next; goto "L_Purchased"; } close2; set(@mode,-1); return 0; } case 7: mes "[Vendeur de maison]"; mes "Are you sure you want to abandon this house?"; mes "You forfeit any rights to this property and zeny."; next; if(select("Yes:No")-1) { mes "[Vendeur de maison]"; mes "Wow that was a close one!"; next; goto "L_Purchased"; } set(@mode,[email protected]); set varglo, varglo-getarg(0); set $varglo, $varglo-getarg(0); donpcevent(getarg(7)+"::OnInit"); mes "[Vendeur de maison]"; mes "House successfully abandoned!"; close2; return -1; case 8: close; } } if(getarg(6)<0) { mes "[Vendeur de maison]"; mes "This area seems to be for sale by the owner for "+getarg(4)+"z"; next; if(select("I'll take it!:No way...")-1) { mes "[Vendeur de maison]"; mes "Maybe next time then... Good luck!"; close; } if(zeny < getarg(4)) { mes "[Vendeur de maison]"; mes "You don't have enough zeny!"; close; } set [email protected], query_sql( "SELECT `char`.`account_id`, `global_reg_value`.`char_id` "+ "FROM `global_reg_value` "+ "INNER JOIN `char` "+ "ON `global_reg_value`.`char_id`=`char`.`char_id` "+ "WHERE "+getarg(0)+"&`global_reg_value`.`value`>0 AND `global_reg_value`.`str`='varglo'" ,[email protected],[email protected] ); if([email protected]) { set Zeny,Zeny-getarg(4); set varglo, varglo | getarg(0); set([email protected]_aid,getcharid(3)); if(isloggedin([email protected],[email protected])) { attachrid([email protected]); set varglo, varglo-getarg(0); set Zeny,Zeny+getarg(4); dispbottom getarg(5)+" just sold for "+getarg(4)+"z!"; } else { query_sql( "UPDATE `global_reg_value` "+ "SET `value`=`value`-"+getarg(0)+" "+ "WHERE `char_id`="[email protected]+";" ); set(@recovery,[email protected]); set(@cash_bak,getarg(4)); doevent("cash_money::OnLogEvent"); } attachrid([email protected]_aid); mes "[Vendeur de maison]"; mes getarg(5)+" purchased successfully!"; announce strcharinfo(0)+" just bought "+getarg(5)+"!",8; close2; set(@mode,-1); return; } } set [email protected], query_sql( "SELECT `char`.`account_id`, `global_reg_value`.`char_id`, `char`.`name`, `char`.`party_id` "+ "FROM `global_reg_value` "+ "INNER JOIN `char` "+ "ON `global_reg_value`.`char_id`=`char`.`char_id` "+ "WHERE "+getarg(0)+"&`global_reg_value`.`value`>0 AND `global_reg_value`.`str`='varglo'" ,[email protected],[email protected],[email protected]$,[email protected] ); set [email protected],[email protected]|1; query_sql("SELECT `friend_id` FROM `friends` WHERE `char_id`="[email protected]+";",[email protected]); for(set([email protected],0);[email protected]<getarraysize([email protected]);set([email protected],[email protected]+1)) { if(getcharid(0)[email protected][[email protected]]) { set [email protected],[email protected]|2; } } if(getguildmaster(getcharid(2))[email protected]$) set [email protected],[email protected]|4; if(getcharid(1)[email protected]) set [email protected],[email protected]|8; if(getarg(6) & [email protected] || varglo & getarg(0)) warp getarg(1),getarg(2),getarg(3); mes "[Vendeur de maison]"; mes "This house has already been purchased."; close; } - script cash_money -1,{ OnLogEvent: set(.recovery[getarraysize(.recovery)],@recovery); set(.cash_bak[getarraysize(.cash_bak)],@cash_bak); set(@recovery,0); set(@cash_bak,0); end; OnPCLoginEvent: sleep2 2000; while([email protected]<getarraysize(.recovery)) { if(.recovery[[email protected]]==getcharid(3)) { set([email protected],[email protected]+1); set([email protected],[email protected]+.cash_bak[[email protected]]); set Zeny,Zeny+.cash_bak[[email protected]]; deletearray .recovery[[email protected]],1; deletearray .cash_bak[[email protected]],1; set([email protected],[email protected]); } set [email protected],[email protected]+1; } if([email protected]) dispbottom "While you were gone you sold "[email protected]+" house(s) and made "[email protected]+" zeny!"; } prontera,165,168,5 script Door#1 76,{ set([email protected],f_vend_house(.a,.warp$,.cords[0],.cords[1],.price,.name$,.status,strnpcinfo(0))); if(.status&[email protected]&&.status>0) set(.status,[email protected]); else if(.status>=0) set(.status,.status|[email protected]); if( [email protected]==-1 ) { delwaitingroom; waitingroom "For Sale: "[email protected]+"z",0; set .price, @mode; } if( @mode<0 ) { delwaitingroom; waitingroom .name$,0; set .status,.status*-1; } set(@mode,0); end; OnInit: //-------Config-------- set .price, 10000000; set .name$, "Jawaii Manor"; set .warp$, "jawaii_in"; setarray .cords, 115, 63; //---------------------- for(set(.a,1);.a<atoi(strnpcinfo(2));set(.a,.a+.a)); delwaitingroom; waitingroom ($varglo&.a?.name$:"For Sale: "+.price+"z"),0; }
  11. A script that give 50 cash points if the player is logged by 3 consecutive hours is it possible?