Mob Restriction Script

[vijay30393]

Can anyone please help by converting the script below to work on eAthena 3CeAm!
 

-    script    Strict    -1,{
    OnInit:
        setarray .mob_restriction[0],1646,1647,1648,1649,1650,1651,1751,1708;
        .size = getarraysize(.mob_restriction);
        bindatcmd "monster",strnpcinfo(3)+"::OnExe",0,99;
        end;
    
    OnExe:
        .monster_id = atoi( .@atcmd_parameters$[0] );
        for ( .@i = 0; .@i < .size; .@i++ ) {
            if ( .monster_id == .mob_restriction[.@i] || getgmlevel() < 90 ) {
                dispbottom "You cannot summon this monster";
                end;
            }
        }
        if ( getmonsterinfo( .monster_id, 0 ) != "null" ) {
            .@amount = atoi( .@atcmd_parameters$[1] );
            atcommand "@monster " +.monster_id+ " " +(!.@amount?1:.@amount);
        }
        end;
}

 

~Thanks.

[Emistry]

https://rathena.org/board/topic/102636-guide-convert-script-to-eathena-compatible-version/