Jump to content

sparkle

Members
  • Posts

    13
  • Joined

  • Last visited

Posts posted by sparkle

  1. I managed to make a Hercules script compatible to rAthena last rev, but i don't know how to update these sql lines to rathena.

    Full Code by AnnieRuru: https://github.com/AnnieRuru/Release/blob/master/scripts/Games%20%26%20Events/MVP%20Rank/Monthly%20MVP%20Rank%201.3.txt


    Code.

    OnClock0000:
    	//if (gettime(6) != 1) end;
    L_give:
    //	query_sql "TRUNCATE TABLE `mvp_rank_archive`"; // uncomment this line if you love to periodically clean your data
    	$mvp_ladder_last_given = atoi(gettime(7) +""+ gettime(6));
    	.@nb = query_sql("SELECT `char_id`, `name`, `kills` FROM `mvp_rank` ORDER BY `kills` DESC LIMIT 10", .@cid, .@name$, .@kills);
    	if (!.@nb) end;
    	setarray .@reward, 501, 502, 503, 504, 505;
    	setarray .@amount, 10, 9, 8, 7, 6;
    	for (.@i = 0; .@i < .@nb; ++.@i)
    		mail .@cid[.@i], "[MVP Rank]", "MVP Ranking", "Congratulations for earning pos number "+(.@i +1)+".", 0, .@reward[.@i], .@amount[.@i];
    	if (gettime(6) > 10)
    		.@store_date$ = gettime(7) +"-"+(gettime(6) -1)+"-00 00:00:00"; // how to update this to rathena
    	else if (gettime(6) > 1)
    		.@store_date$ = gettime(7) +"-0"+(gettime(6) -1)+"-00 00:00:00"; // how to update this to rathena
    	else
    		.@store_date$ = (gettime(7) -1) +"-12-00 00:00:00"; // how to update this to rathena
    	for (.@i = 0; .@i < .@nb; ++.@i)
    		.@store$[.@i] = "('"+ .@store_date$ +"', "+(.@i +1)+", "+ .@cid[.@i] +", '"+ escape_sql(.@name$[.@i]) +"', "+ .@kills[.@i] +")"; // how to update this to rathena
    	query_sql "INSERT INTO `mvp_rank_archive` VALUES "+ implode(.@store$, ","); // how to update this to rathena
    	query_sql "TRUNCATE `mvp_rank`";
    	end;
    
    // SQL FILES
    /*
    CREATE TABLE `mvp_rank_archive` (
    	`date` datetime NOT NULL,
    	`pos` tinyint(6) unsigned NOT NULL default '0',
    	`char_id` int(11) NOT NULL default '0',
    	`name` varchar(25) NOT NULL default '',
    	`kills` int(11) NOT NULL default '0',
    	PRIMARY KEY(`date`, `pos`)
    ) ENGINE=MyISAM AUTO_INCREMENT=1;
    
    CREATE TABLE `mvp_rank` (
    	`char_id` int(11) NOT NULL default '0',
    	`name` varchar(25) NOT NULL default '',
    	`kills` int(11) NOT NULL default '0',
    	 KEY `kills` (`kills`)
    ) ENGINE=MyISAM;
    */



    Error in map-serv

     

    [SQL]: DB error - Incorrect datetime value: '2021-05-00 00:00:00' for column 'date' at row 1
    [Debug]: at script.cpp:17335 - INSERT INTO `mvp_rank_archive` VALUES ('2021-05-00 00:00:00', 1, 150000, 'd', 2)


    Thanks in advance.

  2. Hello, i was trying to fix this script but i only get 0x base exp and 0x job exp.
    made by emistry

     

    // https://rathena.org/board/topic/106742-floating-rates-after-a-certain-condition/
     
    prontera,155,181,5  script  Sample  4_F_KAFRA1,{
        
        mes "Donate zeny boost EXP?";
        mes "Required Donation: "+F_InsertComma($DONATE_EXP_ZENY_AIM)+"z";
        mes " ";
        mes "Current Donation: "+F_InsertComma($DONATE_EXP_ZENY)+"z";
        mes "Current Rate: "+F_InsertComma($DONATE_EXP_RATE)+"X";
        if (select("Continue", "Cancel") == 1) {
            if ($DONATE_EXP_DURATION > .@gettimetick) {
                mes "EXP bonus already started, you cant donate now.";
            }
            else {
                input .@zeny, 0, Zeny;
                if (.@zeny > 0) {
                    Zeny -= .@zeny;
                    $DONATE_EXP_ZENY += .@zeny;
                    mes "You donated "+F_InsertComma(.@zeny)+"z";
                    
                    if ($DONATE_EXP_ZENY >= $DONATE_EXP_ZENY_AIM && $DONATE_EXP_ZENY_AIM > 0) {
                        $DONATE_EXP_RATE = rand(.rate_range[0], .rate_range[1]);
                        $DONATE_EXP_DURATION = gettimetick(2) + .duration;
                        
                        callsub(L_rate, ));
                        donpcevent strnpcinfo(3)+"::OnStart";
                    }
                }
            }
        }
        close;
     
        OnInit:
            setarray .zeny_range, 
                5000000, // minimum
                1000000, // increasing rate
                2000000000; // max donate amount
            
            .duration = (5 * 60 * 60); // 5 hours
            setarray .rate_range, 6, 10; // 6~10x exp boost
            
            .base_exp_rate = getbattleflag("base_exp_rate");
            .job_exp_rate = getbattleflag("job_exp_rate");
            
            if ($DONATE_EXP_ZENY_AIM < .zeny_range[0])
                $DONATE_EXP_ZENY_AIM = .zeny_range[0];
            if ($DONATE_EXP_ZENY_AIM > .zeny_range[2] && .zeny_range[1] > 0)
                $DONATE_EXP_ZENY_AIM = .zeny_range[2];
            if ($DONATE_EXP_RATE < 1) 
                $DONATE_EXP_RATE = 1;
            if ($DONATE_EXP_DURATION > gettimetick(2)) {
                callsub(L_rate, $DONATE_EXP_RATE);
                initnpctimer;
            }
            end;
        
        OnTimer60000:
        OnStart:
            stopnpctimer;
            if ($DONATE_EXP_DURATION > gettimetick(2)) {
                initnpctimer;
            }
            else if ($DONATE_EXP_DURATION && $DONATE_EXP_DURATION < .@gettimetick) {
                $DONATE_EXP_DURATION = 0;
                $DONATE_EXP_RATE = 1;
                $DONATE_EXP_ZENY_AIM += .zeny_range[1];
                if ($DONATE_EXP_ZENY_AIM > .zeny_range[2] && .zeny_range[1] > 0)
                    $DONATE_EXP_ZENY_AIM = .zeny_range[2];
                callsub(L_rate, $DONATE_EXP_RATE);
            }
            end;
        
        L_rate:
            .@base_exp_rate = ( .@rate * .base_exp_rate );
            .@job_exp_rate = ( .@rate * .job_exp_rate );
           
            setbattleflag("base_exp_rate",.@base_exp_rate;
            setbattleflag("job_exp_rate",.@job_exp_rate;
            atcommand "@reloadmobdb";
            
            announce "Current rates are: "+.@base_exp_rate+"x "+.@job_exp_rate+"x ", bc_all, 0xFF6060;
            return;
    }

     

  3. Hola, al intentar agregar @battleinfo la consola de compilación me esta tirando errores necesito ayuda, dejo detalles.

     

    archivo: atcommand.c

    ACMD_FUNC(battleinfo)
    {
    	if( sd->state.battleinfo )
    	{
    		clif_displaymessage(fd, "- Battle Information Display OFF - Kill/Death -");
    		sd->state.battleinfo = 0;
    	}
    	else
    	{
    		clif_displaymessage(fd, "- Battle Information Display ON - Kill/Death -");
    		sd->state.battleinfo = 1;
    	}
    	return 0;
    }

     

    archivo: pc.c

    	if( ssd->state.battleinfo )
    	{
    		sprintf(output,"( You Kill the %s [%s] using <%s> )", job_name(tsd->status.class_), tsd->status.name, ( skill_id ? skill_get_desc(skill_id) : "Melee/Reflect/Effect" ));
    		clif_disp_onlyself(ssd,output,strlen(output));
    	}
    	if( tsd->state.battleinfo )
    	{
    		sprintf(output,"( The %s [%s] kill you using <%s> )", job_name(ssd->status.class_), ssd->status.name, ( skill_id ? skill_get_desc(skill_id) : "Melee/Reflect/Effect" ));
    		clif_disp_onlyself(tsd,output,strlen(output));
    	}
    }

     

    archivo: pc.h

    unsigned int battleinfo : 1;

     

    Estos son los errores que aparecen en la consola
     

    		    16>c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(325): error C2059: error de sintaxis: 'if' [C:\Use
           rs\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
        16>c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(326): error C2143: error de sintaxis: falta ';' de
           lante de '{' [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
        16>c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(326): error C2447: '{': falta el encabezado de fun
           ción (¿lista formal de estilo anterior?) [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxp
           roj]
        16>c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(330): error C2059: error de sintaxis: 'if' [C:\Use
           rs\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
        16>c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(331): error C2143: error de sintaxis: falta ';' de
           lante de '{' [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
        16>c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(331): error C2447: '{': falta el encabezado de fun
           ción (¿lista formal de estilo anterior?) [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxp
           roj]
        16>Compilación del proyecto terminada "C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj" (
           destinos predeterminados) -- ERROR.
         5>Compilación del proyecto terminada "C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj.me
           taproj" (destinos predeterminados) -- ERROR.
         1>Compilación del proyecto terminada "C:\Users\user\Desktop\Ragnarok\rathena-master\rAthena.sln" (destinos predet
           erminados) -- ERROR.
    
    ERROR al compilar.
    
           "C:\Users\user\Desktop\Ragnarok\rathena-master\rAthena.sln" (destino predeterminado) (1) ->
           "C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj.metaproj" (destino predeterminado) (5
           ) ->
           "C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj" (destino predeterminado) (16) ->
           (ClCompile destino) ->
             c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(325): error C2059: error de sintaxis: 'if' [C:\U
           sers\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
             c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(326): error C2143: error de sintaxis: falta ';'
           delante de '{' [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
             c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(326): error C2447: '{': falta el encabezado de f
           unción (¿lista formal de estilo anterior?) [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vc
           xproj]
             c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(330): error C2059: error de sintaxis: 'if' [C:\U
           sers\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
             c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(331): error C2143: error de sintaxis: falta ';'
           delante de '{' [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vcxproj]
             c:\users\user\desktop\ragnarok\rathena-master\src\map\pc.cpp(331): error C2447: '{': falta el encabezado de f
           unción (¿lista formal de estilo anterior?) [C:\Users\user\Desktop\Ragnarok\rathena-master\src\map\map-server.vc
           xproj]
    
        0 Advertencia(s)
        6 Errores

     

×
×
  • Create New...