maczekiel

May 22, 2020

hi annie im one of your fan haha, how can i translate this on rathena?

April 7, 2020

im gonna try this, thanks mate!

October 22, 2016

What error? Please detail and show what pops up in the map-server.

its fixed now, sorry i forgot to put the resnametable on my map_cache.dat

but the problem is got error when i click the Fire

It's because you failed to add the maps to your servers map_cache. Did you also add the map_index and maps.conf?

What error? Please detail and show what pops up in the map-server.

Did you put viewpointmap into your src so your emulator can use the script command?

yes , i just experience, once you click the fire without killing 1 monster it will have an error, so basically i always find some monster to kill first to prevent the error in exe

October 20, 2016

dude what about this , , what is the 6th map? haha its only 5@trivia

October 20, 2016

its fixed now, sorry i forgot to put the resnametable on my map_cache.dat

but the problem is got error when i click the Fire

It's because you failed to add the maps to your servers map_cache. Did you also add the map_index and maps.conf?

October 20, 2016

bro i have a question about this i edit the script.c is there anything that i missed? TIA

September 18, 2016

can anyone still using Internal Guard? even they are down can we still setup it on our server ? or its long dead? just asking thanks ^^

September 18, 2016

meron po ba kasi naka dload ako ng 3.8 beta 5 kaso di ko ma open kasi internet error daw or dahil sa down na host nila?

August 14, 2016

haha Updates? ^_^

August 3, 2016

hi bro ^^ nice release ^^

April 5, 2016

Try this.

glast_01,210,270,0	script	Hugin's Craftsman	726,{
	disable_items;
	if (MaxWeight - Weight < 1000) {
		mes "Your bag is too heavy. Reduce some weight and come back.";
		close;
	}
	
	mes "[Hugin's Craftsman]";
	mes "That Magic Master always says that enchanting Temporal Boots is the best. But, I think quite different.";
	next;
	mes "[Hugin's Craftsman]";
	mes "I think putting a slot into the item would be the best. Even with some risk of failing.";
	next;
	mes "[Hugin's Craftsman]";
	mes "Bring me ^0000FF5 Temporal Crystals^000000, and I will try to put a slot into your advanced Temporal Boots. But, it's possible to ^FF0000fail and break the item^000000. Is that ok?";
	next;
	if (select("Cancel","Take the risk and try to add a slot") == 1) {
		mes "[Hugin's Craftsman]";
		mes "Ok, come back anytime you want.";
		close;
	}
	
	set .@part,EQI_SHOES;
	if (!getequipisequiped(.@part)) {
		mes "[Hugin's Craftsman]";
		mes "Are you sure you are wearing the item?";
		close;
	}
	set .@equip_id,getequipid(.@part);
	
	switch (.@equip_id) {
		case 22000: //Temporal_Str_Boots
			.@get_id = 22006,1; //Temporal_Str_Boots_
			break;
		case 22001: //Temporal_Int_Boots
			.@get_id = 22009; //Temporal_Int_Boots_
			break;
		case 22002: //Temporal_Agi_Boots
			.@get_id = 22010; //Temporal_Agi_Boots_
			break;
		case 22003: //Temporal_Vit_Boots
			.@get_id = 22007; //Temporal_Vit_Boots_
			break;
		case 22004: //Temporal_Dex_Boots
			.@get_id = 22008; //Temporal_Dex_Boots_
			break;
		case 22005: //Temporal_Luk_Boots
			.@get_id = 22011; //Temporal_Luk_Boots_
			break;
		default:
			mes "[Hugin's Craftsman]";
			mes "This is not it! We need ^0000FFAdvanced Temporal Boots^000000 items! The item ^0000FFwith a stat effect and without a slot^000000!";
			close;
	}
	
	for( .@i = 0; .@i < 4; .@i ++ )
		setd "Craft_Card" + .@i, getequipcardid( .@equip_id, .@i );
	
	mes "[Hugin's Craftsman]";
	mes "And ^FF0000all enchant or refine rates will be lost if you fail this.^000000";
	mes "Still want to risk it?";
	next;
	if (select("Cancel","I am ok with it!") == 1) {
		mes "[Hugin's Craftsman]";
		mes "Ok, come back anytime you want.";
		close;
	}
	
	mes "[Hugin's Craftsman]";
	mes "Once again, ^FF0000That Magic Master won't enchant any item with a slot.^000000";
	mes "Still want to proceed?";
	next;
	if (select("Cancel","I understand. Try to slot it.") == 1) {
		mes "[Hugin's Craftsman]";
		mes "Ok, come back anytime you want.";
		close;
	}
	
	if (countitem(6607) < 5) {
		mes "[Hugin's Craftsman]";
		mes "You must bring ^0000FF5 Temporal Crystal items^000000. Nothing is free you know...";
		close;
	}
	
	if (rand(1,100) <= 80) { //Custom rates
		mes "[Hugin's Craftsman]";
		mes "Arrggg, we failed. Better luck next time.";
		specialeffect2 EF_PHARMACY_FAIL;
		delitem 6607,5; //Temporal_Crystal
		delequip .@part;
		close;
	}
	
	mes "[Hugin's Craftsman]"; //Custom text
	mes "Yuhuu~ we succeed. Here you are...";
	mes "A slot has been added to your advanced Temporal Boots.";
	mes "Thank you for believing in me.";
	specialeffect2 EF_PHARMACY_OK;
	delitem 6607,5; //Temporal_Crystal
	delequip .@part;
	getitem2 .@get_id, 1, 1, 0, 0, getd( "Craft_Card0" ), getd( "Craft_Card1" ), getd( "Craft_Card2" ), getd( "Craft_Card3" );
	close;
}

