Jump to content

skymia

Members
 View Profile  See their activity

  • Posts

    296

  • Joined

  • Last visited

  • Days Won

    1

 Content Type 

Posts posted by skymia

    How can i Reduce the Freeze Time?

    in Database Requests

    Posted

    9 hours ago, Playtester said:

    I'm not sure why you would want that. Freeze would be useless if it only lasted 2 seconds and also makes spells like Storm Gust abusable, BUT if you really insist then find this in status.cpp: 

    
		case SC_FREEZE:
			sc_def = status->mdef*100;
			sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10;
			tick_def2 = status_src->luk*-10; // Caster can increase final duration with luk
			break;

    And change it to: 

    
		case SC_FREEZE:
			sc_def = status->mdef*100;
			sc_def2 = status->luk*10 + status_get_lv(bl)*10 - status_get_lv(src)*10;
			tick_def = 8000 + status->mdef*20;
			tick_def2 = status_src->luk*-10; // Caster can increase final duration with luk
			break;

    That way all Freeze durations are reduced by 5 times, but you still maintain same immunity and other behavior.

    ok sir i will try this later i will let you know if working now...thanks sir

    Npc warp with required items

    in Scripting Support

    Posted · Edited by skymia

    13 hours ago, hendra814 said:

    just example 

    

prontera,155,183,4	script	Warper	723,{

set .TicketID,501;	

mes "Hi which dungeon do you want to go?";
mes "but you must give me "+getitemname(.TicketID)+".";
switch(select("Use service.","cancel.")) {
	case 1:
			next;
			mes "Pick your destination.";
			next;
			.@menu$ = "";
			for (.@i = 0; .@i < getarraysize(.maps$); .@i++) {
				.@menu$ = .@menu$ + .maps$[.@i*2] + ":";
			}
			.@menu$ = .@menu$ + ":cancel";
			.@sel = select(.@menu$)-1;
			if (.@sel-1 != .@i) {
				callsub(OnWarp,.@sel*2);
				break;
			}
			next;
			mes .name$;
			mes "ok, se you.";
		case 2: goto(OnCancel); break;
	}
	end;
	
	OnWarp:
		if( countitem(.TicketID) < 1 ){
		mes "You don't have item "+getitemname(.TicketID)+" to use this service.";
		end;
		}
			.@i = getarg(0);
			next;
			mes .name$;
			mes "See You next time.";
			close2;
			warp .maps$[.@i+1],.xy[.@i],.xy[.@i+1];
			end;

	OnCancel:
		next;
		mes .name$;
		mes "See You next time.";
		close;

	OnInit:
		.name$ = "[Kafra]";
		// Warp List
		setarray .maps$[0],"pay_dun02","pay_dun02",
					"gl_sew03","gl_sew03",
					"alde_dun02","alde_dun02",
					"mag_dun01","mag_dun01",
					"gefenia01","gefenia01",
					"thor_v01","thor_v01",
					"mosk_dun01","mosk_dun01",
					"Gunung Krakatau","dew_dun01",
					"bra_dun01","bra_dun01";
		setarray .xy[0],146,130,
					179,286,
					116,179,
					119,72,
					46,105,
					18,231,
					189,48,
					292,160,
					81,51;
		end;
}

     

    what if multiple and amount of item need for requirements?

    and i want to warp in thanatos dungeon

    Npc warp with required items

    in Scripting Support

    Posted

    How to make a npc quest warper to warp in a specific dungeon with require some items?

    Example: npc location prontera if you click the npc it will ask a item before warping in that map and if the item not complete npc will tell lack of items come back later if you give me the items i need

    Client 2015-11-04a

    in Client-side Support

    Posted

    How to remove Doram race in char creation?

    i already disabled in nemo but when i try to use my custom client it would not login my account...my server is already online but when i use the client that the hosting provides its working but the doram is enabled...i want to remove it

    Item combo script

    in Database Requests

    Posted

    Can anyone help me in item combo set?

    Example: if i equipped all of those item i can have additional stats, buff or effect...its like dragon nest on completing a full set armors and weapons

    If thers's 1 or 2 more items that players not yet have you will not recieve the additional stats, buff or element effect

    Items: 

    Dragon armor, manteau, shield, shoes

    Valk helm, valk wings, dragon aura

    King Of emperium Script

    in Scripting Support

    Posted

    On 8/19/2012 at 10:03 PM, donkeyg said:

    http://www.eathena.ws/board/index.php?showtopic=174222

    does this script work at rathena? and how do i make it every monday, wednesday, friday and sunday held?? and the prize is Poring Hat and 50m zeny

      

    
