other.pas

^_^

 if (y>267) and (y<309) then result:='九寨(天府)' else
 if (y>309) and (y<351) then result:='天山(天府)' else
 if (y>351) and (y<393) then result:='版纳(天府)' else
 if (y>393) and (y<435) then result:='剑门(天府)' else
 if (y>435) and (y<477) then result:='嘉峪(天府)' else result:='未知';
end
else
if Logo='移动天下(15区)' then begin
 if (y>246) and (y<288) then result:='华夏(移动)' else
 if (y>288) and (y<330) then result:='神州(移动)' else
 if (y>330) and (y<372) then result:='四海(移动)' else result:='未知';
end
else
if Logo='侠骨丹心(16区)' then begin
 if (y>267) and (y<309) then result:='楚天(联通)' else
 if (y>309) and (y<351) then result:='秦岭(联通)' else result:='未知';
end
else
if Logo='风云专区(17区)' then begin
 if (y>225) and (y<267) then result:='奔腾(光通)' else
 if (y>267) and (y<309) then result:='海清(光通)' else
 if (y>309) and (y<351) then result:='天河(NEW!光通)' else
 if (y>351) and (y<393) then result:='白云山(NEW!光通)' else result:='未知';
end
else
if Logo='赤月·广电星空(18区)' then begin
 if (y>225) and (y<267) then result:='辟地(新版)' else
 if (y>267) and (y<309) then result:='开天(新版)' else
 if (y>309) and (y<351) then result:='霸业(新版)' else
 if (y>351) and (y<393) then result:='辉煌(新版)' else result:='未知';
end
else
if Logo='西部圣域II(19区)' then begin
 if (y>225) and (y<267) then result:='昆仑(天府)' else
 if (y>267) and (y<309) then result:='龙门(天府)' else
 if (y>309) and (y<351) then result:='苍山(天府)' else
 if (y>351) and (y<393) then result:='古城(天府)' else result:='未知';
end
else
if Logo='光明世界(20区)' then begin
 if (y>225) and (y<267) then result:='晴空' else
 if (y>267) and (y<309) then result:='碧波' else
 if (y>309) and (y<351) then result:='青山' else
 if (y>351) and (y<393) then result:='绿野' else result:='未知';
end
else
if Logo='江山如画(21区)' then begin
 if (y>225) and (y<267) then result:='秋水' else
 if (y>267) and (y<309) then result:='长天' else
 if (y>309) and (y<351) then result:='沧海' else
 if (y>351) and (y<393) then result:='桑田' else result:='未知';
end
else
if Logo='网通宽带(22区)' then begin
 if (y>225) and (y<267) then result:='雾都(new!)' else
 if (y>267) and (y<309) then result:='紫金' else
 if (y>309) and (y<351) then result:='赤焰' else
 if (y>351) and (y<393) then result:='红日' else result:='未知';
end
else
if Logo='群雄逐鹿(23区)' then begin
 if (y>225) and (y<267) then result:='金戈' else
 if (y>267) and (y<309) then result:='铁马' else
 if (y>309) and (y<351) then result:='至尊' else
 if (y>351) and (y<393) then result:='无敌' else result:='未知';
end
else
if Logo='西部圣域III(24区)' then begin
 if (y>225) and (y<267) then result:='长征(遵义)' else
 if (y>267) and (y<309) then result:='东坡(眉山)' else
 if (y>309) and (y<351) then result:='倚天(天府)' else
 if (y>351) and (y<393) then result:='屠龙(天府)' else result:='未知';
end
else
if Logo='风云II(25区)' then begin
 if (y>225) and (y<267) then result:='越秀' else
 if (y>267) and (y<309) then result:='黄埔' else
 if (y>309) and (y<351) then result:='珠江' else
 if (y>351) and (y<393) then result:='海印' else result:='未知';
end
else
if Logo='仙女湖(26区)' then begin
 if (y>225) and (y<267) then result:='嵩阳' else
 if (y>267) and (y<309) then result:='玄妙' else
 if (y>309) and (y<351) then result:='流波' else
 if (y>351) and (y<393) then result:='月涛' else result:='未知';
