Item DB request (Special MVP Summoner) Anti-Corrupt GM

[Dvrstle]

i want to request for a special summon of mvp, for example... my event gm will click the "MvP Summoner" and then choices will come out, All the mvp monsters. and so after selecting, it will summon the monster immediately . Thanks. This will be helpful to others and stop corruptions =)

[Bin4ry]

function script MVPSummon {
mes "Select one:";
next;
set .@m, select(.smenu$) - 1;
} else {
 close2;
 atcommand "@spawn " + .mobid[.@m] + " " + .mobam[.@m];
 end;
}
OnInit:
// Spawn ID
setarray .mobid[0],1511,1647,1785,1630,1039,1874,1272,1719,1046,1389,1112,1115,1418,1871,1252,1768,1086,1885,1649,1651,1832,1492,1734,1251,1779,1688,1646,1373,1147,1059,1150,1087,1190,1038,1157,1159,1623,1650,1583,1708,1312,1751,1648,1658;
// Spawn amount
setarray .mobam[0],1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1;
set .smenu$,"";
for(set .@s,0; .@s < getarraysize(.mobid); set .@s,.@s + 1) {
 // Skips an Monster if it does not exist in the db
 if (getmonsterinfo(.mobid[.@s],0) == "" || getmonsterinfo(.mobid[.@s],0) == "null") {
  debugmes .n$ + ": Mob ID " + .mobid[.@s] + " is not a valid ID.";
  deletearray .mobid[.@s],1;
  deletearray .mobam[.@s],1;
  deletearray .mobze[.@s],1;
  continue;
 }
 // else adding it to the menu
 set .smenu$,.smenu$ + "- "+getmonsterinfo(.mobid[.@s],0) + ( (.mobid[.@s+1] == 0)?"":":");
}
end;
}

For item_db, add an usable item and change item script to:

callfunc "MVPSummon";

P/S: The script is ripped from Rikimaru so credits goes to him.

[Dvrstle]

ill try this one =) thnk you buddy

[AnnieRuru]

why not do some cheap hack from mob_db table ... lol

prontera,155,184,5	script	kjdshfkjsdf	100,{
if ( getgmlevel() < 60 ) {
	mes "I only talk to gm";
	close;
}
mes "select a mvp to summon";
next;
set .@menu, select( .menu$ ) -1;
monster "this", -1,-1, "--ja--", .mob_id[ .@menu ], 1, strnpcinfo(0)+"::Ondummy";
close;
OnInit:
set .@mob_size, query_sql( "select id, kname from mob_db where mvp1id != 0 and mexp > 2000 order by kname asc;", .mob_id, .@mob_name$ );
.menu$ = .@mob_name$;
for ( .@i = 1; .@i < .@mob_size; .@i++ )
	.menu$ = .menu$ +":"+ .@mob_name$[.@i];
Ondummy:
end;
}

[Dvrstle]

why not do some cheap hack from mob_db table ... lol

prontera,155,184,5	script	kjdshfkjsdf	100,{
if ( getgmlevel() < 60 ) {
	mes "I only talk to gm";
	close;
}
mes "select a mvp to summon";
next;
set .@menu, select( .menu$ ) -1;
monster "this", -1,-1, "--ja--", .mob_id[ .@menu ], 1, strnpcinfo(0)+"::Ondummy";
close;
OnInit:
set .@mob_size, query_sql( "select id, kname from mob_db where mvp1id != 0 and mexp > 2000 order by kname asc;", .mob_id, .@mob_name$ );
.menu$ = .@mob_name$;
for ( .@i = 1; .@i < .@mob_size; .@i++ )
	.menu$ = .menu$ +":"+ .@mob_name$[.@i];
Ondummy:
end;
}

it is because i want to limit the use of @monster command /summoning =) . . .

btw tnx for the try =)

[Bin4ry]

Annie was saying my script didn't used query SQL to create MVP array menu instead manually typed array. Well that because I saw ur request I just simply rip 1 of Rikimaru script and removed the zeny part. Didn't took a minute to help one other he he.

[AnnieRuru]

if you want to limit with @monster atcommand, it has to be done in the source though, atcommand.c file