-	script	KoE	-1,{
OnInit:
disablenpc "The King#KoE";
disablenpc "Exit#KoE";
end;

OnWhisperGlobal:
if ( getgmlevel() < 99 ) end;
else if ( compare ( @whispervar0$, "on" ) ) goto L_start;
else if ( compare ( @whispervar0$, "off" ) ) goto L_end;
else end;

L_end:
announce "The King of Emperium Hill is over!", 0;
set .koe_start, 0;
enablenpc "Exit#KoE";
disablenpc "The King#KoE";
killmonsterall "guild_vs1";
end;

L_start:
announce "The King of Emperium Hill has begun!", 0;
set .koe_start, 1;
enablenpc "The King#KoE";
disablenpc "Exit#KoE";
set $koegid, 0;
donpcevent "::OnRevKoE";
maprespawnguildid "guild_vs1", $koegid, 6;
monster "guild_vs1",49,49,"EMPERIUM",1288,1,"KoE::OnEmpDead";
end;

OnEmpDead:
set $koegid, getcharid(2);
announce "The current King of Emperium Hill is the [" + strcharinfo(2) + "] guild.", 0;
donpcevent "::OnRevKoE";
maprespawnguildid "guild_vs1", $koegid, 6;
sleep 500;
if ( .koe_start )
	monster "guild_vs1",49,49,"EMPERIUM",1288,1,"KoE::OnEmpDead";
end;
}

// KoE Entrance
prontera,155,191,4	script	The King#KoE	58,{
   mes "[The King]";
if ( getcharid(2) == 0 ) {
	mes "You must have a guild to participate in the ^FF0000King of Emperium Hill Tournament^000000.";
	close;
}
   mes "Hello.";
   mes "Would you like to participate in the ^FF0000King of Emperium Hill Tournament^000000?";
if ( select ( "Yes", "No" ) == 2 ) close;
   switch( rand(1,4) ){
       case 1:	warp "guild_vs1", 50, 88; end;
       case 2:	warp "guild_vs1", 88, 50; end;
       case 3:	warp "guild_vs1", 50, 11; end;
       case 4:	warp "guild_vs1", 11, 50; end;
}
}

// KoE Exit
guild_vs1,49,56,5	script	Exit#KoE	51,{
mes "[Exit]";
mes "See ya.";
if ( getcharid(2) == $koegid )
	getitem 501, 1; // configure prize here
next;
warp "Save",0,0;
close;
}

// Flags
guild_vs1,49,38,4	script	King of Emperium Hill#1::koe_flag	722,{
set .@gid, $koegid;
if ( .@gid == 0 ) end;
mes "[King of Emperium Hill]";
mes "The Current King of Emperium Hill is the ["+ getguildname(.@gid) +"] guild.";
close;
OnRevKoE:
flagemblem $koegid;
end;
}
guild_vs1,61,49,6	duplicate(koe_flag)	King of Emperium Hill#2	722
guild_vs1,38,49,2	duplicate(koe_flag)	King of Emperium Hill#3	722
guild_vs1,49,61,0	duplicate(koe_flag)	King of Emperium Hill#4	722

guild_vs1	mapflag	gvg
guild_vs1	mapflag	nobranch
guild_vs1	mapflag	nomemo
guild_vs1	mapflag	nopenalty
guild_vs1	mapflag	noreturn
guild_vs1	mapflag	nosave	SavePoint
guild_vs1	mapflag	noteleport
guild_vs1	mapflag	gvg_noparty
guild_vs1	mapflag	nowarp
guild_vs1	mapflag	nowarpto
     

     

    is this script only 2 guild can join the KOE per event?

    Kafra Bank

    in Scripting Support

    Posted 

    //===== rAthena Script =======================================
//= The 2nd Bank of Prontera (with daily 0.01% income!)
//===== By: ==================================================
//= Lupus (1.0)
//===== Current Version: =====================================
//= 1.2a
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= A bank which has an interest %
//===== Additional Comments: =================================
// Look for this formula and setup your Bank daily % interest
// #kafrabank/1000 = 0.1% of interest per day
// #kafrabank/100  =  1%  of interest per day
// #kafrabank/10   =  10% of interest per day
//
// 1.1 Added log of bank operation -> logmes "some info";
// 1.2 Set max income to 100,000z. It would help to avoid
//     zeny exploits when you change DATE at your server
// 1.2a Corrected bad duplicate names. (bugreport:921) [Samuray22]
//============================================================

