Filipino Community

Here is the pre-releae version. anyone, who feel like it,  can contribute!   payon,147,229,0 script Camp Fire#CF 4_BONFIRE,{ end; OnRefill: getmapxy([email protected]$, [email protected], [email protected], UNITTYPE_PC); if ([email protected]$ != .map$ || distance(.x, .y, [email protected], [email protected]) > .refill_distance || !(issit())) { @camp_fire_regen = 0; @camp_fire_tick = 0; end; } if(@camp_fire_regen == 1) { heal(.refillHP_rate, .refillSP_rate); } else { if(@camp_fire_tick >= .camp_fire_delay) { @camp_fire_regen = 1; @camp_fire_tick = 0; dispbottom("You are feeling warm and cozy."); } else { @camp_fire_tick++; } } end; OnTimer500: [email protected] = getunits(BL_PC, [email protected][0], false, .map$, (.x - .refill_distance), (.y - .refill_distance), (.x + .refill_distance), (.y + .refill_distance)); for ([email protected] = 0; [email protected] < [email protected]; [email protected]) { addtimer(rand(.refill_timer), .name$ + "::OnRefill", [email protected][[email protected]]); } initnpctimer(); end; OnRemoveDup: duplicateremove(); end; OnInit: .refillHP_rate = 15; // number of HP to give every refill .refillSP_rate = 5; // number of HP to give every refill .refill_distance = 3; // max distance .camp_fire_delay = 5; .refill_timer = 300; // wait rand(X) ms before refill .name$ = strnpcinfo(NPC_NAME); getmapxy(.map$, .x, .y, UNITTYPE_NPC); initnpctimer(); }   Here is in the  intem_db.conf   { Id: 7035 AegisName: "Matchstick" Name: "Matchstick" Type: 2 Buy: 100 Weight: 10 BuyingStore: true Delay: 15000 Script: <" getmapxy([email protected]$, [email protected], [email protected], UNITTYPE_PC); soundeffect ("strike-matchstick.wav",0); duplicatenpc("Camp Fire#CF", "Camp Fire", "CF_" + getcharid(CHAR_ID_CHAR), [email protected]$, [email protected], [email protected], 0); addtimer(180000, sprintf("Camp Fire#CF_%d::OnRemoveDup", getcharid(CHAR_ID_CHAR))); "> },   There is still some work to be done.  

I solved using 2018-03-07bRagexeRE_patched now i having translations problems, but i'll try find a new repo with the textures and translations   TY  

