Identifier

/*
________________     ______            ________
___    |_____  /________  /______      ___  __ \_____
__  /| |  __  /_  __ \_  __ \  _ \     __  /_/ /  __ \
_  ___ / /_/ / / /_/ /  /_/ /  __/     _  _, _// /_/ /
/_/  |_\__,_/  \____//_.___/\___/      /_/ |_| \____/

*/

prontera.gat,148,189,5  script  Identifier  919,{
    getinventorylist;
    for( set .@i,0; .@i < @inventorylist_count; set .@i, .@i + 1 ) {
        if ( @inventorylist_identify[.@i] == 1 ) continue;

        // Merchant's Identify skill
        if ( getskilllv(40) == 1 && sp >= 10 ) heal 0,-10;

        // check if there is any Magnifier
        else if ( countitem(611) ) delitem 611,1;

        // base on Magnifier price, Rogue's Compulsion Discount skill
        else if ( getskilllv(224) && zeny >= ( 100 - ( 5 + 4 * getskilllv(224) ) )* 2/5 )
            set zeny, zeny - ( 100 - ( 5 + 4 * getskilllv(224) ) )* 2/5;

        // base on Magnifier price, Merchants that not enough sp and learned Discount skill
        else if ( getskilllv(37) && zeny >= ( 100 - ( 5 + 2 * getskilllv(37) ) )* 2/5 )
            set zeny, zeny - ( 100 - ( 5 + 2 * getskilllv(37) ) )* 2/5;

        // if none of the above, deduct the zeny
        else if ( zeny >= 40 )  set zeny, zeny - 40;

        // or stop the script if there the person not enough money
        else break;
        delitem2 @inventorylist_id[.@i],1,0,0,0,0,0,0,0;
        getitem @inventorylist_id[.@i],1;
    }
}