Jump to content

technoriot01

Members
  • Posts

    38
  • Joined

  • Last visited

Everything posted by technoriot01

  1. Are you releasing this? Anyway. from the contents and styles of your patcher .for me its 10/10 . just a little ragnarok thingy. =))
  2. bindatcmd xD - script identifyall -1,{ OnInit: bindatcmd "identifyall",strnpcinfo(3)+"::OnAtcommand"; end; OnAtcommand: getinventorylist; for(set @i, 0; @i < @inventorylist_count; set @i, @i + 1) { if (@inventorylist_identify[@i] == 1) continue; delitem2 @inventorylist_id[@i],1,0,0,0,0,0,0,0; getitem @inventorylist_id[@i],1; } }
  3. Help. this is anieruru's bg type emperium breaking script [taken from: http://rathena.org/b...g/page__st__20] : - script bg_emp#control -1,{ OnInit: setarray .rewarditem, 673, 5; // reward to the winning team set .winningscore, 2; // final score to win set .eventlasting, 20 * 60; // abort the system if there's no progress, 20 mins * seconds set .register_lasting, 10 * 60; // 10 minutes to joins, else abort registration, 10 mins * seconds sleep 1; disablenpc .rednpcname$; disablenpc .bluenpcname$; end; OnStart: if ( getwaitingroomstate( 0, .rednpcname$ ) < .minplayer2start || getwaitingroomstate( 0, .bluenpcname$ ) < .minplayer2start ) end; set .red, waitingroom2bg( "bat_a01", 171,346, strnpcinfo(0)+"::OnRedQuit", strnpcinfo(0)+"::OnRedDead", .rednpcname$ ); copyarray .team1aid, $@arenamembers, $@arenamembersnum; set .blue, waitingroom2bg( "bat_a01", 162,50, strnpcinfo(0)+"::OnBlueQuit", strnpcinfo(0)+"::OnBlueDead", .bluenpcname$ ); copyarray .team2aid, $@arenamembers, $@arenamembersnum; .inprogress = 2; awake strnpcinfo(0); bg_warp .red, "bat_a01", 171,346; bg_warp .blue, "bat_a01", 162,50; setwall "bat_a01", 154,51, 6, 4, 0, "bg_emp_town_blue"; setwall "bat_a01", 164,347, 6, 4, 0, "bg_emp_town_red"; bg_updatescore "bat_a01", 0, 0; sleep 6000; if ( .inprogress == 0 ) goto L_Abort; mapannounce "bat_a01", "Rules are simple. The first one to break the opponent's emperium will get a score.", 0; sleep 3000; if ( .inprogress == 0 ) goto L_Abort; mapannounce "bat_a01", "Score "+ .winningscore +" rounds to win ! ... GET READY", 0; sleep 2000; if ( .inprogress == 0 ) goto L_Abort; while (1) { for ( .@i = 5; .@i > 0; .@i-- ) { mapannounce "bat_a01", .@i +"", 0; sleep 1000; if ( .inprogress == 0 ) goto L_Abort; } if ( .score[1] == .winningscore -1 && .score[2] == .winningscore -1 ) mapannounce "bat_a01", "Final Round start!", 0; else mapannounce "bat_a01", "Round "+ .round++ +" start!", 0; bg_monster .red,"bat_a01",171,346, "--ja--",1915, strnpcinfo(3)+"::OnRedDown"; bg_monster .blue,"bat_a01",162,50, "--ja--",1914, strnpcinfo(3)+"::OnBlueDown"; delwall "bg_emp_town_red"; delwall "bg_emp_town_blue"; sleep .eventlasting * 1000; if ( .inprogress == 0 ) goto L_Abort; .score[ .winside ]++; bg_updatescore "bat_a01", .score[1], .score[2]; killmonster "bat_a01", strnpcinfo(3)+"::OnRedDown"; killmonster "bat_a01", strnpcinfo(3)+"::OnBlueDown"; if ( .winside ) mapannounce "bat_a01", .empkiller$ +" has Destroy "+( ( .winside == 1 )?"Blue":"Red" )+"'s side Emperium. "+( ( .winside == 1 )?"Red":"Blue" )+" team score a point !", 0; if ( .score[1] == .winningscore || .score[2] == .winningscore || !.winside ) break; sleep 5000; if ( .inprogress == 0 ) goto L_Abort; bg_warp .red, "bat_a01", 171,346; bg_warp .blue, "bat_a01", 162,50; setwall "bat_a01", 154,51, 6, 4, 0, "bg_emp_town_blue"; setwall "bat_a01", 164,347, 6, 4, 0, "bg_emp_town_red"; .winside = 0; } if ( .winside ) { mapannounce "bat_a01", ( ( .winside == 1 )?"Red":"Blue" )+" side wins !", 0; .@size = getarraysize( getd(".team"+ .winside +"aid") ); for ( .@i = 0; .@i < .@size; .@i++ ) getitem .rewarditem[0], .rewarditem[1], getd(".team"+ .winside +"aid["+ .@i +"]" ); } else mapannounce "bat_a01", "Time Out. Aborting the match.", 0; sleep 5000; L_Abort: bg_warp .red, "prontera", 155,182; bg_warp .blue, "prontera", 158,182; bg_destroy .red; bg_destroy .blue; delwall "bg_emp_town_red"; delwall "bg_emp_town_blue"; deletearray .team1aid; deletearray .team2aid; .round = .winside = .score[2] = .score[1] = .inprogress = 0; end; OnRedDown: callsub L_EmpDown, 2; OnBlueDown: callsub L_EmpDown, 1; L_EmpDown: .empkiller$ = strcharinfo(0); .winside = getarg(0); awake strnpcinfo(3); OnRedDead: OnBlueDead: end; OnRedQuit: callsub L_quit, .red, "Red", "Blue", 2; OnBlueQuit: callsub L_quit, .blue, "Blue", "Red", 1; L_quit: if ( bg_get_data( getarg(0), 0 ) ) end; mapannounce "bat_a01", "All "+ getarg(1) +" team members has Quit ! "+ getarg(2) +" side wins !", 0; .@size = getarraysize( getd(".team"+ getarg(3) +"aid") ); for ( .@i = 0; .@i < .@size; .@i++ ) getitem .rewarditem[0], .rewarditem[1], getd(".team"+ getarg(3) +"aid["+ .@i +"]" ); goto L_Abort; OnAutoAbort: sleep .register_lasting * 1000; delwaitingroom .rednpcname$; delwaitingroom .bluenpcname$; disablenpc .rednpcname$; disablenpc .bluenpcname$; if ( .inprogress == 1 ) { .inprogress = 0; announce "battleground has self-aborted because not enough members", 0; } end; } prontera,156,186,5 script gm_start 100,{ if ( getgmlevel() < 99 ) { mes "I only talk to gm"; close; } if ( getvariableofnpc( .inprogress, "bg_emp#control" ) ) { mes "abort ?"; next; if ( select ( "Yes", "No" ) == 2 ) close; set getvariableofnpc( .inprogress, "bg_emp#control" ), 0; awake "bg_emp#control"; killmonster "bat_a01", "bg_emp#control::OnRedDown"; killmonster "bat_a01", "bg_emp#control::OnBlueDown"; announce strcharinfo(0) +" has abort the battleground", 0; close; } mes "select how many players to start"; next; if ( input( .@a, 1, 30 ) ) close; set getvariableofnpc( .minplayer2start, "bg_emp#control" ), .@a; announce strcharinfo(0) +" has hosted "+ .@a +"vs"+ .@a +" battleground", 0; enablenpc getvariableofnpc( .rednpcname$, "bg_emp#control" ); enablenpc getvariableofnpc( .bluenpcname$, "bg_emp#control" ); donpcevent getvariableofnpc( .rednpcname$, "bg_emp#control" ) +"::OnStart"; donpcevent getvariableofnpc( .bluenpcname$, "bg_emp#control" ) +"::OnStart"; set getvariableofnpc( .inprogress, "bg_emp#control" ), 1; donpcevent "bg_emp#control::OnAutoAbort"; close; } prontera,155,182,5 script Red side#bg_emp 100,{ end; OnStart: waitingroom "Red side", getvariableofnpc( .minplayer2start, "bg_emp#control" ) +1, "bg_emp#control::OnStart", getvariableofnpc( .minplayer2start, "bg_emp#control" ); end; OnInit: set getvariableofnpc( .rednpcname$, "bg_emp#control" ), strnpcinfo(0); end; } prontera,158,182,5 script Blue side#bg_emp 100,{ end; OnStart: waitingroom "Blue side", getvariableofnpc( .minplayer2start, "bg_emp#control" ) +1, "bg_emp#control::OnStart", getvariableofnpc( .minplayer2start, "bg_emp#control" ); end; OnInit: set getvariableofnpc( .bluenpcname$, "bg_emp#control" ), strnpcinfo(0); end; } bat_a01 mapflag battleground 2 bat_a01 mapflag nosave SavePoint bat_a01 mapflag nowarp bat_a01 mapflag nowarpto bat_a01 mapflag noteleport bat_a01 mapflag nomemo bat_a01 mapflag nopenalty bat_a01 mapflag nobranch bat_a01 mapflag noicewall i want to change : prontera,156,186,5 script gm_start 100,{ instead having a npc to start the game i want to use OnWhisperGlobal: if ( getgmlevel() < 99 ) { or Bindatcmd if possible. But I dont know how. Please help me. Thanks In advance. Ops. Fixed it myself [sorry]. i've changed prontera,156,186,5 script gm_start 100,{ to - script bg -1,{ OnInit: bindatcmd "bg",strnpcinfo(3)+"::OnAtcommand"; end; OnAtcommand: [solved]
  4. Hello. as the title states. I am requesting for a custom 3rd job "aura/s" . Or a link where to get one. I tried spriterepository.com but all i saw were for trans job. Anyone can give me 3rd job aura? Thanks. PS: Sorry for poor english
  5. Sorry about that. where in the script should i put it? I tried to put it on top of OnMenu: OnPCLoadMapEvent: getmapxy @m_char$,@x,@y,0; getmapxy @m_npc$,@x,@y,1,strnpcinfo(0); if( @m_char$ == @m_npc$ ) showevent 1,1; end; OnMenu: set .@size, getarraysize(@i); if (!.@size) set .@i, select(.menu$); else if (.@size == 1) set .@i, @i[0]; else { for(set .@j,0; .@j<.@size; set .@j,.@j+1) set .@menu$, .@menu$+.Shops$[@i [.@j]]+":"; set .@i, @i[select(.@menu$)-1]; } But still not working Up. Pls help =(
  6. https://rathena.svn.sourceforge.net/svnroot/rathena/trunk/npc/custom/quests/quest_shop.txt How to add showevent? I want to add showevent 1, 0; Using OnPCLoadMapEvent or OnTouch to display the emoticon without clicking the NPC. Thanks In Advance
  7. It's working. but when i try to put the showevent script on Euphy's Quest it's not appearing anymore. here it is.: anyone?
  8. Hello. I have this NPC script : saevern,157,131,5 script BlahBlah#NPC1 100,{ mes "Blah blah"; close; OnPCLoadMapEvent: getmapxy @m_char$,@x,@y,0; getmapxy @m_npc$,@x,@y,1,strnpcinfo(0); if( @m_char$ == @m_npc$ ) showevent 1,0; end; } I used this to try if my showevent is appearing. But it's not. Is there something wrong with the script? or The showevent emoticons have files in the data folder that i do not have? If there is can you give me the download link? Thanks In Advance. PS: sorry for poor english.
  9. I already put it on my system folder but its the same thing. No mini icons still.
  10. Hi im using 2012-04-10 but my mini icons on mini map are not showing. Im using this system folder = http://supportmii.com/ro1/Clients/Judas_Setups/2012_Setup/System/LuaFiles514/
×
×
  • Create New...