Jump to content

Syndicate

Members
  • Posts

    108
  • Joined

  • Last visited

  • Days Won

    1

Posts posted by Syndicate

  1. Need help . I found this script, but it seems not working.

    // 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 VPS_Shop -1,512:100
    
    prontera,146,148,5 script Vote Shop 757,{
    function ShopSettings;
    function ValidateCost;
    function CurrencyInfo;
    function ClearData;
    function ValueConvert;
    function ErrorNotice;
    query_sql("SELECT `points` FROM `cp_v4p_voters` WHERE account_id="+.@account_id+" LIMIT 1",.@points);
    OnPCLoginEvent:
    query_sql("SELECT `points` FROM `cp_v4p_voters` WHERE account_id="+getcharid(3)+" LIMIT 1",.@points);
    #Vote_Points += .@points;
    query_sql("UPDATE `cp_v4p_voters` SET `points`= 0 WHERE account_id="+getcharid(3)+" LIMIT 1" );
    end;
    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("Vote Shop 1","Vote Shop 2");
    ClearData();
    ShopSettings( @menu );
    npcshopitem "VPS_Shop",512,100;
    npcshopdelitem "VPS_Shop",512;
    for(set .@i,0; .@i < getarraysize( @ItemLists ); set .@i,.@i+1)
    npcshopadditem "VPS_Shop",@ItemLists[.@i],@ItemCost[.@i];
    mes "Okay...wait awhile";
    mes "^00FF00____________________________^000000";
    CurrencyInfo( @Currency$ );
    mes "^00FF00____________________________^000000";
    callshop "VPS_Shop",1;
    npcshopattach "VPS_Shop";
    end;
    
    function ShopSettings {
    switch( getarg(0) ){
    Case 1:
    // Currency [ Item ID / Variable Name ]
    set @Currency$,"#Vote_Points";
    // Item ID Lists
    setarray @ItemLists[0],6153,7227;
    // Item Price
    setarray @ItemCost[0],100,1;
    break;
    Case 2:
    // Currency [ Item ID / Variable Name ]
    set @Currency$,"#Vote_Points";
    // 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 4,5,6.....etc...
    default:
    ErrorNotice( "Invalid Menu Selection for Menu "+@menu+"." );
    close;
    }
    
    if( @Currency$ == "" )
    ErrorNotice( "Invalid Currency Setting in Menu "+@menu+" ." );
    if( getarraysize( @ItemCost ) != getarraysize( @ItemLists ) || getarraysize( @ItemLists ) != getarraysize( @ItemCost ) )
    ErrorNotice( "Missing or Extra Value of Item or Cost Settings in Menu "+@menu+" ." );
    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 .@num, atoi(""+getarg(0));
    if ( .@num == 0 || .@num >= 2147483647 ) return getarg(0);
    set .@l, getstrlen(""+.@num);
    for ( set .@i,0; .@i < .@l; set .@i, .@i + 1 ) {
    set .@num$, .@num % pow(10,.@i+1) / pow(10,.@i) + .@num$;
    if ( (.@i+1) % 3 == 0 && .@i+1 != .@l ) set .@num$, ","+ .@num$;
    }
    return .@num$;
    }
    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"+@bought_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 )+" "+@Currency$+"^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"+@Currency$+"^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;
    OnInit:
    waitingroom "Vote Shop",0;
    
    }
    

  2. Need help in renewal SVN

    I need help on this script.

    { setoption 128;},{ setoption (128, 0);} <<<<<<--------- CART

    In new SVN . setoption is not working .

    When a certain item was worn it will give me cart.

    But now its not working anymore.

    And If I used @cart I cant turn it off at ALT - Q .

    Need help thx

  3. Hi I would like to ask some help here due to my server web error. I cant add pages and news and cant see add content even content management was paste in addons folder and execute the 2 sql of news and pages.

    PAGE NOT FOUND

    The page you have requested was not found on our server. Please check the address and make sure it is correct, and try again.

    /?module=news&action=view

    I hope someone can help me and I know god will provide to your kindness. I will be grateful if you will help me. Thank you.

    - If my topic is not in right section,please move it. Thanks.

    Godbless

  4. Hi I would like to ask some help here due to my server web error. I cant add pages and news and cant see add content even content management was paste in addons folder and execute the 2 sql of news and pages.

    PAGE NOT FOUND

    The page you have requested was not found on our server. Please check the address and make sure it is correct, and try again.

    /?module=news&action=view

    I hope someone can help me and I know god will provide to your kindness. I will be grateful if you will help me. Thank you.

    - If my topic is not in right section,please move it. Thanks.

    Godbless

  5. Hello everyone !

    Is it possible a normal character or account is to change their color chat instead of default chat , but in particular player only.

    Example:

    Judas : How are you today ? << This is a normal player and has a normal account but special color of chat.

    Euphy : I'm fine today .. << A normal character and has a normal account but no special chat or means to be default only.

    ** Reason why Im asking this **

    Because I would like to make a representative. But not a GM.

    [ I saw this before in other server but it doesnt have a GM sprites but has commands. ]

    I dont know if this topic has made. But please help me in this current situation.

    Thank you..

    I know god will provide to your kindness and gold precious heart.

    Thank you and God Bless.

    Bump

×
×
  • Create New...