KeyWorld

So if you want:
A not clickable npc, with position/info never send to the client/bot (so npctalk, effects, ... will fail), use -1. A not clickable npc, with position/info send to client (npctalk, etc. will work), use 139. A clickable npc, use 111.

Something like this I presume :
query_sql("SELECT `npc1`, `npc2`, `npc3`, `npc4`, `npc5` FROM `quest_db` WHERE `char_id` = " + getcharid(0), .@npc1, .@npc2, .@npc3, .@npc4, .@npc5); for( set .@i,1; .@i<=5; set .@i, .@i + 1 ) {     set .@var, getd(".@npc" + .@i);     if( .@var != 500 && .@var != 100 ) {         set .@fail, 1;         break;     } } if( .@fail ) {     // not ok } else {     // ok }  

Hi,
You have to add in script.c:
BUILDIN_FUNC(getchardirection) { TBL_PC *sd; if( script_hasdata(st,2) ) sd = map_nick2sd(script_getstr(st,2)); else sd = script_rid2sd(st); if( sd == NULL ){ script_pushint(st, -1); return 0; } script_pushint(st, sd->ud.dir); return 0; }And:BUILDIN_DEF(getchardirection,"?"),In your script:set .@dir, getchardirection(); if( .@dir == DIR_NORTHWEST ) { // You can see all DIR_* constantes in db/const.txt mes "Nice !"; }It's also possible to check the direction of another player by adding his name as argument:set .@direction , getchardirection("PlayerTester");Have fun.

1) (Euphy ways):
function script getEquip { // get all equipped item IDs
for (set .@i, 1; .@i < 11; set .@i, .@i + 1) {
if (-1 != getequipid(.@i)) {
set @items[.@idx], getequipid(.@i);
set .@idx, .@idx + 1;
}
}
return @items;
}
callfunc("getEquip");
// @items
2) Your way:function script getEquip { // get all equipped item IDs
for (set .@i, 1; .@i < 11; set .@i, .@i + 1) {
if (-1 != getequipid(.@i)) {
set .@items[.@idx], getequipid(.@i);
set .@idx, .@idx + 1;
}
}
return .@items;
}
copyarray .@items, callfunc("getEquip"), 128;
3) By reference:function script getEquip { // get all equipped item IDs
for (set .@i, 1; .@i < 11; set .@i, .@i + 1) {
if (-1 != getequipid(.@i)) {
set getelementofarray( getarg(0), .@idx), getequipid(.@i);
set .@idx, .@idx + 1;
}
}
return @items;
}
callfunc("getEquip", .@items);

First thing I see, you add item to a shop "Emistry_shop", I guess you forget to update the shop name (should be "Cloud_Machine").
npcshopadditem "Emistry_Shop",@ItemListscloud[.@i],@ItemCostcloud[.@i];

Add a "end;" before "OnHour24:".

v - value (string, int or reference)
s - string
i - int
r - reference (variable)
l - label
? - optional parameter
* - as you want optionals parameters

You can't use a label if it has the same name as a constant/player variable.
So rename the label sn to another name.

You got it. All for(), while(), switch(), if, else, internal func(), ... are converted to label + goto/callsub + jump_zero on runtime.
But for keep the script readable it's better to not write the whole script using the low level statement (except if you have reasons like optimizations)
doevent, donpcevent are used to run another script instance. It's often used to start action on other script. Example: a script to manage all games in your server:
mes "Select the event to start"; switch( select("Capture the Flag","Nyan Cat Catcher", "First Man Dying") ) { case 1: donpcevent "ctf::OnStartEvent"; break; ... }
It's good to know that donpcevent will run the script after yours end (it's not multi-thread), to run it after continue you have to pause the script
donpcevent "todo::OnLol"; sleep2 1; // execute todo::OnLol before continue. dowtfyouwant;
And functions/callsub I think you know them, it's used to avoid redundant, have fun with arguments, and return to the main script when finished.
Good luck for your project

My fault:
delitem2 7420, 1, 1, 0, 0, 254, 0, .cible_cid & 0x00FFFF, .cible_cid >> 16;
About the name, you have to reloadscript.
Here a fix :
// Damn !? No reloadscript ?! if ( .char_name$ == "" ) { donpcevent strnpcinfo(3) + "::OnInit"; sleep2 1; // Execute OnInit before continue. } mes "I give you an apple if you give me " + .char_name$ . "'s skull !"; next; if ( countitem2( 7420, 1, 0, 0, 254, 0, .cible_cid & 0x00FFFF, .cible_cid >> 16 ) ) { mes "Yeah you have the skull ! I give you an apple"; delitem2 7420, 1, 1, 0, 0, 254, 0, .cible_cid & 0x00FFFF, .cible_cid >> 16; getitem 512, 1; } else { mes "Damn, you don't have it..."; } close; OnInit: set .char_name$, "Anonymous"; query_sql("SELECT `char_id` FROM `char` WHERE `name`='" + escape_sql(.char_name$) + "' LIMIT 1", .cible_cid ); if ( !.cible_cid ) debugmes "[skull Trader] Invalid name specify ?"; end;

Funny that it doesn't throw an error
1) Athena script engine doesn't support multi-dimensional array.
2) You set a string into a int variable.
Uou have to do something like this:
prontera,153,169,4 script Donation 123,{ set .npcname$,"Donation"; set .arrayCounter,0; //Items //For Headgears [Category][slot Number][itemID = 0 /ItemAmount = 1] setd ".@Item_0_0_0", 123 ; //ItemID setd ".@Item_0_0_1", 124 ; //Amount mes getd(".@Item_0_0_0"); // 123 mes getd(".@Item_0_0_1"); // 124 mes getd(".@Item_0_0_2"); // 0 mes getd(".@Item_1_0_0"); // 0 close; }

I think something like this (not tested):
getitem2 <itemid>, <amount>, 1, 0, 0, 255, 0, <group id> & 0xffff, <group id> >> 16;
Example:
// Apple Group 1 getitem2 512, 5, 1, 0, 0, 255, 0, 1 & 0xffff, 1 >> 16; getitem2 512, 3, 1, 0, 0, 255, 0, 1 & 0xffff, 1 >> 16; // should give you (5+3) apple for the group 1 // Apple Group 2 getitem2 512, 4, 1, 0, 0, 255, 0, 2 & 0xffff, 2 >> 16; getitem2 512, 2, 1, 0, 0, 255, 0, 2 & 0xffff, 2 >> 16; // should give you (4+2) apple for the group 2 // Apple Group 3 getitem2 512, 1, 1, 0, 0, 255, 0, 3 & 0xffff, 3 >> 16; getitem2 512, 9, 1, 0, 0, 255, 0, 3 & 0xffff, 3 >> 16; // should give you (1+9) apple for the group 3 // etc.
There is no clean solution for doing what you want (I think).