can i request to edit this script

jhunex · January 23, 2014

Can Someone Edit this script ?

i want this script to give prize 7539 50 not zeny thankyou

// //=====// /==/ /==/ /==/
// // // /==/ /==/ /=/ /==/
// //=====// /==/ /=/ /==============/ /========/ /==//===/ /==/ /==/
// //=////// /==/ /==//=/ /==/ /==/==/==/==/==/ / / / /==/ /==/ /==/
// // == /==/ /==//=/ /==/ /==/ /==/ /==/ ======/ / /==/ /==/ /==/
// // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/ /==/
// // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ / /===/ / /==/ /==/=====/==/
// // == /==/ /==/ /=/ /==/ /==/ /==/ /==/ /========/ /==/ /==///////==/
// ================ rAthena Script ==================================================
// ============== Information =======================================================
// = iRO Daily Quest : Church Donation
// = Made by :
// = Rikimaru
//===== Current Version: ===============================================
//= 1.2
//===== Compatible With: ===============================================
//= any rAthena SVN
//===== Description: ===================================================
//= The iRO Daily Quest : Church Donation
//= Usefull for having fun in a Server with a Mini Quest
//= Has a counter of 24 Hours until the Players can do the Quest agian.
//===== Additional Comments: ===========================================
//= 1.1 Finished adding the stats food effects. [Rikimaru]
//= 1.2 Fixed a few Bugs in the Script [Rikimaru]
//======================================================================
//============== DO NOT REMOVE MY CREDITS AND CLAIM MY WORK AS YOURS ===
prontera,165,191,3 script [Quest] Church Worker 790,{
set .@npcname$,"^0000FF[ [Quest] Church Worker ]^000000";
if(gettimetick(2) - donatedalready < (60 * 60 * 24)) {
mes .@npcname$;
mes "Sorry,but you have to wait 24 Hours,before you";
mes "can do the Quest again!";
close;
}
if(BaseLevel >= 60 && BaseLevel <= 80) {
mes .@npcname$;
mes "Hello "+strcharinfo(0)+",do";
mes "you want to get special";
mes "Buffs for 40.000 Zenny?";
next;
switch(select("Yes,sure:No,bye:Cancel")) {
case 1:
mes .@npcname$;
mes "Let me check everything.";
if(Zeny < 40000) goto L_nozeny;
set Zeny,Zeny - 40000;
set BaseExp,+80000;
set JobExp,+50000;
sc_start SC_STRFood,180000,5;
sc_start SC_AGIFood,180000,5;
sc_start SC_VITFood,180000,5;
sc_start SC_INTFood,180000,5;
sc_start SC_DEXFood,180000,5;
sc_start SC_LUKFood,180000,5;
set donatedalready,gettimetick(2);
next;
mes .@npcname$;
mes "Okay,thank you and have fun!";
close;
}
}
if(BaseLevel >=81 && BaseLevel <=96) {
mes .@npcname$;
mes "Hello "+strcharinfo(0)+",do";
mes "you want to get special";
mes "Buffs for 80.000 Zenny?";
next;
switch(select("Yes,sure:No,bye:Cancel")) {
case 1:
mes .@npcname$;
mes "Let me check everything.";
if(Zeny < 80000) goto L_nozeny;
set Zeny,Zeny - 80000;
set BaseExp,+200000;
set JobExp,+60000;
sc_start SC_STRFood,180000,6;
sc_start SC_AGIFood,180000,6;
sc_start SC_VITFood,180000,6;
sc_start SC_INTFood,180000,6;
sc_start SC_DEXFood,180000,6;
sc_start SC_LUKFood,180000,6;
set donatedalready,gettimetick(2);
next;
mes .@npcname$;
mes "Okay,thank you and have fun!";
close;
}
}
if(BaseLevel >=97 && BaseLevel <=99) {
mes .@npcname$;
mes "Hello "+strcharinfo(0)+",do";
mes "you want to get special";
mes "Buffs for 200.000 Zenny?";
next;
switch(select("Yes,sure:No,bye:Cancel")) {
case 1:
mes .@npcname$;
mes "Let me check everything.";
if(Zeny < 200000) goto L_nozeny;
set Zeny,Zeny - 200000;
set BaseExp,+400000;
set JobExp,+100000;
sc_start SC_STRFood,180000,7;
sc_start SC_AGIFood,180000,7;
sc_start SC_VITFood,180000,7;
sc_start SC_INTFood,180000,7;
sc_start SC_DEXFood,180000,7;
sc_start SC_LUKFood,180000,7;
set donatedalready,gettimetick(2);
next;
mes .@npcname$;
mes "Okay,thank you and have fun!";
close;
}
}
mes .@npcname$;
mes "Hello,you can use my Service,";
mes "when you're at least Baselevel 60";
close;
L_nozeny:
mes .@npcname$;
mes "Sorry,but you need more Zeny!";
close;
}
// ==================================== End of the Scripts =======================================
// ============================= Have fun with the Scripts. Yours,Rikimaru =======================

-SkittleNugget- · January 23, 2014

A prize for donating to the "church" ?

Under what conditions do you want the prize to be given ?.

