alone20

June 15, 2014

How can i make my pvp room, for all people can kill each other even if in same guild PLEASE HELP

June 13, 2014

erm. What's the error?

Did you input this line:

- script hourlypoints -1,{

Like this? :

-<tab>script<tab>hourlypoints<tab>-1,{

yes i did that. still not working

June 12, 2014

its a cool event, anyon can help him with this?

June 12, 2014

Its not working for me.




//====================================================================

//===== Hourly Points Script =========================================

//===== By: ==========================================================

//= GorthexTiger modified by Nibi

//===== Current Version: =============================================

//= 1.0

//===== Compatible With: =============================================

//= Any eAthena Version / rAthena

//===== Description: =================================================

//= Get Points every successful hours of gameplay, you cannot get

//= the points even if you miss a second or a minute. A player will

//= get a very big bonus if they played 12 hours consecutively

//= or without logging out of the game. If the player is vending

//= the script will then stop.

//===== Additional Comments: =========================================

//= You can modify the script to your liking.

//= The default points is Kafrapoints change it anyway if you like.

//= 1.1 = Check Chatting too

//= 1.2 = 5 Minute Idle Check & @at/@autotrade check.

//= 1.3 = Corrected the current balance line on 12 Hours Consecutive

//====================================================================



- script hourlypoints -1,{

OnPCLoginEvent:

    attachnpctimer ""+strcharinfo(0)+"";

    initnpctimer;

    end;



OnTimer30000:

    if(checkvending() || checkchatting() || checkidle()) {

        dispbottom "The hourly points event stopped because you were vending / chatting / afk. Please relog if you wish to start again.";

        stopnpctimer;

        end;

    }

    end;



OnTimer60000:

    set @minute, @minute + 1;

    if(@minute == 60){

        set @minute,0;

        set .@point_amt, 1;

        getitem 7037 .@point_amt;

        set @consecutive_hour, @consecutive_hour + 1;

    }

    if(@consecutive_hour == 6) {

        set @consecutive_hour,0;

        set .@cpoint_amt, 10;

        getitem 7037 .@cpoint_amt;

    }

    stopnpctimer;

    initnpctimer;

    end;

}

June 10, 2014

helpp

June 10, 2014

npc/instances/EndlessTower.txt

OnMyMobDead:
	donpcevent instance_npcname("Lost Soul#102")+"::OnEnable";
	// add these...
	getpartymember getcharid(1),2;
	for( .@i = 0; .@i < $@partymembercount; .@i++ ){
		getitem 512,10,$@partymemberaid[.@i];
		getitem 512,20,$@partymemberaid[.@i];
		getitem 512,30,$@partymemberaid[.@i];
	}
	end;

add above code to the script, then they will get the prize once they kill the Naght Seiger.

Thanks mr emistry

June 9, 2014

help!

June 7, 2014

anyone who can help me with this kind of script? i want to give automatic prize for the party who can reach the top of ET

June 4, 2014

1.

//===== Hourly Points Script =========================================
//===== By: ==========================================================
//= GorthexTiger modified by Nibi
//===== Current Version: =============================================
//= 1.0
//===== Compatible With: =============================================
//= Any eAthena Version
//===== Description: =================================================
//= Get Points every successful hours of gameplay, you cannot get
//= the points even if you miss a second or a minute. A player will
//= get a very big bonus if they played 3 hours consecutively
//= or without logging out of the game. If the player is vending
//= the script will then stop.
//===== Additional Comments: =========================================
//= You can modify the script to your liking.
//= The default points is Kafrapoints change it anyway if you like.
//= 1.1 = Check Chatting too
//= 1.2 = 5 Minute Idle Check & @at/@autotrade check.
//= 1.3 = Corrected the current balance line on 12 Hours Consecutive
//====================================================================
-    script    hourlypoints    -1,{
//--Start of the Script
OnPCLoginEvent:
    addtimer .timer,"hourlypoints::OnPointGet";
    end;
    
OnPointGet:
    while(checkvending() >= 1 || checkchatting() == 1 || checkidle()>=.dlimit) {
        sleep2 .delay;
        if(.@mes$=="")
            dispbottom set(.@mes$,"The hourly points event haulted because you were vending, chatting, or idle.");
    }
    set #CASHPOINTS, #CASHPOINTS + .point_amt;
    dispbottom "You received "+.point_amt+" Kafrapoints by staying ingame for 1 hour";
    dispbottom "Current Balance = "+#CASHPOINTS+" Kafrapoints";
    set @consecutive_hour, @consecutive_hour + 1;

    //Check for 3 hours consecutive
    if(@consecutive_hour == 3) {
        set @consecutive_hour,0;
        set #CASHPOINTS, #CASHPOINTS + .cpoint_amt;
        dispbottom "You receive "+.cpoint_amt+" Kafrapoints in playing for 12 consecutive hours";
        dispbottom "Current Balance = "+#CASHPOINTS+" Kafrapoints";
    }
    addtimer .timer,"hourlypoints::OnPointGet";
    end;

OnInit:
    set .timer, 1000*60*60; //Timer in milliseconds.
    set .cpoint_amt, 50; //Points gained for consecutive time online.
    set .point_amt, 10; //Normal points gained.
    set .delay, 1000; //Delay for idle re-check check.
    set .dlimit, 60*5; //Stop points if afk greater then in seconds.
}

2. Use @check to check cashpoints

-    script    check    -1,{
    OnInit:
        bindatcmd "check",strnpcinfo(3)+"::OnCheck";
        end;
    OnCheck:
        dispbottom "You have " +#CASHPOINTS+ " cash points.";
        end;
}

3. The Shop

http://rathena.org/board/files/file/2504-multi-currency-shop/

Thanks for the help. ^^

June 4, 2014

I need help for this script guys, help!

June 4, 2014

//Event Start Time

//OnClock0600:	//6am
//OnClock1200:	//12pm noon
OnClock1415:	//2:15pm
//OnClock1800:	//6pm
OnClock0000:	//12pm midnight

To

OnMinute30:

Thansk alot for the help!

June 3, 2014

adde if( BaseJob == Job_Novice ) { under case 1:

thanks. one more thing sir. can u do it every 30 mins.

June 2, 2014

-	script	announce_RFYL	-1,{

//Event Start Time

//OnClock0600:	//6am
//OnClock1200:	//12pm noon
OnClock1415:	//2:15pm
//OnClock1800:	//6pm
OnClock0000:	//12pm midnight

announce "The Run For Your Life Event will begin in 3 Minutes.",0;
killmonsterall "quiz_01";
sleep 5000;
announce "The Run For Your Life NPC has appeared in Prontera!",0;
enablenpc "RFYL Warper";
sleep 55000;
announce "Event GM: Run For Your life will begin in 2 minutes.You better get ready!",0;
sleep 60000;
announce "Event GM: Run For Your Life will begin in 1 minute!",0;
sleep 30000;
mapannounce "quiz_01","In 30 seconds the monster will appear!",0;
sleep 25000;
announce "Event GM:Run For Your life Event will begin in ~5~",0;
sleep 1000;
announce "~4~",0;
sleep 1000;
announce "~3~",0;
sleep 1000;
announce "~2~",0;
sleep 1000;
announce "~1~",0;
sleep 1000;
announce "Event GM: Run For Your Life Event Has begun!!",0;
monster "quiz_01",42,369,"Agav",2500,1;
disablenpc "RFYL Warper";
sleep 10000;
monster "quiz_01",42,369,"Agav-2",2500,1;
sleep 10000;
monster "quiz_01",42,369,"Agav-3",2500,1;
sleep 10000;
monster "quiz_01",42,369,"Agav-4",2500,1;
sleep 10000;
monster "quiz_01",42,369,"Agav-5",2500,1;
initnpctimer;
end;

OnTimer5000:
if ( getmapusers("quiz_01") == 0 )
{
killmonsterall "quiz_01";
announce "Run For Your Life Event has ended.All the monsters are gone.",0;
disablenpc "Prize";
stopnpctimer;
end;
}
else if ( getmapusers("quiz_01") > 1 )
{
if ($@RFYLCounter >= 3){
    switch(rand(0,2)){
        case 0: mapannounce "quiz_01",getmapusers("quiz_01") +" players are still alive.",0,0x00FF00; break;
        case 1: mapannounce "quiz_01",getmapusers("quiz_01") +" players are STILL alive? Are you sure you're not cheating?",0,0x00FF00; break;
        case 2: mapannounce "quiz_01",getmapusers("quiz_01") +" players are STILL ALIVE? Seriously, I'm gonna have to report you.",0,0x00FF00; break;
        }
} else {
    mapannounce "quiz_01",getmapusers("quiz_01") +" players are still alive.",0,0x00FF00;
}
sleep 10000;
set $@RFYLCounter,$@RFYLCounter+1;
initnpctimer;
end;
}
initnpctimer;
end;

OnPCDieEvent:
getmapxy .@maprfyl$,.@xrfyl,.@yrfyl,0;
if ( .@maprfyl$ == "quiz_01") {
sleep2 1;
warp "prontera",156,223;
atcommand "@alive "+ strcharinfo(0);
dispbottom "You have lost...";
}
sleep2 1000;
if ( .@maprfyl$ == "quiz_01" && getmapusers("quiz_01") == 1 ) {
killmonsterall "quiz_01";
mapannounce "quiz_01","You have won, please approach to Prize NPC.",0;
enablenpc "Prize";
set $@RFYLCounter,0;
stopnpctimer;
end;
}
end;
}

quiz_01,42,369,3	script	Prize	72,{
announce "Hey "+strcharinfo(0)+" has won in Run For Your Life Event Congrats!",0;
getitem 7227,1;
warp "prontera",156,223;
sleep2 250;
disablenpc "Prize";
end;
}

prontera,152,282,3	script	RFYL Warper	84,{
mes "[^0000FFRFYL Warper^000000]";
mes "Hi "+strcharinfo(0)+"";
mes "^696969Do you wish to participate in the Run For Your Life Event?^000000";
next;
switch(select("Yes","No")) {
case 1:
sc_end SC_ALL;
sc_start SC_DECREASEAGI,300000,10;
percentheal 100,100;
warp "quiz_01",42,369;
end;
break;
case 2:
mes "[^0000FFRFYL Warper^000000]";
mes "Brains brainnnss.. brains? Mind.";
mes "^696969It's really fun! Come join us when you change your mind.^000000";
close;
}
OnInit:
disablenpc "RFYL Warper";
disablenpc "Prize";
end;
}

thanks for the reply. but in any case, do you have something more simplies than this one. a RFYL for novice only

June 2, 2014

Guys i would like to ask RFYL event script, can anyone help me?

June 2, 2014

How can i make my pvp room, for all people can kill each other even if in same guild

May 28, 2014

mapserv working fine. but its still not giving the reward to the winner guild. any idea?

It seems working for me. Check your mapserv.. maybe..

and did u encounter that even if u didnt won in todays war u can still get the reward from another castle thats not for today war?

its only giving reward when u choose kriemhild. even if u dont own this castle. HEL P HEP!

May 27, 2014

Sorry made a mistake. Modify this line
if ( gethominfo(0) != 0 ) goto L_homun;
to
if ( gethominfo(0) == 0 ) goto L_homun;

Its working! Thank you! its a big help!

May 27, 2014

mapserv working fine. but its still not giving the reward to the winner guild. any idea?

It seems working for me. Check your mapserv.. maybe..

and did u encounter that even if u didnt won in todays war u can still get the reward from another castle thats not for today war?

May 27, 2014

This is one of my older scripts. It gives you a homunculus and leveling it up.

I left the leveling parts only.

prt_are02,174,163,4[TAB]script[TAB]Homunculus[TAB]558,{
if(Class == 18 || Class == 4019) goto L_OK;
mes "[Homunculus]";
mes "I speak only with Alchemists.";
close;


L_OK:
if ( gethominfo(0) != 0 ) goto L_homun;
mes "[Homunculus]";
atcommand "@homlvl 49 "+strcharinfo(0);
atcommand "@homfriendly 1000 "+strcharinfo(0);
atcommand "@homevolve "+strcharinfo(0);
atcommand "@homfriendly 1000 "+strcharinfo(0);
atcommand "@homhungry 100 "+strcharinfo(0);
close;

L_homun:
mes "[Homunculus]";
mes "You dont have Homunculus.";
close;

}

Hope it helps

its saying that i dont have homunculus even if i already have, can u give me the full scripts with giving homunculus, thanks in advance

May 27, 2014

requesting for auto leveler of homuculus, scripters help?

up up help!

help scripters!

May 26, 2014

up

HELP HELP!!

May 24, 2014

i want to make all buffs last for about 15mins

prontera,155,185,5 script Healer#h1-1::Healer 936,{
	if( isPremium() ) {
		percentheal 100,100;
		skilleffect 45,0; sc_start SC_CONCENTRATE,900000,10;
		skilleffect 74,0; sc_start SC_MAGNIFICAT,900000,5;
		skilleffect 75,0; sc_start SC_GLORIA,900000,5;
		skilleffect 66,0; sc_start SC_IMPOSITIO,900000,5;
		skilleffect 67,0; sc_start SC_SUFFRAGIUM,900000,3;
		skilleffect 34,0; sc_start SC_BLESSING,900000,10;
		skilleffect 29,0; sc_start SC_INCREASEAGI,900000,10;
		sc_start SC_STRFood,900000,10;
		sc_start SC_AGIFood,900000,10;
		sc_start SC_VITFood,900000,10;
		sc_start SC_INTFood,900000,10;
		sc_start SC_DEXFood,900000,10;
		sc_start SC_LUKFood,900000,10;
		sc_start SC_ASPDPOTION2,900000,0;
		atcommand "@repairall";
		dispbottom "[ VIP Manager ] Your are now FULLY Buffs";
	} else {
		specialeffect2 EF_HEAL2; percentheal 100,100;
		specialeffect2 EF_INCAGILITY; sc_start SC_INCREASEAGI,900000,10;
		specialeffect2 EF_BLESSING; sc_start SC_BLESSING,900000,10;
		skilleffect 66,0; sc_start SC_IMPOSITIO,900000,5;
		skilleffect 74,0; sc_start SC_MAGNIFICAT,900000,5;
		skilleffect 8,0; sc_start SC_ENDURE,900000,10;
		sc_start SC_CONCENTRATE,900000,10;
		sc_start SC_ASPDPOTION2,900000,0;
		sc_start SC_KYRIE,900000,5;
		specialeffect2 EF_HEAL2; percentheal 100,100;
		atcommand "@repairall";
		dispbottom "[ Healer ] You are now Healed!";
	}
	end;
}

Thanks for the help dude!

May 23, 2014

What buffer npc post the script....

prontera,155,185,5 script Healer#h1-1::Healer 936,{

if( isPremium() == 0 ) goto L_NOTENOUGH;
percentheal 100,100;
skilleffect 45,0; sc_start SC_CONCENTRATE,360000,10;
skilleffect 74,0; sc_start SC_MAGNIFICAT,360000,5;
skilleffect 75,0; sc_start SC_GLORIA,360000,5;
skilleffect 66,0; sc_start SC_IMPOSITIO,360000,5;
skilleffect 67,0; sc_start SC_SUFFRAGIUM,360000,3;
skilleffect 34,0; sc_start SC_BLESSING,360000,10;
skilleffect 29,0; sc_start SC_INCREASEAGI,360000,10;
sc_start SC_STRFood,360000,10;
sc_start SC_AGIFood,360000,10;
sc_start SC_VITFood,360000,10;
sc_start SC_INTFood,360000,10;
sc_start SC_DEXFood,360000,10;
sc_start SC_LUKFood,360000,10;
sc_start SC_ASPDPOTION2,360000,0;
atcommand "@repairall";
dispbottom "[ VIP Manager ] Your are now FULLY Buffs";
close;
L_NOTENOUGH:
        specialeffect2 EF_HEAL2; percentheal 100,100;
        specialeffect2 EF_INCAGILITY; sc_start SC_INCREASEAGI,240000,10;
        specialeffect2 EF_BLESSING; sc_start SC_BLESSING,240000,10;
skilleffect 66,0; sc_start SC_IMPOSITIO,360000,5;
skilleffect 74,0; sc_start SC_MAGNIFICAT,360000,5;
skilleffect 8,0; sc_start SC_ENDURE,360000,10;
sc_start SC_CONCENTRATE,240000,10;
sc_start SC_ASPDPOTION2,360000,0;
sc_start SC_KYRIE,300000,5;
        specialeffect2 EF_HEAL2; percentheal 100,100;
atcommand "@repairall";
dispbottom "[ Healer ] You are now Healed!";
close;
}

i want to make all buffs last for about 15mins

May 23, 2014

i want to know how to make longer duration of the buffs in buffer npc. someone?

May 16, 2014

turbo_room,93,117,5	script	Woe Prize Reward	986,{
	// setcastledata "prtg_cas01", 1, getcharid(2); // just testing ..
	if ( agitcheck() ) {
		mes "a war is currently in progress";
		mes "if your guild owned a castle ask your guild master to see me to claim the reward";
		close;
	}
	set .@menu, select(.menu$) -1;
	if ( getcastledata( .map_castle$[.@menu], 1) == getcharid(2) ) {
		if ( $castle_claimed & pow(2, .@menu) ) {
			mes "your guild already received the reward for "+ .castlename$[.@menu];
			close;
		}
		else if ( getguildmasterid( getcharid(2) ) == getcharid(0) ) {
			mes "receiving the reward for "+ .castlename$[.@menu];
			getitem 7179, 50; // some mathematics ...
			set $castle_claimed, $castle_claimed | pow(2, .@menu);
			close;
		}
		else {
			mes "ask your guild master to see me";
			close;
		}
	}
	mes "your guild failed to take "+ .castlename$[.@menu];
	mes "if your guild owned a castle ask your guild master to claim reward from me";
	close;
OnAgitEnd:
	set $castle_claimed, 0; // everytime woe ends the variable resets
	end;
OnInit:
	waitingroom "Woe Rewarder",0;
	setarray .castlename$, "Kriemhild", "Swanhild", "Fadhgridh", "Skoegul", "Gondul", "Bright Arbor", "Scarlet Palace";
	setarray .map_castle$, "prtg_cas01", "prtg_cas02", "prtg_cas03", "prtg_cas04", "payg_cas01", "payg_cas02";
	for ( set .@i, 0; .@i < 7; set .@i, .@i +1 )
		set .menu$, .menu$ + .castlename$[.@i] +":";
}

its not working, even if someone won the castle it wont give any rewards, any idea?

Sign In

Profiles

Forums

Downloads

Jobs Available

Server Database

Third-Party Services

Top Guides

Store

Crowdfunding

Posts posted by alone20