Pet Evolution Script, Configurable Chance Config

AnnieRuru said:
Miyami said:
hi, does this pet evolution script works? coz i tried this and it keeps on giving me "your inventory doesn't have any pet egg that intimate enough" dialogue even though i have the needed items in my inventory..
Click to expand...
just as it saidyour pet needs to be intimate enough such as

.pet_min_friendly = getbattleflag("pet_support_min_friendly");@makeegg poring@hatch

@petfriendly 1000
Click to expand...

Miyami said:
its all above the minimum requirement..the lvl & the intimacy..i already have its required items and its amount to evolve, and i havent edited its content.

i even tried the other versions from here http://rathena.org/board/topic/76954-can-i-request-script-evolution-pet/ but the result is still the same.

they always gave me a "your inventory doesn't have any pet egg"/"your inventory doesn't have any pet egg that intimate enough". i really like the script..please help me..

Another Edit:

i forgot to add this, i tried this code from http://www.eathena.ws/board/index.php?showtopic=243843

prontera,159,178,5 script ksjdfskf3 100,{ getinventorylist; for ( set .@i, 0; .@i < @inventorylist_count; set .@i, .@i +1 ) { if ( @inventorylist_card1[.@i] == -256 ) { dispbottom "Pet egg : "+ getitemname( @inventorylist_id[.@i] ); dispbottom "Pet ID : "+( @inventorylist_card2[.@i] +( ( @inventorylist_card2[.@i] > 0 )?0:pow(2,16) )+ @inventorylist_card3[.@i] * pow(2,16) ); } } end;}just to see if the inventory list takes effect, but there's nothing in my chat box..i tried it over and over to see if it display at the chat box, but there's none. and i also tried this one:
Code: 
prontera,159,178,5	script	ksjdfskf3	100,{	makepet 1002;	sleep2 1;	getinventorylist;	for ( set .@i, 0; .@i < @inventorylist_count; set .@i, .@i +1 ) {		if ( @inventorylist_card1[.@i] == -256 ) {			dispbottom "Pet egg : "+ getitemname( @inventorylist_id[.@i] );			dispbottom "Pet ID : "+( @inventorylist_card2[.@i] +( ( @inventorylist_card2[.@i] >= 0 )?0:pow(2,16) )+ @inventorylist_card3[.@i] * pow(2,16) );		}	}	end;}
but i only get the pet, nothing displayed on the chat box.just wanted to add this, might get a clue why this evolution script doesnt work on me..
Click to expand...
same me help plz thank you
default_biggrin.png


Miyami said:
its all above the minimum requirement..the lvl & the intimacy..i already have its required items and its amount to evolve, and i havent edited its content.

i even tried the other versions from here http://rathena.org/board/topic/76954-can-i-request-script-evolution-pet/ but the result is still the same.

they always gave me a "your inventory doesn't have any pet egg"/"your inventory doesn't have any pet egg that intimate enough". i really like the script..please help me..

Another Edit:

i forgot to add this, i tried this code from http://www.eathena.ws/board/index.php?showtopic=243843

prontera,159,178,5 script ksjdfskf3 100,{ getinventorylist; for ( set .@i, 0; .@i < @inventorylist_count; set .@i, .@i +1 ) { if ( @inventorylist_card1[.@i] == -256 ) { dispbottom "Pet egg : "+ getitemname( @inventorylist_id[.@i] ); dispbottom "Pet ID : "+( @inventorylist_card2[.@i] +( ( @inventorylist_card2[.@i] > 0 )?0:pow(2,16) )+ @inventorylist_card3[.@i] * pow(2,16) ); } } end;}just to see if the inventory list takes effect, but there's nothing in my chat box..i tried it over and over to see if it display at the chat box, but there's none. and i also tried this one:
Code: 
prontera,159,178,5	script	ksjdfskf3	100,{	makepet 1002;	sleep2 1;	getinventorylist;	for ( set .@i, 0; .@i < @inventorylist_count; set .@i, .@i +1 ) {		if ( @inventorylist_card1[.@i] == -256 ) {			dispbottom "Pet egg : "+ getitemname( @inventorylist_id[.@i] );			dispbottom "Pet ID : "+( @inventorylist_card2[.@i] +( ( @inventorylist_card2[.@i] >= 0 )?0:pow(2,16) )+ @inventorylist_card3[.@i] * pow(2,16) );		}	}	end;}
but i only get the pet, nothing displayed on the chat box.just wanted to add this, might get a clue why this evolution script doesnt work on me..
Click to expand...

Hey i solved already  try this   
default_biggrin.png


delete  delitem2  out and add in request same egg item for Evolution to delete egg 
default_smile.png
  and line if ( @inventorylist_card1[.@i] == -256 )  change if ( @inventorylist_card1[.@i] != 0 ) 

thank you all