Here I rewrote the script so it easier to understand.

 // ================ rAthena Script ==================================================
 // ============== Information =======================================================
 // = iRO Daily Quest : Church Donation
 // = Made by :
 // = Rikimaru
 //===== Current Version: ===============================================
 //= 1.3
 //===== Compatible With: ===============================================
 //= any rAthena SVN
 //===== Description: ===================================================
 //= The iRO Daily Quest : Church Donation
 //= Usefull for having fun in a Server with a Mini Quest
 //= Has a counter of 24 Hours until the Players can do the Quest agian.
 //===== Additional Comments: ===========================================
 //= 1.1 Finished adding the stats food effects. [Rikimaru]
 //= 1.2 Fixed a few Bugs in the Script [Rikimaru]
 //= 1.3 Rewrote the script to make it easier to work with, //-SkittleNugget-
 //======================================================================

 prontera,165,191,3	script	[Quest] Church Worker	790,{

	 if(gettimetick(2) - donatedalready < (60 * 60 * 24)) {
		 mes "^0000FF[ [Quest] Church Worker ]^000000";
		 mes "Sorry,but you have to wait 24 Hours,before you";
		 mes "can do the Quest again!";
		 close;
	 }
 
	if (BaseLevel<60){ 
		mes "^0000FF[ [Quest] Church Worker ]^000000"; 
		mes "Hello,you can use my Service,"; 
		mes "when you're at least Baselevel 60"; 
		close;
	}
	else if (BaseLevel<80) {callsub Buff,40000,80000,50000,5; }
	else if (BaseLevel<96) {callsub Buff,80000,200000,60000,6; }
	else if (BaseLevel<99) {callsub Buff,200000,400000,100000,7; }

	Buff:	//Buff, Zeny, BaseEXP, JobEXP, Food.
		mes "^0000FF[ [Quest] Church Worker ]^000000";
		mes "Hello "+strcharinfo(0)+",do";
		mes "you want to get special";
		mes "Buffs for "+getarg(0)+" Zenny?";
		next;
		switch(select("Yes,No")==2) {
			close;
		}
		mes "^0000FF[ [Quest] Church Worker ]^000000";
		mes "Let me check everything.";
		next;
		if(Zeny < getarg(0)) {
			mes "^0000FF[ [Quest] Church Worker ]^000000";
			mes "Sorry,but you need more Zeny!";
			close;
		}
		set Zeny,Zeny - getarg(0);
		set BaseExp,getarg(1);
		set JobExp,getarg(2);
		sc_start SC_STRFood,180000,getarg(3);
		sc_start SC_AGIFood,180000,getarg(3);
		sc_start SC_VITFood,180000,getarg(3);
		sc_start SC_INTFood,180000,getarg(3);
		sc_start SC_DEXFood,180000,getarg(3);
		sc_start SC_LUKFood,180000,getarg(3);
		set donatedalready,gettimetick(2);
		mes "^0000FF[ [Quest] Church Worker ]^000000";
		mes "Okay,thank you and have fun!";
		close;
}

church_donation.txt

AnnieRuru · January 24, 2014

haha, @Rikimaru's scripts xD

there's a bug in your script

[Error]: script:getarg: no callfunc or callsub!
[Debug]: Source (NPC): [Quest] Church Worker at prontera (165,191)

use this script when I am level99

I believe should be like this

	else if (BaseLevel<=80) {callsub Buff,40000,80000,50000,5; }
	else if (BaseLevel<=96) {callsub Buff,80000,200000,60000,6; }
	else {callsub Buff,200000,400000,100000,7; }

the last line should change to *else

because if their server is high rate, its more than 99

Edited January 24, 2014 by AnnieRuru

jhunex · January 24, 2014

Thankyou for helping me

But i want instead of Reward is Experience i want it to be item

is that possible ?

-SkittleNugget- · January 24, 2014

Didn't think about that actually X_X

Skorm · January 24, 2014

Thankyou for helping me

But i want instead of Reward is Experience i want it to be item

is that possible ?

After:

set JobExp,getarg(2);

Add:

if(getarg(4,0)) getitem(getarg(4),getarg(5,1));

New callsub works like...

//Buff, Zeny, BaseEXP, JobEXP, Food{, ItemID{, Amount }}.
//Ex:
callsub Buff,40000,80000,50000,5,501,10; //Gives 10 Red Potions
callsub Buff,40000,80000,50000,5,501; //Gives 1 Red Potion
callsub Buff,40000,80000,50000,5,501,1; //Also Gives 1 Red Potion
callsub Buff,40000,80000,50000,5; //Gives no item.
callsub Buff,0,0,0,0,501; //Gives no exp just one Red Potion ETC.

AnnieRuru · January 24, 2014

erm ... me scare scare abit now x.x

@Skorm, it should be getarg(3) ? or getarg(4) ?

careless mistakes x.x

Skorm · January 24, 2014

erm ... me scare scare abit now x.x

@Skorm, it should be getarg(3) ? or getarg(4) ?

careless mistakes x.x

It's past 6am Annie I haven't slept a wink. Can you cut me some slack x_x Thanks for pointing that out though. <3

jhunex · January 24, 2014

thanks. im going to try this when i got home =]

thankyou .

i hope it will works

Sign In

can i request to edit this script

Question

jhunex

8 answers to this question

Recommended Posts

-SkittleNugget-

AnnieRuru

jhunex

-SkittleNugget-

Skorm

AnnieRuru

Skorm

jhunex

Join the conversation

Recently Browsing 0 members

Docs

Get Started

Github

Community

My Account