Emistry

try 
if( eaclass() & EAJL_UPPER ){ mes "Rebirth Class cant enter."; }else{ warp "mapname",x,y; }

a better version of quest shop..
trunk/npc/custom/quests/quest_shop.txt

try this.
http://pastebin.com/raw.php?i=dXrcwNJ8
 
pm the npc like this

 
 
 
this only generate lastest 127 records...
 

remove the contents inside this file.
System\TownInfo.lub

you didnt edit 
trunk/db/re/exp.txt

set #L_Healing,#L_Healing + 1;

it's just a item exchanger NPC...there are tons of this script in the forum...and even work better than this ...more simplified..and easier to edit/change...
i dont think other might going to spend time and convert these long script..
basically..should be...
checkitem ---> countitem additem ---> getitem  
refer countitem , getitem ....
 
 
some item to item exchanger  example
 
Exchanger [ Item to Item ] Exchanger [ Item to Item ] Exchanger [ Multi Item to 1 Item ] trunk/npc/custom/quests/quest_shop.txt

trunk/npc/kafras/kafras.txt
prontera,152,326,3 script Kafra Employee::kaf_prontera 112,{ cutin "kafra_06",2; callfunc "F_KafSet"; mes "Blablablabla"; callfunc "F_Kafra",5,0,0,40,800; savepoint "prontera",157,327; callfunc "F_KafEnd",0,1,"in the city of Prontera"; }  
just edit the coordinates...

try this
OnAtCmd: if ( #dailyreward != gettime(8) ){ message strcharinfo(0),"You wait another day."; }else{ // getitem x,y; set #dailyreward,gettime(8); } end;  
refer gettime
 
or else...you can try use gettimestr

i believe..you have to reset the variable 1 times..since the previous variable already stored more than 30...the script wont run that part as your variable is not equal to 30...
 
otherwise..change to
if (PvPkills % 30 == 0 ) goto L_PKGetFame;  
else..
test with another characters...

edit the amount part
 
 
EDIT :
// Example : Red Potion with 100% Refine Rate // 501,Red_Potion,Red Potion,11,50,,70,,,,,0xFFFFFFFF,7,2,,,,,,{ callfunc( "RefineFunc",501,1,63,0,10,1,0,100 ); },{},{} // Change Item Type to 11 and Amount Required to 1 ( Advised )  
please take note on what i write inside the script....

refer isequipped if (isequipped(4001)) mes "A poring card is useful, don't you think?"; refer countitem if( countitem( 4001 ) ){ // Check for Poring Card getitem 607,1; // get 1 Yggdrasilberry delitem 4001,1; // delete 1 Poring Card } refer Variables if( Weight > ( MaxWeight / 2 ) ){ mes "You are overweight.."; // more than 50% } refer Variables#Account_Variables if( #gained_item ){ // check variable mes "You already get the items."; }else{ #gained_item = 1; // assign variable getitem 607,1; }  
 

Login to phpMyAdmin Choose the affected database. If you only have one database, it should choose it by default so you don't need to do anything. In the main panel, you should see a list of your database tables. Check the boxes by the tables that need repair. At the bottom of the window just below the list of tables, there is a drop down menu. Choose "Repair Table" This should fix your table, and let you access it again. Now that it is fixed... it's a good idea to make that database backup!

like this ?
prontera,155,181,5 script Sample 757,{ getinventorylist; while( .@i < @inventorylist_count ){ if( getiteminfo( @inventorylist_id[.@i],2 ) == 3 ){ .@item_id[.@found] = @inventorylist_id[.@i]; .@found++; .@menu$ = .@menu$ + getitemname( @inventorylist_id[.@i] ) +":"; } .@i++; } if( .@found ){ .@i = select( .@menu$ ) - 1; mes "You selected "+getitemname( .@item_id[.@i] ); }else{ mes "No items."; } close; }

maybe some files of yours are missing..or incorrect ~
try get a new 1 here
http://subversion.assembla.com/svn/ClientSide/

try this
http://pastebin.com/raw.php?i=xMCguEAW
 
you stored the array data wrongly..
for(set .@i,0; .@i < getargcount(); set .@i,.@i + 1) { // should start by 0 ..not 2 setarray .@j[.@i],getarg(.@i); } mes "Quest: "+getd(".q_"+@bought_nameid+"[1]")+"x "+getitemname(getd(".q_"+@bought_nameid+"[0]"));// show wrong index mes ""+getd(".q_"+@bought_nameid+"["+(.@i+1)+"]")+"x "+getitemname(getd(".q_"+@bought_nameid+"["+(.@i)+"]"))+""; // show wrong index

monster support the optional parameter of size since r16904 ...update ur svn...
 
 
try  -    script    Sample    -1,{ OnTalk:     input .@mob_id;     if( .@mob_id == 1 ){         killmonster strcharinfo(3),strnpcinfo(0)+"::OnMobKill";         message strcharinfo(0),"All Summoned Mobs killed.";     }else if( getmonsterinfo( .@mob_id,MOB_NAME ) == "null" ){         message strcharinfo(0),"Invalid Mob ID.";     }else{         mes "Select size for "+getmonsterinfo( .@mob_id,MOB_NAME );         .@size = select( "Medium Size","Small Size","Large Size" ) - 1;         close2;         // monster "this",-1,-1,"--ja--",.@mob_id,1,strnpcinfo(0)+"::OnMobKill";         monster "this",-1,-1,"--ja--",.@mob_id,1,strnpcinfo(0)+"::OnMobKill",.@size;     } OnMobKill:     end; } .................{ doevent "Sample::OnTalk"; },{},{}

like this ?
http://pastebin.com/raw.php?i=W4UXJLw9
 
OnInit: // craft settings .craft_rate = 50; setarray .item_id,607,608; setarray .item_amount,1,2; .item_id_size = getarraysize( .item_id ); // item gain .craft_gain = 7539; end;

http://rathena.org/board/topic/72005-sql-error-20m-hp/

delwaitingroom;
waitingroom "Freebies Giver",0;

i think should be
log_db_db: log

just remove this part if you wan to enable all job..
if ( BaseLevel != 1 || Class != 0){ mes "[^0000FFZombie Vs. Novice^000000]"; mes "You must be a level 1 Novice."; close; }  
 
 
because players who have a mount are usually having bonus in movement speed.

inside trunk/db/item_delay.txt
remove or comment out this line
607,5000 // Yggdrasil_Berry  
 
change the item type.
13517,Yggdrasilberry_Box,Yggdrasil Berry Box,0,20,,10,,,,,0xFFFFFFFF,7,2,,,,,,{ getitem 607,3; },{},{}  
trunk/doc/item_db.txt

you can try these
https://rathena.org/board/index.php?/files/file/2504-%7B?%7D/
 
or
trunk/npc/custom/quests/quest_shop.txt