end
else
if Logo='网通宽带II(27区)' then begin
 if (y>141) and (y<183) then result:='风月' else
 if (y>183) and (y<225) then result:='紫月' else
 if (y>225) and (y<267) then result:='大唐' else
 if (y>267) and (y<309) then result:='大秦' else
 if (y>309) and (y<351) then result:='龙吟' else
 if (y>351) and (y<393) then result:='聚义' else
 if (y>393) and (y<435) then result:='星海' else
 if (y>435) and (y<477) then result:='佳星' else result:='未知';
end
else
if Logo='中游传奇(28区)' then begin
 if (y>225) and (y<267) then result:='乾坤' else
 if (y>267) and (y<309) then result:='八卦' else
 if (y>309) and (y<351) then result:='奇门' else
 if (y>351) and (y<393) then result:='遁甲' else result:='未知';
end
else
if Logo='东海风暴(29区)' then begin
 if (y>225) and (y<267) then result:='御风' else
 if (y>267) and (y<309) then result:='惊云' else
 if (y>309) and (y<351) then result:='劈波' else
 if (y>351) and (y<393) then result:='斩浪' else result:='未知';
end
else
if Logo='安徽热线(30区)' then begin
 if (y>267) and (y<309) then result:='逍遥' else
 if (y>309) and (y<351) then result:='傲岳' else result:='未知';
end
else
if Logo='甲天下(31区)' then begin
 if (y>225) and (y<267) then result:='冷月' else
 if (y>267) and (y<309) then result:='无双' else
 if (y>309) and (y<351) then result:='灵凤' else
 if (y>351) and (y<393) then result:='云舞' else result:='未知';
end
else
if Logo='英雄天地(32区)' then begin
 if (y>225) and (y<267) then result:='黄山' else
 if (y>267) and (y<309) then result:='燕赵' else
 if (y>309) and (y<351) then result:='辽沈' else
 if (y>351) and (y<393) then result:='潇湘' else result:='未知';
end
else
if Logo='西部圣域IV(33区)' then begin
 if (y>141) and (y<183) then result:='华容' else
 if (y>183) and (y<225) then result:='官渡' else
 if (y>225) and (y<267) then result:='剑阁' else
 if (y>267) and (y<309) then result:='赤壁' else
 if (y>309) and (y<351) then result:='桃源' else
 if (y>351) and (y<393) then result:='白帝' else
 if (y>393) and (y<435) then result:='虎牢' else
 if (y>435) and (y<477) then result:='赤水' else result:='未知';
end
else
if Logo='五里河(34区)' then begin
 if (y>225) and (y<267) then result:='龙腾' else
 if (y>267) and (y<309) then result:='虎跃' else
 if (y>309) and (y<351) then result:='凤舞' else
 if (y>351) and (y<393) then result:='鹰翔' else result:='未知';
end
else
if Logo='江苏电信(35区)' then begin
 if (y>225) and (y<267) then result:='广陵' else
 if (y>267) and (y<309) then result:='汉邦' else
 if (y>309) and (y<351) then result:='龙蟠' else
 if (y>351) and (y<393) then result:='虎踞' else result:='未知';
end
else
if Logo='网通宽带III(36区)' then begin
 if (y>141) and (y<183) then result:='荒原' else
 if (y>183) and (y<225) then result:='苍穹' else
 if (y>225) and (y<267) then result:='地豁' else
 if (y>267) and (y<309) then result:='天漏' else
 if (y>309) and (y<351) then result:='中京' else
 if (y>351) and (y<393) then result:='王朝' else
 if (y>393) and (y<435) then result:='大漠' else
 if (y>435) and (y<477) then result:='天池' else result:='未知';
end
else
if Logo='古城热线(37区)' then begin
 if (y>225) and (y<267) then result:='周' else
 if (y>267) and (y<309) then result:='秦' else
 if (y>309) and (y<351) then result:='汉' else
 if (y>351) and (y<393) then result:='唐' else result:='未知';