-	script	Bank Clerk::bankg	833,{
	mes"[Maniss]";
	mes strcharinfo(0)+", welcome to the Bank of Prontera!";

	set @kb_int,(gettime(DT_MONTH)*31)+gettime(DT_DAYOFMONTH); //today's number
	set @income,0;
	//calculate %
	if (#kafrabank<=0 || #kb_int>=@kb_int) goto L_NoIncomeToday;
	set @income,(#kafrabank/1000)*(@kb_int-#kb_int); //@income == % of the sum
	//max income constant:
	if (@income>100000) set @income,100000;
L_NoIncomeToday:
	set #kb_int,@kb_int; //reset days timer

	if(#kafrabank==0) mes "We could open you an account.";
	if(@income>0) mes "Today's income: ^135445" + callfunc("F_InsertComma",@income) + "^000000 zeny.";
	set #kafrabank,#kafrabank+@income;
	if(#kafrabank>0) mes "Your account: ^135445" + callfunc("F_InsertComma",#kafrabank) + "^000000 zeny.";
	mes "What would you like?";
	next;
	if(#kafrabank==0) menu "-Open an account",-,"-Quit",B_EXIT2;
	if(#kafrabank>0) menu "-Deposit money",-,"-Withdraw money",M_WITHDRAW,"-Quit",B_EXIT2;

	mes"[Maniss]";
	mes "Please, tell me how much zeny you would like to deposit.";
	next;
	if(input(@kafrabank) == 1) goto L_TOO_BIG_AMOUNT;

	if(@kafrabank<1000) goto L_LESS_1000;
	if(@kafrabank>zeny) goto L_NOT_ENOUGH;
	set Zeny, Zeny-@kafrabank;
	set #kafrabank,#kafrabank+@kafrabank;
	mes"[Maniss]";
	mes "You've made a deposit of ^135445" + callfunc("F_InsertComma",@kafrabank) + "z^000000.";
	//we log these zeny operations into the log db
	logmes "Bank %: " + @income +"z, Deposit: "+ @kafrabank +"z, Final: "+ #kafrabank +"z";
	goto B_EXIT;

M_WITHDRAW:
	if(#kafrabank==0) goto L_ZERO_ACCOUNT;
	mes"[Maniss]";
	mes "Your account: ^135445" + callfunc("F_InsertComma",#kafrabank) + "^000000 zeny.";
	mes "How much zeny would you like to withdraw?";
	next;
	if(input(@kafrabank) == 1) goto L_TOO_BIG_AMOUNT;

	if(@kafrabank<1) goto B_EXIT2;
	if(@kafrabank>#kafrabank) goto L_NOT_ENOUGH;
	set #kafrabank,#kafrabank-@kafrabank;
	set Zeny, Zeny+@kafrabank;
	mes"[Maniss]";
	mes "Here is your ^135445" + callfunc("F_InsertComma",@kafrabank) + "z^000000, put your sign here...";
	//we log these zeny operations into the log db
	logmes "Bank %: " + @income +"z, Withdraw: "+ @kafrabank +"z, Final: "+ #kafrabank +"z";
	goto B_EXIT;

L_NOT_ENOUGH:
	mes"[Maniss]";
	mes "You don't have enough zeny for this operation.";
	next;
	goto B_EXIT2;

L_ZERO_ACCOUNT:
	mes"[Maniss]";
	mes "You don't have any zeny on your account!";
	next;
	goto B_EXIT2;

L_TOO_BIG_AMOUNT:
	mes"[Maniss]";
	mes "Sorry. The maximum deposit you can make on a time is 10,000,000 zeny.";
	next;
	goto B_EXIT2;

L_LESS_1000:
	mes"[Maniss]";
	mes "We're sorry, the minimum amount of zeny you can deposit is 1,000 zeny.";
	next;
	goto B_EXIT2;

B_EXIT:
	mes "Very well... Come again soon!";
	next;

B_EXIT2:
	mes"[Maniss]";
	mes "Thank you for using our Bank Service. We hope to see you again soon.";
	close;
}

prontera,131,190,1	duplicate(bankg)	Bank Clerk#1-1	833
geffen,125,73,3	duplicate(bankg)	Bank Clerk#2-1	833
izlude,145,107,1	duplicate(bankg)	Bank Clerk#3-1	833
morocc,147,84,7	duplicate(bankg)	Bank Clerk#4-1	833

    How to change the maximum deposit in this kafra bank?

    because right now is 10M is the maximum deposit..

    thanks in advance :)

    R> @afk command + Vending

    in Script Requests

    Posted

    On 11/29/2017 at 4:07 PM, Amidamaru said:

    Hello,

    I want to request a script that enable player to afk with "@afk" command. and it's enabled while vending.

    Please help.

    Thank you.

    why use @autotrade command if you want afk while in vending mode

     

    Sprite Fixing

    in Graphics Support

    Posted

    4 hours ago, Haziel said:

    Zoom bug is caused by the size of the sprite, surpassing the 180px in any dimension will occurs on that.
    It also seems your sprite is misaligned aswell, but on headgears-wing it rarely will be aligned since every class has its own pose, which means: for the Lord Knight, which has a straight pose, it may looks good, but not for the alchemist which leans a bit to the right.

    I will try this wing in every char so that i will restrict the item to the char that not fits it...

    But is there a way i can resize the sprite to make looks good in every class?

×
×
  • Create New...