SIzlude,212,168,1    script    Will Conner    923,{
if ( getpetinfo(PET_CLASS) ) {
        mes .@npcname$;
        mes "please return your pet into egg state to continue";
        cutin "",255;
        close;
    }
    getinventorylist;
    for ( .@i = 0; .@i < @inventorylist_count; .@i++ ) {
        if ( @inventorylist_card1[.@i] != 0  ) {
            query_sql "select intimate, class, level, equip, name from pet where pet_id = "+( .@id = @inventorylist_card2[.@i] + ( ( @inventorylist_card2[.@i] >= 0 )? 0 : 1 << 16 ) + @inventorylist_card3[.@i] * ( 1 << 16 ) ), .@intimate, .@class, .@level, .@equipped, .@name$;
            if ( .@intimate > .pet_min_friendly ) {
                .@menu$ = .@menu$ +"^0000FF"+ .@name$ +" ^00CC00{"+ getmonsterinfo( .@class, 0 ) +"} ^000000["+ .@level +"] ^FF0000"+( ( .@equipped )? "*equipped" : "" )+":";
                .@pet_id[.@c] = .@id;
                .@egg_id[.@c] = @inventorylist_id[.@i];
                .@pet_name$[.@c] = .@name$;
                .@pet_class[.@c] = .@class;
                .@pet_level[.@c] = .@level;
                .@pet_equipped[.@c] = .@equipped;
                .@c++;
            }
        }
    }
    if ( !.@c ) {
        mes .@npcname$;
        mes "your inventory doesn't have any pet egg that intimate enough";
        cutin "",255;
        close;
    }
    mes "select which pet that you want it to evolve";
    next;
    .@s = select( .@menu$ ) -1;
    mes "selected : "+ .@pet_name$[.@s];
    mes "level : "+ .@pet_level[.@s];
    mes "equipped : "+( ( .@pet_equipped[.@s] )? "Yes" : "No" );
    if ( getd( ".petr"+ .@pet_class[.@s] ) ) {
        mes "require :-";
        .@size = getarraysize( getd( ".petr"+ .@pet_class[.@s] ) );
        for ( .@i = 0; .@i < .@size; .@i += 2 )
            mes getd( ".petr"+ .@pet_class[.@s] +"["+( .@i +1 )+"]" )+"x "+ getitemname( getd( ".petr"+ .@pet_class[.@s] +"["+ .@i +"]" ) );
    }
    next;
    if ( !getd( ".pet"+ .@pet_class[.@s] ) ) {
      mes "this pet cannot evolve any further";        
    close;    
    }
    if ( .@pet_level[.@s] < .min_level ) {
        mes "this pet doesn't meet the level requirement";        
    close;    
    }
    if ( .@pet_equipped[.@s] ) {
        mes "please unequip this pet accesory to continue";        
    close;
    }
    if ( getd( ".petr"+ .@pet_class[.@s] ) ) {
        .@size = getarraysize( getd( ".petr"+ .@pet_class[.@s] ) );
        for ( .@i = 0; .@i < .@size; .@i += 2 ) {
            if ( countitem( getd( ".petr"+ .@pet_class[.@s] +"["+ .@i +"]" ) ) < getd( ".petr"+ .@pet_class[.@s] +"["+( .@i +1 )+"]" ) ) {
                mes "you need "+ getd( ".petr"+ .@pet_class[.@s] +"["+( .@i +1 )+"]" ) +"x "+ getitemname( getd( ".petr"+ .@pet_class[.@s] +"["+ .@i +"]" ) ) +" to evolve this pet";
                cutin "",255;
            close;
            }
        }
        for ( .@i = 0; .@i < .@size; .@i += 2 ) {
            delitem getd( ".petr"+ .@pet_class[.@s] +"["+ .@i +"]" ), getd( ".petr"+ .@pet_class[.@s] +"["+( .@i +1 )+"]" );
            
        }    
    }
    makepet .@get_pet_id = getd( ".pet"+ .@pet_class[.@s] +"["+ rand( getarraysize( getd( ".pet"+ .@pet_class[.@s] ) ) ) +"]" );
    mes "your "+ .@pet_name$[.@c] +" has reborn into "+ getmonsterinfo( .@get_pet_id, 0 );
    mes "please rename your pet ~";
    close;
 
 
 
 
OnInit:
 
 
    .min_level = 50; // minimum level 80 to change pet egg
    .pet_min_friendly = getbattleflag("pet_support_min_friendly");
//    setarray getd( ".petr"+ <require pet egg> ), <require itemID 1>, <require item require 1>, <require itemID 2>, <require item require 2>, ...
    setarray getd( ".petr"+ 1932 ), 7224,1, 9200,1; // Garden Keeper
    setarray getd( ".petr"+ 1707 ), 7224,1, 9201,1; // Thanatos Dolor
 
//    setarray getd( ".pet"+ <require pet egg> ), <random pet egg 1>, <random pet egg 2> ....
    setarray getd( ".pet"+ 1932 ), 1707, 1921; // สาย Angel 1
    // add more as needed
 
waitingroom "Pet Evolution" , 0;
 
end;
}
Click to expand...
it not bug error

 
Last edited by a moderator:
@AnnieRuru    

I have error in this code: 

delitem2 .@egg_id[.@s], 1, 1, 0, 0, -256, ( .@pet_id[.@s] % ( 1 << 16 ) - ( .@remainder15 = .@pet_id[.@s] % ( 1 << 15 ) ) < ( 1 << 15 ) )? .@remainder15 : ( .@remainder15 - ( 1 << 15 ) ), .@pet_id[.@s] >> 16, 0;
 

[Error]: script:delitem2: failed to delete 1 items (AID=2000000 item_id=30868).
[Debug]: Source (NPC): PokePetEvolution at prontera (241,142)
 

This is not the right solution :
"

Hey i solved already  try this    

delete  delitem2  out and add in request same egg item for Evolution to delete egg    and line if ( @inventorylist_card1[.@i] == -256 )  change if ( @inventorylist_card1[.@i] != 0 ) 

"

if delete delitem2 then doesn't works fine .... ,  I tried with every pets  2 of them shy and 1 loyal, and  if  I try to evolve loyal one , deletes the egg in shy intimacy 

 
Last edited by a moderator:
You must log in or register to reply here.
Back
Top