Thanks Bro! your the Best!

April 5, 2016

cant use this in rathena, you have rathena version please?

April 5, 2016

Do you mean, you don't want the item "6607 - Temporal Crystal" not to deleted?

if that's what you mean then...

find this line:
delitem 6607,5; //Temporal_Crystal

no, i mean when it successfully slotting the temporal boots with "Enchant" it will erase the Enchant and it will just a slotted Temporal, what i need is to spare the enchanted stones in temporal, the success will be slotted+ the enchanted stones from before.

like in this link https://rathena.org/board/topic/103522-hugins-craftsman-bug/

@@Kubix can you help me with this one bro?

April 5, 2016

Please help me to this script, how to slot item without losing the enchant in temporal boots , this is the script
[cbox]
glast_01,208,273,3 script Hugin's Craftsman 726,{
disable_items;
if (MaxWeight - Weight < 1000) {
mes "Your bag is too heavy. Reduce some weight and come back.";
close;
}
mes "[Hugin's Craftsman]";
mes "That Magic Master always says that enchanting Temporal Boots is the best. But, I think quite different.";
next;
mes "[Hugin's Craftsman]";
mes "I think putting a slot into the item would be the best. Even with some risk of failing.";
next;
mes "[Hugin's Craftsman]";
mes "Bring me ^0000FF5 Temporal Crystals^000000, and I will try to put a slot into your advanced Temporal Boots. But, it's possible to ^FF0000fail and break the item^000000. Is that ok?";
next;
if (select("Cancel","Take the risk and try to add a slot") == 1) {
mes "[Hugin's Craftsman]";
mes "Ok, come back anytime you want.";
close;
}
set .@part,EQI_SHOES;
if (!getequipisequiped(.@part)) {
mes "[Hugin's Craftsman]";
mes "Are you sure you are wearing the item?";
close;
}
set .@equip_id,getequipid(.@part);
switch (.@equip_id) {
case 22000: //Temporal_Str_Boots
case 22001: //Temporal_Int_Boots
case 22002: //Temporal_Agi_Boots
case 22003: //Temporal_Vit_Boots
case 22004: //Temporal_Dex_Boots
case 22005: //Temporal_Luk_Boots
mes "[Hugin's Craftsman]";
mes "And ^FF0000all enchant or refine rates will be lost if you fail this.^000000";
mes "Still want to risk it?";
next;
if (select("Cancel","I am ok with it!") == 1) {
mes "[Hugin's Craftsman]";
mes "Ok, come back anytime you want.";
close;
}
mes "[Hugin's Craftsman]";
mes "Once again, ^FF0000That Magic Master won't enchant any item with a slot.^000000";
mes "Still want to proceed?";
next;
if (select("Cancel","I understand. Try to slot it.") == 1) {
mes "[Hugin's Craftsman]";
mes "Ok, come back anytime you want.";
close;
}
if (countitem(6607) < 5) {
mes "[Hugin's Craftsman]";
mes "You must bring ^0000FF5 Temporal Crystal items^000000. Nothing is free you know...";
close;
}
set .@@random,rand(1,100);
if (.@@random <= 80) { //Custom rates
mes "[Hugin's Craftsman]";
mes "Arrggg, we failed. Better luck next time.";
specialeffect2 EF_PHARMACY_FAIL;
delitem 6607,5; //Temporal_Crystal
delequip .@part;
close;
}
mes "[Hugin's Craftsman]"; //Custom text
mes "Yuhuu~ we succeed. Here you are...";
mes "A slot has been added to your advanced Temporal Boots.";
mes "Thank you for believing in me.";
specialeffect2 EF_PHARMACY_OK;
delitem 6607,5; //Temporal_Crystal
delequip .@part;
if (.@equip_id == 22000) {
getitem2 22006,1,1,0,0,0,0,0,0;
// getitem2 22006,1; //Temporal_Str_Boots_
} else if (.@equip_id == 22001) {
getitem2 22009,1,1,0,0,0,0,0,0; //Temporal_Int_Boots_
} else if (.@equip_id == 22002) {
getitem2 22010,1,1,0,0,0,0,0,0; //Temporal_Agi_Boots_
} else if (.@equip_id == 22003) {
getitem2 22007,1,1,0,0,0,0,0,0; //Temporal_Vit_Boots_
} else if (.@equip_id == 22004) {
getitem2 22008,1,1,0,0,0,0,0,0;//Temporal_Dex_Boots_
} else if (.@equip_id == 22005) {
getitem2 22011,1,1,0,0,0,0,0,0; //Temporal_Luk_Boots_
}
close;
default:
mes "[Hugin's Craftsman]";
mes "This is not it! We need ^0000FFAdvanced Temporal Boots^000000 items! The item ^0000FFwith a stat effect and without a slot^000000!";
close;
}
}
[/cbox]

