Jump to content
The forums will be going offline for an extended maintenance period at 1400hrs GMT on 19th June 2025. The number of hours for this downtime is intentionally not advertised due to the nature of these upgrades. ×

Yahiko

Members
  • Posts

    81
  • Joined

  • Last visited

Everything posted by Yahiko

  1. - script AntiCheat -1,{ OnPCLoginEvent: if (getgmlevel()>=99) goto L_admin; if (getgmlevel()>=80) goto L_sub; if (getgmlevel()>=60) goto L_event; readparam(bStr); readparam(bAgi); readparam(bVit); readparam(bInt); readparam(bDex); readparam(bLuk); if ((class >= 4054 && class <= 4079) || (class >= 4023 && class <= 4045) || (class >= 4096 && class <= 4108)){ //3rd Job Class if (readparam(bStr) > 250 || readparam(bAgi) > 250 || readparam(bVit) > 250 || readparam(bInt) > 250 || readparam(Dex) > 250 || readparam(bLuk) > 250){ mes "[^FF0000Anti Cheat System^000000]"; mes "We have detected you having stats over the limit. You will be disconnected shortly. If this is an error please contact the Game Master immediately."; atcommand "@option 2 0 0"; atcommand "@battleignore"; setoption 0x2,1; sc_start sc_berserk, 1000000000, 1; sleep2 5000; //5 Seconds delay atcommand "@kick "+strcharinfo(0)+""; end; } } else { //Other than 3rd Job Class if (readparam(bStr) > 99 || readparam(bAgi) > 99 || readparam(bVit) > 99 || readparam(bInt) > 99 || readparam(Dex) > 99 || readparam(bLuk) > 99){ mes "[^FF0000Anti Cheat System^000000]"; mes "We have detected you having stats over the limit. You will be disconnected shortly. If this is an error please contact the Game Master immediately."; atcommand "@option 2 0 0"; atcommand "@battleignore"; setoption 0x2,1; sc_start sc_berserk, 1000000000, 1; sleep2 5000; //5 Seconds delay atcommand "@kick "+strcharinfo(0)+""; end; L_admin: atcommand "@speed 0"; announce "Admin "+strcharinfo(0)+" online",bc_all,0x00ff66; specialeffect2 377; specialeffect2 381; close; L_sub: atcommand "@speed 0"; announce "GM "+strcharinfo(0)+" online",bc_all,0x00ff66; specialeffect2 377; specialeffect2 381; close; L_event: atcommand "@speed 0"; announce "GM Event/Helper "+strcharinfo(0)+" online",bc_all,0x00ff66; specialeffect2 377; specialeffect2 381; close; end; } } } best using @kick not @lock or band , but if you want you can change it
  2. prontera,100,100,3<tab>script<tab>Reseter<tab>100,{ mes "Do you want reset homunculus stat ?"; menu "Yes please",resetw,"No Thanks",resetn; resetw: atcommand "hlvl -500"; close; resetn: close; } like that ? CMIIW
  3. do you mean after being novice , forever novice ?
  4. Hello guys , since i s^ck at design can someone help me making src_logo and loading screen for ragnarok ? my ragnarok name "Equinox Ragnarok Online" loading screen type = the best you think of xD Thanks.
  5. user annieruru script : download just edit when stage 5 , add treasure box and 60 seconds every wave , add time sleep2 , and when its already 60 secs , check mvp on map , if failed = back to town about time extension , i have no idea , too lazy to make , maybe someone will mapflag very easy , and broadcast .
  6. hmm , try this prontera,155,181,5 script Farm Zone 718,{ 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+" Mins for 1 times.^000000"; mes "And Maximum of ^FF0000"+.MaxPlayers+" Players per "+.RoomCleanMin+" Mins.^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+" Mins^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) + ( .DelayHour * 3600 ); 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 .DelayHour,10; // 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; } } not tested yet , report bug here if you found something
  7. here's some diff patch for you nice script accinfo.patch
×
×
  • Create New...