end
else
if Logo='风云III(38区)' then begin
 if (y>225) and (y<267) then result:='黄鹤楼' else
 if (y>267) and (y<309) then result:='晴川阁' else
 if (y>309) and (y<351) then result:='荆州城' else
 if (y>351) and (y<393) then result:='武当山' else result:='未知';
end
else
if Logo='风云IV(39区)' then begin
 if (y>225) and (y<267) then result:='太白' else
 if (y>267) and (y<309) then result:='骊山' else
 if (y>309) and (y<351) then result:='雁塔' else
 if (y>351) and (y<393) then result:='莲湖' else result:='未知';
end
else
if Logo='仁者无敌(41区)' then begin
 if (y>225) and (y<267) then result:='如意' else
 if (y>267) and (y<309) then result:='井冈' else
 if (y>309) and (y<351) then result:='仙水' else
 if (y>351) and (y<393) then result:='星城' else result:='未知';
end
else
if Logo='风云V(42区)' then begin
 if (y>141) and (y<183) then result:='鼓岭(福州)' else
 if (y>183) and (y<225) then result:='鹭岛(福州)' else
 if (y>225) and (y<267) then result:='金湖(福州)' else
 if (y>267) and (y<309) then result:='武夷(福州)' else
 if (y>309) and (y<351) then result:='秀屿(福州)' else
 if (y>351) and (y<393) then result:='清源(福州)' else
 if (y>393) and (y<435) then result:='鹫峰(福州)' else
 if (y>435) and (y<477) then result:='丹霞(福州)' else result:='未知';
end
else
if Logo='教育网(43区)' then begin
 if (y>225) and (y<267) then result:='山海经(北京)' else
 if (y>267) and (y<309) then result:='东周传(北京)' else
 if (y>309) and (y<351) then result:='战国策(北京)' else
 if (y>351) and (y<393) then result:='镜花缘(北京)' else result:='未知';
end
else
if Logo='潇湘圣域(44区)' then begin
 if (y>225) and (y<267) then result:='湘江(湖南)' else
 if (y>267) and (y<309) then result:='洞庭(湖南)' else
 if (y>309) and (y<351) then result:='衡山(湖南)' else
 if (y>351) and (y<393) then result:='武陵(湖南)' else result:='未知';
end
else
if Logo='西部圣域V(45区)' then begin
 if (y>225) and (y<267) then result:='玄冰(成都)' else
 if (y>267) and (y<309) then result:='天罡(成都)' else
 if (y>309) and (y<351) then result:='黔灵(贵阳)' else
 if (y>351) and (y<393) then result:='花溪(贵阳)' else result:='未知';
end
else
if Logo='逐鹿中原(46区)' then begin
 if (y>141) and (y<183) then result:='英雄(郑州)' else
 if (y>183) and (y<225) then result:='天煞(郑州)' else
 if (y>225) and (y<267) then result:='卧龙(焦作)' else
 if (y>267) and (y<309) then result:='凤雏(焦作)' else
 if (y>309) and (y<351) then result:='纵横(上海)' else
 if (y>351) and (y<393) then result:='轩辕(三门峡)' else
 if (y>393) and (y<435) then result:='战神(上海)' else
 if (y>435) and (y<477) then result:='悬风(上海)' else result:='未知';
end
else
if Logo='西部圣域VI(47区)' then begin
 if (y>141) and (y<183) then result:='锦州(绵阳)' else
 if (y>183) and (y<225) then result:='佛都(乐山)' else
 if (y>225) and (y<267) then result:='竹海(宜宾)' else
 if (y>267) and (y<309) then result:='酒城(泸州)' else
 if (y>309) and (y<351) then result:='果城(南充)' else
 if (y>351) and (y<393) then result:='甜城(内江)' else
 if (y>393) and (y<435) then result:='雨城(雅安)' else
 if (y>435) and (y<477) then result:='阳光(资阳)' else result:='未知';
