prontera,150,150,5  script  Teleporter#Sao  1_M_YOUNGKNIGHT,{
    .n$ = "[ Teleporter ]";
    mes .n$;
    mes "Please enter the Floor Number.";
    mes "===============================";
    mes "List of Active Maps";
    if (query_sql("SELECT id, name, level, status FROM npc_sao ", .@id, .@name$, .@level, .@status)) {
        for (.@i = 0; .@i < getarraysize(.@status); .@i++) { 
            if (.@status[.@i] == 1) {
                mes .@name$[.@i]+" - Floor "+ .@level[.@i];
            }
        }
    }       
    next;
    input(.@mapList);
    for (.@i = 0; .@i < getarraysize(.@id); .@i++) {
        if ( .@mapList == .@level[.@i] && .@status[.@i] == 1 ) {
            switch(select(.@level[.@i])){
                case 1:
                    warp "prontera", 150, 155;
                    end;
                case 2:
                    warp "prontera", 150, 145;
                    end;
                case 3:
                    warp "prontera", 150, 155;
                    end;
                case 4:
                    warp "prontera", 150, 155;
                    end;
                case 5:
                    warp "prontera", 150, 155;
                    end;
                default:
                    mes "No Warp Location Specified";
                    close;
            }
        }
    }
    mes .n$;
    mes "Unable to find the Floor number. Please enter the Active Floors.";
    close;
}