Jump to content
  • Sign Up

xlaws27

Members
 View Profile  See their activity

  • Content Count

    225

  • Joined

  • Last visited

Posts posted by xlaws27

  4. Posted · Edited by xlaws27

    i am very desperate to find this map. but i just cant find it lol :((

    i just want to ask if anyone here know this and send me the link? please?

    the name of the server is Reflex Ragnarok Online 2010~2012 ,

    i dont have the files anymore and i cant find their download link so that i cant copy the files on their grf :((

    please help me. !

     

    this is the video

    here are the screenshots (sry for low quality )

    fuYQwl7.jpg

    FLzsjUC.jpg

    Bilggmw.png

    C4xCBej.png

    y7yqCMr.png

     

    h3DDSUQ.png

  6. Posted

    here are the errors/malfunctions

    1.instead of starting from round 1, it will start at round 6 ( it should start at round 1  )

    9u83nb.jpg

    2. theres no close button when you clicked it while waiting for 5 seconds for the next round

    ( there should be a close button )

    302a1si.jpg

    3. There's no close button when you clicked it while waiting for the event. ( there should be a close button )

    2rm8pl3.jpg

     

    Here's the script

    prontera,157,168,5	script	Fast-Type Event	421,{    if(getgroupid() >= 99) {        mes "Fast-Type event is" + (.Event?"^00FF00 ON^000000":"^FF0000 OFF^000000");        if(select((!.Event?"^00FF00Start":"^FF0000End") + " Event^000000","Normal Player") == 2) { next; goto PlayerMenu; }        switch(.Event) {            case 1:                close2;                .Event = 0;                .Round = 0;                .String$ = "";                announce "Fast-Type Event: A GM has ended the event.",0; break;                end;            default:                close2;                donpcevent "Fast-Type Event::OnStart";                end;        }        end;    }    PlayerMenu:    if(!.Event) {        mes "There is no Event right now.";    } else if(.String$ == "") {        npctalk "Wait for the next round..";    } else {        mes "Type the Correct Sentences.";        mes "^FF0000" + .String$ + "^000000";        input .@Type$;        if( .String$ == "" ) {            announce "Sorry, " + strcharinfo(0) + " is a bit slow..",0;            close;        }        if (.String$ == .@Type$) {            getitem 7227, 5; //EDIT THE PRIZE HERE            announce "Fast-Type Event: " + strcharinfo(0) + " typed the correct string!",0;            .String$ = "";            .Round++;            close2;            donpcevent "Fast-Type Event::OnStart2";            end;        } else {            close2;            announce "" + strcharinfo(0) + " mispelled some strings XD",0;            end;        }    }    end;    OnMinute52:    if(.Event) end;    donpcevent "Fast-Type Event::OnStart";    end;    OnStart:    announce "Fast-Type Event has started at Event AREA !",0;    L_Begin:    .Event = 1;    .String$ = "";    while(getstrlen( .String$ ) < .Length) {        .String$ = .String$ + .List$[rand( getarraysize(.List$))];    }    announce "Round "+(.Round+1)+" Started !",0;    end;    OnStart2:    sleep2 5000;    if(.Round == .Rounds) {        if(!.Event) end;        announce "Fast-Type Event: Event is over!",0;        .Event = 0;        .Round = 0;        end;    }    if(!.Event) end;    announce "Fast-Type Event: Next round starts in 5 seconds...",0;    sleep2 5000;    if(!.Event) end;    goto L_Begin;    OnInit:    .Length = 28; //EDIT THE LENGTH OF CHARACTERS TO BE TYPED    .Round = 5; //EDIT THE ROUNDS    setarray .List$,";","B","_","D","E","%","=","H","I","J","/","L","M","N","6","P","Q","]","S","T",","; //YOU CAN ADD LETTERS, DIGITS & SYMBOLS HERE..    end;}

    hope you can help me. thanks in advance :) :) :)

     

  7. Posted · Edited by xlaws27

     

    yeah thank u so much its working now..

    do you recommend this instead of plug in?

    because @@Oxxy said --tho that's madness, imagine server with 200 online. Query'll load server a lot.--

     

    btw can u make it like on the plug in?

    @shower (itemid) (quantity)

    example

    @shower 501 100

     

    sorry for asking too much.

     

    frequently query problem wasn't exist on new one , and here you go!  @shower <Item ID> <amount>

    -	script	asdfgadhjkl	-1,{  end;OnInit:	bindatcmd "shower",strnpcinfo(3)+"::OnShowerCommand",80,80;	end;OnShowerCommand:	.@showeritemid = atoi(.@atcmd_parameters$[0]);    	.@showeritamount = atoi(.@atcmd_parameters$[1]);	if ( !.@showeritemid ) {		message strcharinfo(0), "@shower <Item ID> <amount>";        	end;	}    	if ( getiteminfo(.@showeritemid,2) == -1 ) {        	message strcharinfo(0), "Invalid Item ID";		message strcharinfo(0), "@shower <Item ID> <amount>";        	end;    	}	if(.@showeritamount <= 0) {        	message strcharinfo(0), "Invalid Item Amount";		message strcharinfo(0), "@shower <Item ID> <amount>";        	end;    	}	query_sql("SELECT `account_id` FROM `login` WHERE `sex`!='S' ORDER BY `account_id` ASC LIMIT 1", .@minaid);	query_sql("SELECT `account_id` FROM `login` WHERE `sex`!='S' ORDER BY `account_id` DESC LIMIT 1", .@maxid);	.@showermap$ = strcharinfo(3);	freeloop(1);	while ( .@minaid <= .@maxid ) {		if(!attachrid(.@minaid++)) continue;		if(strcharinfo(3) !=.@showermap$ ) continue;		if(checkvending()) continue;		getitem .@showeritemid,.@showeritamount;		announce "Something has been drop from the sky!",bc_self,0xFFC0CB;	}	freeloop(0);end;}

     

    THANK YOU SO MUCH!!!!

    BTW

    will i received some lag/error issues if i showered it to 100~200 players?

  8. Posted

     

    -	script	at_sameip	-1,{OnInit:bindatcmd "sameip",strnpcinfo(3)+"::OnAtSameIP";//,99,99,0; // 0 = No log, 1 = Log usageend;OnAtSameIP:freeloop(1);.@size = query_sql("SELECT `account_id` FROM `char` WHERE `online` = '1'",.@acct_id);.@size2 = query_sql("SELECT `account_id`, `last_ip` FROM `login` WHERE `account_id` != '1'", .@aid, .@ip$);while( .@a < .@size ) {	for( .@i = 0; .@i < getarraysize(.@aid); .@i++ ) {		if( .@aid[.@i] == .@acct_id[.@a] ) {			.@tempaid$[.@a] = ""+ .@aid[.@i] +"";			.@tempaip$[.@a] = .@ip$[.@i];			}		}	.@a++;}.@size3 = getarraysize(.@tempaid$);while( .@c != .@size3 ) {	for( .@i = 0; .@i < getarraysize( .@usedaids$ ); .@i++ ) {		if( .@usedaids$[.@i] == .@tempaid$[.@c] ) { //Account ID already in array.		.@used = 1;		}	}	if( !.@used ) {		.@usedaids$[( getarraysize( .@usedaids$ ) + 1 )] = .@tempaid$[.@c];		.@duplicateaid$[.@c] = "Account IDs: "+ .@tempaid$[.@c] +"";		.@duplicaterid2name$[.@c] = "Character Names: "+ rid2name( atoi( .@tempaid$[.@c] ) ) +"";		.@duplicateaip$[.@c] = "IP Address: "+ .@tempaip$[.@c] +"";				for( .@i = 0; .@i < getarraysize( .@tempaid$ ); .@i++ ) {			if( .@tempaip$[.@c] == .@tempaip$[.@i] && .@tempaid$[.@c] != .@tempaid$[.@i] ) {				.@duplicateaid$[.@c] = .@duplicateaid$[.@c] +", "+ .@tempaid$[.@i] +"";				.@duplicaterid2name$[.@c] = .@duplicaterid2name$[.@c] +", "+ rid2name( atoi( .@tempaid$[.@i] ) ) +"";				.@usedaids$[( getarraysize( .@usedaids$ ) + 1 )] = .@tempaid$[.@i];				}			}		}	.@used = 0;	.@c++;	}dispbottom "---------------- List of Same IP User ----------------";for( .@i = 0; .@i < getarraysize(.@duplicateaid$); .@i++ ) {	if( .@duplicateaid$[.@i] != "" ) {		dispbottom " ";		dispbottom .@duplicateaip$[.@i];		dispbottom .@duplicateaid$[.@i];		dispbottom .@duplicaterid2name$[.@i];		}	}freeloop(0);end;}

    All you needed to do was just change the sql query to omit the requirement for a map name, and then it'll get data on everyone who is online at the time of the scripts activation.

     

    My only concern is that your using rAthena emulator. This means your arrays are limited to 128 elements. A lot more would have to be changed to make it work 100% for you. So, you can just take this edit and have someone over there change it to work with rA's array system

     

    its working and its very cool

    but when i type @sameip all players on every map will be shown

     

    can u make it like when i type @sameip it will only show the ip of the players (on a certain map where i am)

     

     

     

  9. Posted

     

    now i type .@shower no more lag but I received nothing

    updated, try again...

     

    -	script	asdfgadhjkl	-1,{  end;OnInit:	bindatcmd "shower",strnpcinfo(3)+"::OnShowerCommand",80,80;	end;OnShowerCommand:	query_sql("SELECT `account_id` FROM `login` WHERE `sex`!='S' ORDER BY `account_id` ASC LIMIT 1", .@minaid);	query_sql("SELECT `account_id` FROM `login` WHERE `sex`!='S' ORDER BY `account_id` DESC LIMIT 1", .@maxid);	.@showermap$ = strcharinfo(3);	freeloop(1);	while ( .@minaid <= .@maxid ) {		if(!attachrid(.@minaid++)) continue;		if(strcharinfo(3) !=.@showermap$ ) continue;		if(checkvending()) continue;		getitem 501,100;		announce "Something has been drop from the sky!",bc_self,0xFFC0CB;	}	freeloop(0);end;}

    yeah thank u so much its working now..

    do you recommend this instead of plug in?

    because @@Oxxy said --tho that's madness, imagine server with 200 online. Query'll load server a lot.--

     

    btw can u make it like on the plug in?

    @shower (itemid) (quantity)

    example

    @shower 501 100

     

    sorry for asking too much.

  10. Posted

     

    thumb-2b4793fcb08056858af60430ea6dd3d2-screenhercules010.jpg

    File Name: Ultimate Guild Ranker

    File Submitter: Dastgir

    File Submitted: 17 Mar 2014

    File Category: PvP, WoE, GvG, & Battleground

     

    Script By Request : http://herc.ws/board/topic/4756-ultimate-guild-ranking

    Percentage Changes:AgitCount= 20%Emp Break = 50%Active Participants = 20%KDR = 10%
    Features:

    [*]Guild Ranking

    [*]Previous Month Guild Ranking

    [*]Rewards based on previous month

    Edits to made after installing the Script:

    Open npc/guild/agit_main.txt

    Add Following Line

        doevent "UltimateRanker#00::OnEmpBreak";
    Before
        // Adjust Economy Invest Level for Castle	set .@Economy,getcastledata(strnpcinfo(2),2) - 5;

    Have a Custom WoE? And its not triggering the Script??

    Solution: add the following line on EmperiumBreaking Label.

    doevent "UltimateRanker#00::OnEmpBreak";

    Please report any bugs/suggestions.

     

    Click here to download this file

    sorry for bumping this but

    how can i reset all the ladder?

  12. Posted · Edited by xlaws27

     

    db/re/map_zone_db.conf

    insert the "loadevent" into the mapflags brackets of the zone named "All".

     

    mapflags: (

    "loadevent",

    )

    -	script	asdfghjkl	-1,{  end;OnInit:	bindatcmd "shower",strnpcinfo(3)+"::OnShowerCommand",80,80;	end;OnShowerCommand:	.@size = query_sql("select account_id from `char` where online = 1 and last_map ='"+strcharinfo(3)+"'",.@aid);	for ( .@i = 0; .@i < .@size; .@i++ ) {		if(!attachrid(.@aid[.@i])) continue;		if(CheckVending()) continue;		getitem 501,100;		announce "Something has been drop from the sky!",bc_self,0xFFC0CB;				}	end;OnPCLoadMapEvent:	query_sql("UPDATE `char` SET last_map='"+strcharinfo(3)+"'");end;}

    zones: (

    {

     /* All zone is a dynamic (very special) zone that is forcebly inherited by ALL maps automatically */

     name: "All" /* changing this name requires MAP_ZONE_ALL_NAME to also be changed in src/map/map.h file */

     

     disabled_skills: {

       //both examples below disable napalm beat (id 11) to players

       //MG_NAPALMBEAT: "PLAYER"

       //ID11: "PLAYER"

     }

     

     disabled_items: {

       //Both examples below disable apple (id 501)

       //Apple: true

       //ID501: true

     }

     

     mapflags: (

     "loadevent",

     )

      mapflags: (

     )

     

    --------------------------------------------------------------------------------------------------------

    this is what i did. is it okay?

     

    and

     

    theres an error what i did to fix it is i remove the () but i think what i did was wrong .. can u help me

    1knk1.jpg

     

     

     

  15. Posted

    can someone make it? i dont wnt plug in because its very hard to insert thanks

     

    example:

    i am on prontera then

    i type @shower 501 100

    all players on prontera will get an 100 pcs of red potion then the player will receive a message "Something has been drop from the sky"

     

  16. Posted

     

    Actually this nowarpto mapflag is designed for @warp command and not @go since you only have limited maps available for @go and you can simply remove the map if you don't want to allow people from warping to that town. 

     

    Edit:

     

    I have another problem though, the script does not bypass the nowarp mapflag even if your GM level is high.

     

    So the documentation for nowarpto is correct, then; lost track of what the original issue was for a sec lol.

     

     

    In your last reply, you mentioned replacing mf_nowarp with mf_nowarpto:

    } else if (getgroupid() < getarg(4) || getmapflag(getarg(0), mf_nowarp)) {

     

    However, the intent of this line is to prevent warping if the player's Group ID isn't high enough OR if the destination has a nowarp flag, regardless of Group ID. You can bypass this for GMs by changing the expression a little (I'm sure there's a prettier way to do it, but I'm not feeling up to it):

    } else if (getgroupid() < getarg(4) || getmapflag(getarg(0), mf_nowarp) && getgroupid() < getarg(4)) {

     

     

    In regard to your original inquiry, the behaviour of nowarp is to prevent the use of @go to a destination; to prevent the use of @go from a map flagged with nowarp (despite this not being the intent of the nowarp flag), you can still prevent warping by adding an expression similar to my original suggestion:

    		} else if (getmapflag(strcharinfo(3), mf_nowarp)) {			message strcharinfo(0), "You are not authorised to warp from this map.";

    If you would like to prevent warping from specific maps, I would recommend moving forward with the filter/blacklist route — hell, you could even prevent both nowarp-flagged and specific maps from being warped to if you wanted to.

    i tried it but still any gm lvl cant .@go 0 on castles

  21. Posted

    // Wizard
    9,  24000,55 ,500  ,900

     

    // Sage
    16,  24000,75 ,500  ,700

     

    the 4th one is the hp multiplicator right?

    i changed 900 to 700 but nothing happens

    i .@reloadpcdb .@reloadskilldb . @reloadbattleconf .@reloaditemdb .@reloadmobdb but nothing happens ( do i have to recompile it?) there are more reload commands?

     

     

  22. Posted 

    prontera,164,171,0	script	Farm Zone	123,{mes "Do you want to enter my Farm Zone?";menu "Ok",-,"No thanks.",L_No;warp "ordeal_3-1.gat",0,0;close;L_No:close;}// Monstersordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0ordeal_3-1,0,0,0,0	monster	War Guardian	1439,200,0,0,0

    can some1 help me how to add every 10 minutes all players on the map will be warped to prontera?

  23. Posted

     

    Well, you can comment everything inside the case, just don't comment the "case x:" as well, that way they'll be getting increased chance at other statuses instead of the ones you commented out.

     

    If for every level of Mind Breaker you want 10%, then replace the lines I brought up before with:

    		if (sc->data[SC_MINDBREAKER])			matk *= 1.1;

     

     

    2>..srcmapstatus.c(4748): warning C4244: '*=' : conversion from 'double' to 'int', possible loss of data

  24. Posted

     

    Mind Breaker at 10% per level, you mean? Or total?

    Per level, src/map/status.c:

    		if (sc->data[SC_MINDBREAKER])			matk += matk * sc->data[SC_MINDBREAKER]->val2/100;

    change to

    		if (sc->data[SC_MINDBREAKER])			matk += matk * sc->data[SC_MINDBREAKER]->val2/200;

     

    For gospel src/map/skill.c:

    				int i = rnd()%13; // Positive buff count				int time = skill->get_time2(sg->skill_id, sg->skill_lv); //Duration				switch (i) {					case 0: // Heal 1~9999 HP						heal = rnd() %9999+1;						clif->skill_nodamage(ss,bl,AL_HEAL,heal,1);						status->heal(bl,heal,0,0);						break;					case 1: // End all negative status						status->change_clear_buffs(bl,2);						if (tsd) clif->gospel_info(tsd, 0x15);						break;					case 2: // Immunity to all status						sc_start(ss,bl,SC_SCRESIST,100,100,time);						if (tsd) clif->gospel_info(tsd, 0x16);						break;					case 3: // MaxHP +100%						sc_start(ss,bl,SC_INCMHPRATE,100,100,time);						if (tsd) clif->gospel_info(tsd, 0x17);						break;					case 4: // MaxSP +100%						sc_start(ss,bl,SC_INCMSPRATE,100,100,time);						if (tsd) clif->gospel_info(tsd, 0x18);						break;					case 5: // All stats +20						sc_start(ss,bl,SC_INCALLSTATUS,100,20,time);						if (tsd) clif->gospel_info(tsd, 0x19);						break;					case 6: // Level 10 Blessing						sc_start(ss,bl,SC_BLESSING,100,10,time);						break;					case 7: // Level 10 Increase AGI						sc_start(ss,bl,SC_INC_AGI,100,10,time);						break;					case 8: // Enchant weapon with Holy element						sc_start(ss,bl,SC_ASPERSIO,100,1,time);						if (tsd) clif->gospel_info(tsd, 0x1c);						break;					case 9: // Enchant armor with Holy element						sc_start(ss,bl,SC_BENEDICTIO,100,1,time);						if (tsd) clif->gospel_info(tsd, 0x1d);						break;					case 10: // DEF +25%						sc_start(ss,bl,SC_INCDEFRATE,100,25,time);						if (tsd) clif->gospel_info(tsd, 0x1e);						break;					case 11: // ATK +100%						sc_start(ss,bl,SC_INCATKRATE,100,100,time);						if (tsd) clif->gospel_info(tsd, 0x1f);						break;					case 12: // HIT/Flee +50						sc_start(ss,bl,SC_INCHIT,100,50,time);						sc_start(ss,bl,SC_INCFLEE,100,50,time);						if (tsd) clif->gospel_info(tsd, 0x20);						break;				}			}

    to

    				int i = rnd()%12; // Positive buff count				int time = skill->get_time2(sg->skill_id, sg->skill_lv); //Duration				switch (i) {					case 0: // Heal 1~9999 HP						heal = rnd() %9999+1;						clif->skill_nodamage(ss,bl,AL_HEAL,heal,1);						status->heal(bl,heal,0,0);						break;					case 1: // End all negative status						status->change_clear_buffs(bl,2);						if (tsd) clif->gospel_info(tsd, 0x15);						break;					case 2: // Immunity to all status						sc_start(ss,bl,SC_SCRESIST,100,100,time);						if (tsd) clif->gospel_info(tsd, 0x16);						break;					case 3: // MaxHP +100%						sc_start(ss,bl,SC_INCMHPRATE,100,100,time);						if (tsd) clif->gospel_info(tsd, 0x17);						break;					case 4: // MaxSP +100%						sc_start(ss,bl,SC_INCMSPRATE,100,100,time);						if (tsd) clif->gospel_info(tsd, 0x18);						break;					case 5: // All stats +20						sc_start(ss,bl,SC_INCALLSTATUS,100,20,time);						if (tsd) clif->gospel_info(tsd, 0x19);						break;					case 6: // Level 10 Blessing						sc_start(ss,bl,SC_BLESSING,100,10,time);						break;					case 7: // Level 10 Increase AGI						sc_start(ss,bl,SC_INC_AGI,100,10,time);						break;					case 8: // Enchant weapon with Holy element						sc_start(ss,bl,SC_ASPERSIO,100,1,time);						if (tsd) clif->gospel_info(tsd, 0x1c);						break;					case 9: // Enchant armor with Holy element						sc_start(ss,bl,SC_BENEDICTIO,100,1,time);						if (tsd) clif->gospel_info(tsd, 0x1d);						break;					case 10: // DEF +25%						sc_start(ss,bl,SC_INCDEFRATE,100,25,time);						if (tsd) clif->gospel_info(tsd, 0x1e);						break;					case 11: // HIT/Flee +50						sc_start(ss,bl,SC_INCHIT,100,50,time);						sc_start(ss,bl,SC_INCFLEE,100,50,time);						if (tsd) clif->gospel_info(tsd, 0x20);						break;				}			}

    what i did to gospel i just // the buffs that i want to removed is that okay?

     

    and for the mind breaker what i want is any lvl of mind breaker adds only matk 10% thank u for ur help anyway

    pls help me on mb

×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.

  I accept