Item expiration

[Initsuga]

Hi!

sino po dito may alam pano i edit ang isang item na mag expire siya nang 1day. Anong steps po sa pag gawa nito?

TYIA! 

[Initsuga]

Hi!

Does anyone know how to edit an item that it will expire in 1 day. What are the steps on how to do it?

sorry! i dont know if im in the right thread

TYIA!

[Initsuga]

6 hours ago, hannicaldummy said:

 

If it is via NPC you can use that:

 

                rentitem ITEMID,86400;

 

86400 equals to 24 hours

 

Hi sir! 

Thank you for your reply. And yes it is via npc. How can i use that script? I mean where .txt will i insert that rentitem ITEMID,86400;

 

[Initsuga]

// Settings :
//    -    Only required to edit the ShopSetting() Function
//            Notes : You may also add / remove Menu ( If any ) 
//    -    Shop Currency can be either ItemID or Variable Name, but must write within Quotation Marks ( "" )
//            Ex. of Variable.    ->    Zeny , #CASHPOINTS , #KAFRAPOINTS , CustomVariable , #CustomVariable
//    -    ERROR Message are used to show Invalid Settings in your NPC.

// Leave this alone...
-    shop    Emistry_Shop    -1,512:100

prontera,143,178,5    script    Sample    757,{
function ShopSettings;
function ValidateCost;
function CurrencyInfo;
function ClearData;
function ValueConvert;
function ErrorNotice;

mes "Each Shop from the Menu may purchase using ^FF0000Different Currency^000000.";
mes "^00FF00____________________________^000000";
mes "So,Which shop you would like to look at it";
next;
// Menu Selection
select("Shop 1","Shop 2","Shop 3");

ClearData();
ShopSettings( @menu );
npcshopitem "Emistry_Shop",512,100;
npcshopdelitem "Emistry_Shop",512;
for(set [email protected],0; [email protected] < getarraysize( @ItemLists ); set [email protected],[email protected]+1)
    npcshopadditem "Emistry_Shop",@ItemLists[[email protected]],@ItemCost[[email protected]];
mes "Okay...wait awhile";
mes "^00FF00____________________________^000000";
CurrencyInfo( @Currency$ );
mes "^00FF00____________________________^000000";
callshop "Emistry_Shop",1;
npcshopattach "Emistry_Shop";
end;

function    ShopSettings    {
    switch( getarg(0) ){
        Case 1:
            // Currency [ Item ID / Variable Name ]
            set @Currency$,"7179";
            // Item ID Lists
            setarray @ItemLists[0],6174,7146;
            // Item Price
            setarray @ItemCost[0],10,1;
            break;
        Case 2:
            // Currency [ Item ID / Variable Name ]
            set @Currency$,"7227";
            // Item ID Lists
            setarray @ItemLists[0],2306,2302,2303,2304,2305,2301;
            // Item Price
            setarray @ItemCost[0],2,2,3,4,5,6;
            break;
        Case 3:
            // Currency [ Item ID / Variable Name ]
            set @Currency$,"#CASHPOINTS";
            // Item ID Lists
            setarray @ItemLists[0],2306,2302,2303,2304,2305,2301;
            // Item Price
            setarray @ItemCost[0],20,22,34,445,52,641;
            break;
        // Case 4,5,6.....etc...
        default:
            ErrorNotice( "Invalid Menu Selection for Menu "[email protected]+"." );
            close;
    }
    
    
if( @Currency$ == "" )
    ErrorNotice( "Invalid Currency Setting in Menu "[email protected]+" ." );
if( getarraysize( @ItemCost ) != getarraysize( @ItemLists ) || getarraysize( @ItemLists ) != getarraysize( @ItemCost ) )
    ErrorNotice( "Missing or Extra Value of Item or Cost Settings in Menu "[email protected]+" ." );
return;
}

function    ErrorNotice    {
    mes "^FF0000ERROR^000000 - "+getarg(0);
    mes "^00FF00____________________________^000000";
    mes "Inform this Message to ^0000FFGame Staffs^000000 immediately !";
    close;
}

function    CurrencyInfo    {
    if( getitemname( atoi( getarg(0) ) ) != "null" ){
        mes "Item Currency : ^FF0000"+getitemname( atoi( getarg(0) ) )+"^000000";
        mes "Available Amount : ^0000FF"+ValueConvert( countitem( atoi( getarg(0) ) ) )+"^000000";
    }else if( getitemname( atoi( getarg(0) ) ) == "null" ){
        mes "Variable Currency : ^FF0000"+getarg(0)+"^000000";
        mes "Available Amount : ^0000FF"+ValueConvert( getd( getarg(0) ) )+"^000000";
    }
return;
}

function    ValidateCost    {
    if( getitemname( atoi( getarg(0) ) ) != "null" ){
        if( countitem( atoi( getarg(0) ) ) < getarg(1) ) return 1;
    }else{
        if( getd( getarg(0) ) < getarg(1) ) return 1;
    }
return 0;
}

function ClearData    {
    set @Currency$,"";
    set @TotalCost,0;
    deletearray @bought_nameid[0],getarraysize( @bought_nameid );
    deletearray @bought_quantity[0],getarraysize( @bought_quantity );
    deletearray @ItemLists[0],getarraysize( @ItemLists );
    deletearray @ItemCost[0],getarraysize( @ItemCost );
return;
}

function    ValueConvert    {
    set [email protected], atoi(""+getarg(0));
    if ( [email protected] == 0 || [email protected] >= 2147483647 ) return getarg(0);
    set [email protected], getstrlen(""[email protected]);
    for ( set [email protected],0; [email protected] < [email protected]; set [email protected], [email protected] + 1 ) {
        set [email protected]$, [email protected] % pow(10,[email protected]+1) / pow(10,[email protected]) + [email protected]$;
            if ( ([email protected]+1) % 3 == 0 && [email protected]+1 != [email protected] ) set [email protected]$, ","+ [email protected]$;
    }
    return [email protected]$;
}

OnBuyItem:
    ShopSettings( @menu );
    for(set @i,0; @i < getarraysize( @bought_nameid ); set @i,@i+1)
        for(set @j,0; @j < getarraysize( @ItemLists ); set @j,@j+1)
            if( @ItemLists[@j] == @bought_nameid[@i] )
            set @TotalCost,@TotalCost + ( @ItemCost[@j] * @bought_quantity[@i] );
    mes "^FF0000       BILLING LIST^000000";
    mes "^00FF00____________________________^000000";
    for( set @i,0; @i < getarraysize( @bought_nameid ); set @i,@i+1 )
            mes "^FF0000"[email protected]_quantity[@i]+" x ^0000FF"+getitemname( @bought_nameid[@i] )+"^000000";
    mes "^00FF00____________________________^000000";

    if( getitemname( atoi( @Currency$ ) ) != "null" )
        mes "Total Cost : ^0000FF"+ValueConvert( @TotalCost )+" x "+getitemname( atoi( @Currency$ ) )+"^000000";
    else if( getitemname( atoi( @Currency$ ) ) == "null" ){
        mes "Total Cost : ^0000FF"+ValueConvert( @TotalCost )+" "[email protected]$+"^000000";
    }
    
    mes "^00FF00____________________________^000000";
    if( ValidateCost( @Currency$,@TotalCost ) ){
        if( getitemname( atoi( @Currency$ ) ) != "null" )
            mes "[ ^FF0000X^000000 ] Insufficient ^0000FF"+getitemname( atoi( @Currency$ ) )+"^000000";
        else{
            mes "[ ^FF0000X^000000 ] Insufficient ^0000FF"[email protected]$+"^000000";
        }
    }else{
        if( select( "^0000FFPurchase^000000:Cancel" ) == 1 ){
            if( getitemname( atoi( @Currency$ ) ) != "null" )
                delitem atoi( @Currency$ ),@TotalCost;
            else{
                set getd( @Currency$ ),getd( @Currency$ ) - @TotalCost;
            }
            for(set @i,0; @i < getarraysize( @bought_nameid ); set @i,@i+1)
                getitem @bought_nameid[@i],@bought_quantity[@i];
            message strcharinfo(0),"Purchased "+getarraysize( @bought_nameid )+" Items.";
            mes "Thank you for shopping.";
        }
    }
ClearData();
close;

}
 

 

 

 

 

i saw this code also here in rathena and i want some of the items here when purchase will be rental.

can someone help me please!

[drupi]

instead of 

getitem <itemID>,<qty>;

use

rentitem <itemID>,<duration>;

note that duration is in seconds