[Help] Friend Script

[Neneka]

I want to make friend script that can make Monster be your friend when you are online and disappear when you log off but

by using @summon but it only show the effect but not summon the friend

This is the error

the script is

morocc,150,107,3	script	NekoNeko	906,{mes "Hi~ ";emotion 30;mes "You can choose you Girl friend here !";mes "1 Girl Friend for 10M Zeny";mes "If you choose all only 80M Zeny";next;menu"I want Friend ! ",M,"I don't want Friend",Lclose;close;M:mes "Please choose you Girl Friend Btw if you choose all we will give you special price";next;menu "Moon Light Flower",M1,"Loli Ruri",M2,"Nymph",M3,"Succubus",M4,"Whitesmith",M5,"Sniper",M6,"Assassin Cross",M7,"Champion",M8,"Professor",M9,"Stalker",M10,"Biochemist",M11,"Gypsy",M12,"Paladin",M13,"Paladin (Peco)",M14,"Select All",M15,"Cancel",Lclose;close;M1:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 1150 60";set Zeny,Zeny - 10000000;goto MO;close;M2:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 1505 60";set Zeny,Zeny - 10000000;goto MO;close;M3:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 1564 60";set Zeny,Zeny - 10000000;goto MO;close;M4:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 1370 60";set Zeny,Zeny - 10000000;goto MO;close;M5:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5020 60";set Zeny,Zeny - 10000000;goto MO;close;M6:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5021 60";set Zeny,Zeny - 10000000;goto MO;close;M7:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5022 60";set Zeny,Zeny - 10000000;goto MO;close;M8:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5024 60";set Zeny,Zeny - 10000000;goto MO;close;M9:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5025 60";set Zeny,Zeny - 10000000;goto MO;close;M10:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5026 60";set Zeny,Zeny - 10000000;goto MO;close;M11:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5027 60";set Zeny,Zeny - 10000000;goto MO;close;M12:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5013 60";set Zeny,Zeny - 10000000;goto MO;close;M13:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5028 60";set Zeny,Zeny - 10000000;goto MO;close;M14:if (Zeny < 10000000) goto NO;atcommand strcharinfo(0)+"@summon 5029 60";set Zeny,Zeny - 10000000;goto MO;close;M15:if (Zeny < 100000000) goto NO;atcommand strcharinfo(0)+"@summon 5017 60";atcommand strcharinfo(0)+"@summon 5018 60";atcommand strcharinfo(0)+"@summon 5019 60";atcommand strcharinfo(0)+"@summon 5020 60";atcommand strcharinfo(0)+"@summon 5021 60";atcommand strcharinfo(0)+"@summon 5022 60";atcommand strcharinfo(0)+"@summon 5023 60";atcommand strcharinfo(0)+"@summon 5024 60";atcommand strcharinfo(0)+"@summon 5025 60";atcommand strcharinfo(0)+"@summon 5026 60";atcommand strcharinfo(0)+"@summon 5027 60";atcommand strcharinfo(0)+"@summon 5013 60";atcommand strcharinfo(0)+"@summon 5028 60";atcommand strcharinfo(0)+"@summon 5029 60";set Zeny,Zeny - 80000000;goto MO;close;MO:specialeffect 30;specialeffect 295;specialeffect 461;specialeffect 410;specialeffect2 459;specialeffect2 408;mes "Thank you very much";emotion 30;close;NO:mes "Sorry, Your money is not enough ! Please come again next time ! ";emotion 35;close;Lclose:close;OnInit:	waitingroom "Girl Friend",0;end;}

 

[Garr]

morocc,150,107,3 script NekoNeko 906,{ mes "Hi~ "; emotion 30; mes "You can choose you Girl friend here !"; mes "1 Girl Friend for 10M Zeny"; mes "If you choose all only 80M Zeny"; next; switch(select("I want Friend ! ","I don't want Friend")) { case 1: mes "Please choose you Girl Friend Btw if you choose all we will give you special price"; next; switch(select( "Moon Light Flower:Loli Ruri:Nymph:Succubus:Whitesmith:Sniper:Assassin Cross:Championrofessor:Stalker:Biochemist:Gypsyaladinaladin (Peco):Select All:Cancel")) { default: if( Zeny < 10000000 ) { mes "Sorry, Your money is not enough ! Please come again next time ! "; emotion 35; close; } atcommand "@summon " + .mobarray[@menu-1] + " 60"; Zeny -= 10000000; break; case 15: if( Zeny < 80000000 ) { mes "Sorry, Your money is not enough ! Please come again next time ! "; emotion 35; close; } Zeny -= 80000000; for(.@i = 0; .@i < getarraysize(.mobarray); .@i++) atcommand "@summon " + .mobarray[@menu-1] + " 60"; break; case 16: mes "As you wish!"; close; } specialeffect 30; specialeffect 295; specialeffect 461; specialeffect 410; specialeffect2 459; specialeffect2 408; mes "Thank you very much"; emotion 30; close; case 2: mes "As you wish!"; close; } close;OnInit: setarray .mobarray[0],1150,1505,1564,1370,5020,5021,5022,5024,5025,5026,5027,5013,5028,5029; waitingroom "Girl Friend",0; end;}
I've edited it a bit to remove gotos and set, or you might be getting deprecation warnings in Hercules. Otherwise just replace

atcommand strcharinfo(0)+"@summon
with

atcommand "@summon

That should do the trick.

 

[Neneka]

@Garr

Thank you very much, The script is working fine now