its working but when success the enchantment stone will disappear, how to edit this sorry please help

March 21, 2016

Really. Can you post some preview. I just want to see yours. hehe.

Here hahaha sorry

March 18, 2016

is there a script for @vip that will change the Account into VIP group @vip <charname> <Days>

anyone? ^^ vip will get +9% on drop rates and is it possible to change the name color to green or something cool?

Thanks in advance

March 18, 2016

@@maczekiel have you found good cutin ?

i made 1 my self ^^ haha i googled it then put it there

March 16, 2016

now its working ^^ thanks for this

[cbox]//===== EinherjarRO Scripts ==================================
//= Daily Prize, OnPCLoginEvent
//===== By: ==================================================
//= Stolao
//===== Current Version: =====================================
//= 1.5D
//===== Compatible With: =====================================
//= rAthena SVN
//===== Description: =========================================
//= A reward system for players who play more frequently
//===== Comments: ============================================
//= Maybe Make .MinWait an array mins,days,weeks,months,years;
//===== Additional Comments: =================================
//= For Older See Old Versions
//= 1.51 Changed set .@g formula and move lower into script
//= 1.52 Replace all disbottom -> message
//= 1.53 Changed Format to Include minuets instead of just hours
//= 1.54 Made Time till next rewards display dynamic
//= 1.55 Changed a forgotten .PointType$ -> getd(.@TT[1])
//= 1.56 changed .@XT -> .@XT$
//= 1.57 Added Atoi where nessisary
//= 1.58 Fixed a swapped .@x and .@x+1
//= 1.59 Serveral Edit Undocumented to fix
//= 1.5A Fixed a logic bug, day 1 skipped
//= 1.5B Fixed a [-1] bug
//= 1.5C Actualy Fixed a logic bug, day 1 skipped
//= 1.5D Added A .Rest Notification
//===== Contact Info: ========================================
//= [stolao]
//= Email: [email protected]<script data-cfhash='f9e31' type="text/javascript">/* */</script>
//============================================================
- script LOGIN -1,{
OnWhisperGlobal:
OnLoginCmnd:
OnPCLoginEvent:
if(.Rest) message strcharinfo(0),"[Daily Rewards]: to collec reward you must remain logged in for "+ .Rest +" Minuets;
sleep2 1000 + .Rest * 60000;
set .@i, (gettime(7) * 365 * 24 * 60) + (gettime(8) * 24 * 60) + (gettime(3) * 60) +gettime(2);
if(.@i >= (#LastDailyReward + .MinWait)){
if(.@i < #LastDailyReward + .MaxWait){ set #DRewardCon, #DRewardCon + 1;
} else { set #DRewardCon, 0; }
set .@g, (#DRewardCon > getarraysize(.Rewards$)) ? (getarraysize(.Rewards$)-1) : #DRewardCon;
explode(.@XT$,.Rewards$[.@g],"|");
for(set .@x,0; .@x < getarraysize(.@XT$); set .@x,.@x + 1){
set .@TT[.@x], atoi(.@XT$[.@x]);
}
if(.Mode & 1 && .@TT[4]){ //[Note]: I need to figure out a checkweight for all items tired atm lol, for now ill leave it missing
for(set .@x,4; .@x < getarraysize(.@TT); set .@x,.@x + 2){ getitem .@TT[.@x], .@TT[.@x+1]; message strcharinfo(0),"Recived "+ .@TT[.@x+1] +" "+ getitemname(.@TT[.@x]); }
}
if(.Mode & 2){
if(.@TT[0]){ set zeny,zeny + .@TT[0]; message strcharinfo(0),"Recived "+ .@TT[0] +"z"; }
if(.@TT[1]){ setd getd(.Points$[0]),getd(.Points$[0]) + .@TT[1]; message strcharinfo(0),"Recived "+ .@TT[1] +" "+.Points$[1]; }
}
if(.Mode & 4 && (.@TT[3] || .@TT[4])) getexp .@TT[3], .@TT[4];
if(.Mode & 8){
for(set .@x,0; .@x < getarraysize(.BuffInfo); set .@x,.@x + 4){
if(#DRewardCon % .BuffInfo[.@x + 1] == 0)
sc_start .BuffInfo[.@x], .BuffInfo[.@x + 2] * 60000, .BuffInfo[.@x + 3];
}
}
message strcharinfo(0),"You have collected your daily reward, for "+#DRewardCon+" day"+((#DRewardCon > 1)?"s":"")+" in a row.";
cutin .Pic$[.@g],4;
set #LastDailyReward, .@i;
} else {
set .@days,(#LastDailyReward + .MinWait - .@i)/60/24;
set .@hours,((#LastDailyReward + .MinWait - .@i)/60)%24;
set .@mins,(#LastDailyReward + .MinWait - .@i)%60;
message strcharinfo(0),"You have "+ ((.@days) ? .@days +":Days " : "") +""+ ((.@hours) ? .@hours +":Hours " : "") +""+ ((.@mins) ? .@mins +":Minutes " : "") +"till your next reward";
}
end;
OnInit:
//Basic Settings
// 1: Item | 2: Points | 4: Exp
// 8: Gain Buffs Every X Consecutive Days logged in
// (a bit value, e.g. 3 = Items & Points from Multi)
set .Mode,1;

//To Enable @ Command '@loginreward' unslash next lines
// * Needs extra commands for typos
bindatcmd("relog" ,"LOGIN::OnLoginCmnd",0,99);

//Minimum Minuets Between Collecting Daily Reward
// Day: 22*60 - 24*60
// Week: 10080
set .MinWait,24*60;

//Minuets Before Lose Consecutive Daily Reward
// Day: 48*60 - 50*60
// Week: 20160
set .MaxWait,48*60;

//Number of mins after logging before collecting prize
set .Rest,0;

//Point Type
// [0] Points earned
// [1] Point name in mes
setarray .Points$,"#KAFRAPOINTS","K-Points";

// Consecutive Days Buff
// Each buff contains 4 variables (32 Total Max)
// ,,,, // Buff 1
// ,,,, // Buff 2
// ...;
//
// Example: 188,7,45,3
// -Every 7th consecutive day logged in Player gains +3 Str for 45 mins
//
// Type is 188, which references which SC_ to use, SC_INCSTR in this example
// -For a full list of SC_ visit the db/const.txt
// Days is days buff is applied, in this example 7, so every 7th day, 14,21,28....
// Duration is buff duration is Minuits, in this example 45 mins
// Rate is buff strength, in this example player gains 3 Str
setarray .BuffInfo ,260,2,360,1 // Life Insurance for 360 Mins Every 2nd Day
,198,3,120,10 // +10% Hp for 120 Mins Every 3th Day
,196,5,120,25 // +25 Flee for 120 Mins Every 5th Day
,257,7,240,50; // +50% Exp for 240 Mins Every 7th Day

// Daily Prize items (max 128 days):
// "|||||||...etc", // Day 1
// "|||||||...etc" // Day 2
// ...;
// Total length of any days string must be 255 or shorter
// * If players login longer than the last set
// day, they will keep getting the last prize.
setarray .Rewards$,
"0|0|0|0|13550|1", // Day 1: 1 Fish Slice Box
"0|0|0|0|7608|10", // Day 2: 10 Kuro Tickets
"0|0|0|0|7776|5", // Day 3: 5 GymPass
"0|0|0|0|12210|1", // Day 4: 1 Bubble Gum
"0|0|0|0|12912|1", // Day 5: 1 Convex Mirror Box
"0|0|0|0|19329|50", // Day 6: 50 kuro coins
"0|0|0|0|7179|5"; // Day 7: 50 kuro coins

setarray .Pic$,
"day1", //pic with day1 highlighted
"day2", //pic with day2 highlighted
"day3", //pic with day3 highlighted
"day4", //pic with day4 highlighted
"day5", //pic with day5 highlighted
"day6", //pic with day6 highlighted
"day7"; //pic with day7 highlighted

end;
}
[/cbox]

March 16, 2016

one last question ^^ where do i put the cutin or the picture for this script? sorry for my noob question

March 14, 2016

Please make sure to use a codebox for long pastes like that or a alternate paste site (i.e. upaste) @@maczekiel. If you continue to do so, you will be receiving a warning for breaking our rule.

im so sorry , dont know how to use codebox before but now i know, thanks

Pravatek · March 9, 2016

Andro have many disadvantage and not so stable. For example there no skills animation...

its ok , some people just login to check their characters or chat with friends ^^

March 9, 2016

i hope this will release in future time ^^

March 9, 2016

It's just a picture. So you need 31 pics + a method to track current state of character you want. For example char1 login 3rd day in row getting variable days = 3 and shows picture with 3rd day highlighted. Thats not hard at all, you probably can get any daily rewards npc and make changes in it.

can you give sample script dude? TIA

March 9, 2016

Any one how to make this , is this possible here in herc?

March 8, 2016

anyone? is it possible to use commands like stargladiator? or how to float diff character just by typing commands

Sign In

Profiles

Forums

Downloads

Staff Applications

Calendar

Posts posted by maczekiel

Important Information