end
else
if Logo='网通宽带IV(48区)' then begin
 if (y>183) and (y<225) then result:='星海二(大连)' else
 if (y>225) and (y<267) then result:='千山一(鞍山)' else
 if (y>267) and (y<309) then result:='千山二(辽阳)' else
 if (y>309) and (y<351) then result:='盛京一(沈阳)' else
 if (y>351) and (y<393) then result:='盛京二(沈阳)' else
 if (y>393) and (y<435) then result:='淮扬(江苏)' else result:='未知';
end
else
if Logo='广电星空II(49区)' then begin
 if (y>246) and (y<288) then result:='凤凰(唐山)' else
 if (y>288) and (y<330) then result:='津沽(天津)' else
 if (y>330) and (y<372) then result:='津沽二(天津)' else result:='未知';
end
else
if Logo='天津宽带(50区)' then begin
 if (y>225) and (y<267) then result:='无名(天津)' else
 if (y>267) and (y<309) then result:='长空(天津)' else
 if (y>309) and (y<351) then result:='残剑(天津)' else
 if (y>351) and (y<393) then result:='飞雪(天津)' else result:='未知';
end
else
if Logo='吉林通信专区(51区)' then begin
 if (y>225) and (y<267) then result:='神舟(长春)' else
 if (y>267) and (y<309) then result:='雾淞(长春)' else
 if (y>309) and (y<351) then result:='九州(上海)' else
 if (y>351) and (y<393) then result:='天下(上海)' else result:='未知';
end
else
if Logo='浙江电信专区(52区)' then begin
 if (y>225) and (y<267) then result:='西湖(杭州)' else
 if (y>267) and (y<309) then result:='西塘(杭州)' else
 if (y>309) and (y<351) then result:='鉴湖(杭州)' else
 if (y>351) and (y<393) then result:='双龙(杭州)' else result:='未知';
end
else
if Logo='天使之城(53区)' then begin
 if (y>141) and (y<183) then result:='天涯(广西)' else
 if (y>183) and (y<225) then result:='芙蓉(长沙)' else
 if (y>225) and (y<267) then result:='炎陵(长沙)' else
 if (y>267) and (y<309) then result:='白沙(长沙)' else
 if (y>309) and (y<351) then result:='韶山(长沙)' else
 if (y>351) and (y<393) then result:='佛山(佛山)' else
 if (y>393) and (y<435) then result:='雅典(太原)' else
 if (y>435) and (y<477) then result:='龙城(太原)' else result:='未知';
end
else
if Logo='信联网络(54区)' then begin
 if (y>225) and (y<267) then result:='风情(义乌)' else
 if (y>267) and (y<309) then result:='雨人(义乌)' else
 if (y>309) and (y<351) then result:='雷光(义乌)' else
 if (y>351) and (y<393) then result:='电箭(义乌)' else result:='未知';
end
else
if Logo='齐鲁风云(55区)' then begin
 if (y>225) and (y<267) then result:='烽火(烟台)' else
 if (y>267) and (y<309) then result:='瀛州(烟台)' else
 if (y>309) and (y<351) then result:='琴岛(青岛)' else
 if (y>351) and (y<393) then result:='威海(威海)' else result:='未知';
end
else
if Logo='长城宽带(56区)' then begin
 if (y>183) and (y<225) then result:='开拓(上海)' else
 if (y>225) and (y<267) then result:='海星(阜新)' else
 if (y>267) and (y<309) then result:='碧水(上海)' else
 if (y>309) and (y<351) then result:='无限(上海)' else
 if (y>351) and (y<393) then result:='长城(北京 长宽)' else
 if (y>393) and (y<435) then result:='炎黄(上海 长宽)' else result:='未知';
end
else
if Logo='新疆电信(57区)' then begin
 if (y>246) and (y<288) then result:='丝路(新疆)' else
 if (y>288) and (y<330) then result:='长河(新疆)' else
 if (y>330) and (y<372) then result:='古道(新疆)' else result:='未知';
end
else result:='未知(区域)';
End;

end.