i have script npc event tic tac toe - script 3er_2 -1,{ if ( ( .X2 && .O2 ) && ( .X2 == getcharid ( 3 ) || .O2 == getcharid ( 3 ) ) && ( ! isloggedin ( .X2, .X ) || ! isloggedin ( .O2, .O ) ) ) donpcevent "Tic Tac Toe#3z::OnResetGame"; set [email protected], atoi ( strnpcinfo ( 2 ) ); if ( ( ! [email protected]_a[[email protected]] ) && ( [email protected]_turn ) ) { if ( getcharid ( 0 ) == getvariableofnpc ( .X, "Tic Tac Toe#3z" ) ) { if ( ( [email protected]_turn % 2 ) ) { set [email protected]_a[[email protected]], 1; setnpcdisplay "Poring#"+ [email protected], [email protected]_ids[0] ; set [email protected], 1; } else dispbottom "Is not your turn!"; } if ( getcharid ( 0 ) == getvariableofnpc ( .O, "Tic Tac Toe#3z" ) ) { if ( ! ( [email protected]_turn % 2 ) ) { set [email protected]_a[[email protected]], 2; setnpcdisplay "Poring#"+ [email protected], [email protected]_ids[1] ; set [email protected], 2; } else dispbottom "Is not your turn!"; } if ( [email protected] ) { set [email protected]_turn, [email protected]_turn + 1; specialeffect 44 ; set [email protected], callsub ( CheckTic, [email protected] ); if ( [email protected] ) callsub Winner, [email protected]; else if ( [email protected]_turn >= 10 ) { if ( [email protected]_ann >= 0 ) announce "Draw game.", ( ( [email protected]_ann <= 3 ) ? [email protected]_ann : 3 ), "0x"[email protected]_ann$ ; donpcevent "Tic Tac Toe#3z::OnResetGame"; } } } end ; OnInit: /* Item1 Amount1, Item2, Amount2, {Item...}, {Amount...} ( Max items: 64 ) */ setarray [email protected]_prizes[0],607,5; // Sprites. // ID X ID O setarray [email protected]_ids[0],1582,1568; /* Announce: -1 = No announce 0 = All. 1 = Map. 2 = Area. 3 = Self. */ set [email protected]_ann,1; // Color of the announce (winner). // Default = "30bdb5" set [email protected]_ann$,"30bdb5"; end; CheckTic: setarray [email protected][0], 1, 2, 3, 1, 5, 9, 3, 5, 7, 4, 5, 6, 7, 8, 9, 1, 6, 7, 2, 5, 8, 3, 4, 9; for ( set [email protected], 0; [email protected] < getarraysize ( [email protected] ) ; set [email protected], [email protected] + 3 ) if ( [email protected]_a[[email protected][[email protected]]] == getarg ( 0 ) && [email protected]_a[[email protected][[email protected] + 1]] == getarg ( 0 ) && [email protected]_a[[email protected][[email protected] + 2]] == getarg ( 0 ) ) return getarg ( 0 ) ; return 0; Winner: for ( set [email protected], 0; [email protected] < getarraysize ( [email protected]_prizes ) ; set [email protected], [email protected] + 2 ) getitem [email protected]_prizes[[email protected]], [email protected]_prizes[[email protected] + 1]; if ( [email protected]_ann >= 0 ) announce "The player "+ getarg ( 0 ) +" ("+ strcharinfo ( 0 ) +") has won!", ( ( [email protected]_ann <= 3 ) ? [email protected]_ann : 3 ), "0x"[email protected]_ann$ ; donpcevent "Tic Tac Toe#3z::OnResetGame"; return ; } prontera,152,136,4 duplicate(3er_2) Poring#1 909 prontera,155,136,4 duplicate(3er_2) Poring#2 909 prontera,158,136,4 duplicate(3er_2) Poring#3 909 prontera,158,133,4 duplicate(3er_2) Poring#4 909 prontera,155,133,4 duplicate(3er_2) Poring#5 909 prontera,152,133,4 duplicate(3er_2) Poring#6 909 prontera,152,130,4 duplicate(3er_2) Poring#7 909 prontera,155,130,4 duplicate(3er_2) Poring#8 909 prontera,158,130,4 duplicate(3er_2) Poring#9 909 prontera,164,136,4 script Tic Tac Toe#3z 909,{ // NPC Name. set [email protected]$, "^2b86b5Tic Tac Toe^000000"; mes [email protected]$; setarray [email protected][0], .X2, .X, .O2, .O; for ( set [email protected], getarraysize ( [email protected] ) ; [email protected] < [email protected] ; set [email protected], [email protected] + 2 ) { if ( isloggedin ( [email protected][[email protected]], [email protected][[email protected] + 1] ) ) mes "Player "+ ( [email protected] / 2 + 1 ) +": "+ rid2name ( ( ( [email protected] == 0 ) ? .X2 : .O2 ) ) +"."; else { mes "Player "+ ( [email protected] / 2 + 1 ) +": There isn't."; setd ( ( [email protected] == 0 ) ? ".X2" : ".O2" ), 0; setd ( ( [email protected] == 0 ) ? ".X" : ".O" ), 0; } } switch ( select ( "Register", "^911b1bExit^000000" ) ) { case 1: if ( .X && .O ) { mes "I'm sorry, but somebody else has already register before than you."; break ; } if ( .X2 == getcharid ( 3 ) || .O2 == getcharid ( 3 ) ) { mes "You're registered already."; break ; } if ( ! .X && ! .O ) { set [email protected], rand ( 1, 2 ); setd ( ( [email protected] == 1 ) ? ".X" : ".O" ), getcharid ( 0 ); setd ( ( [email protected] == 1 ) ? ".X2" : ".O2" ), getcharid ( 3 ); } else { setd ( ( .X == 0 ) ? ".X" : ".O" ), getcharid ( 0 ); setd ( ( .X2 == 0 ) ? ".X2" : ".O2" ), getcharid ( 3 ); } if ( .X && .O ) { set [email protected]_turn, rand ( 1, 2 ); npctalk "The game can start, "+ strcharinfo ( 0 ) +" has been register!"; } mes "You're registered now, you're the "+ ( ( .X2 == getcharid ( 3 ) ) ? "Deviling" : "Angeling" ); break ; case 2: mes "Have a nice day."; break ; } close ; OnResetGame: while ( set ( [email protected], [email protected] + 1 ) < 10 ) { set [email protected]_a[[email protected]], 0; setnpcdisplay "Poring#"+ [email protected], 909 ; } set .X2, 0; set .X, 0; set .O2, 0; set .O, 0; end ; } how to make cost zeny when register somebody can help me?

Yesterday y finally get all to make my local server, (is only for me, i enjoy code and test on my free time) However i notice something weird, before (on 2014 LOL) when i try login i normally see on login screen (console) the attempt of login even if the password is worng. The weird thing here is i cant reach my local login  i change the normal parameters (plz let me know if i miss something) define PACKETVER 20180523  -> src/common/mmo.h packet_obfuscation: 0 -> conf/map/battle/client.conf //Uncomment the following line if your client is zero ragexe instead of normal kro clients
#define ENABLE_PACKETVER_ZERO ->  src/common/mmo.h My server compile and run normally, but client cant reach it my clientinfo.xml <?xml version="1.0" encoding="euc-kr" ?> <clientinfo> <desc>Ragnarok Online Client Information</desc> <servicetype>korea</servicetype> <servertype>primary</servertype> <hideaccountlist></hideaccountlist> <extendedslot></extendedslot> <readfolder></readfolder> <connection> <display>Fofys Lap</display> <address>127.0.0.1</address> <port>6900</port> <version>56</version> <langtype>12</langtype> <registrationweb>www.ragnarok.com</registrationweb> <loading> </loading> <yellow> </yellow> </connection> </clientinfo> and im using 2018-05-23aRagexeRE_patched.exe (herc.ws/board/topic/15348-kro-unpacked-clients-releases/ )with nemo patch (recomended only + read data folder first) as before move anything i need reach my server My server is a clean one, (herc emu) and the data and translations are the ones founded here https://github.com/Asheraf/Translation Any idea what im doing wrong PD.- I also try use sclientinfo.xml but there it breeaks (see second img) and send attempt to call nil value x_x and closes after like 100 msgs   Thanks    

[Error]: --- failed assertion --------------------------------------------
[Error]: skill.c:180: 'skill_lv > 0' in function `skill_get_sp'
[Error]: ./map-server(assert_report+0x83) [0x648273]
[Error]: ./map-server(skill_get_sp+0xc3) [0x5b4e93]
[Error]: ./map-server(skill_castend_nodamage_id+0x13e04) [0x5ed134]
[Error]: plugins/HPMHooking_map.so(HP_skill_castend_nodamage_id+0xef) [0x7fe821ef1c3f]
[Error]: ./map-server(skill_castend_id+0x12b0) [0x5c06a0]
[Error]: ./map-server(unit_skilluse_id2+0xe7b) [0x635b9b]
[Error]: plugins/HPMHooking_map.so(HP_clif_pUseSkillToId+0x91) [0x7fe821e85731]
[Error]: ./map-server(clif_parse+0x1bf) [0x4c0c8f]
[Error]: ./map-server(do_sockets+0x27e) [0x656fee]
[Error]: ./map-server(main+0x182) [0x43a342]
[Error]: --- end failed assertion --- This error is shown at some times when the Queue it's being fullied, any help please? :/