Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.07.2009, 00:38   #1
HellMercenariess
Форумчанин
 
Аватар для HellMercenariess
 
Регистрация: 27.07.2009
Сообщений: 547
По умолчанию Скрипт в Читабельное для человека

Вот делаю запрос на сервер : http://blacksun.com.ua/serverstatus.php

Получаю назад:
#SERVERS STATUS INFORMATION #AUTHSERVER; IS_ONLINE #SERVER_NAME; IS_ONLINE; STARTED_UNIXTIMESTAMP; CUR_ONLINE; MAX_ONLINE; MAX_ONLINE_UNIXTIMESTAMP AUTHSERVER;1 Phobos;1;1248685887;306;1013;124256 9605 Deimos;1;1248685903;32;1614;1226252 865 PTS;0;0;0;3295;1194717641 PTS2;0;0;0;0;1166288439 PTS3;0;0;0;9;1207159563
---------------------------
Оригинал
"Виновник этого парада,он не дурак, ушел как надо!" Похороны панка.

Последний раз редактировалось HellMercenariess; 29.07.2009 в 18:17.
HellMercenariess вне форума Ответить с цитированием
Старый 29.07.2009, 07:57   #2
BaronTreep
Форумчанин
 
Регистрация: 29.05.2009
Сообщений: 320
По умолчанию

Это не скрипт, а результат работы скрипта. Для начала можно на каждом ; сделать переводы строк:
Код:
for i := 0 to Length(Str1) do begin
   str2 := str2 + str1[i];
   if str[i]=';' then str2 := str2 + #13 + #10;
А дальше нужно знать что значат все эти цифры, может там таблица предполагается.

P?S? Вытащить сам скрипт php нельзя по запросу.
BaronTreep вне форума Ответить с цитированием
Старый 29.07.2009, 18:36   #3
HellMercenariess
Форумчанин
 
Аватар для HellMercenariess
 
Регистрация: 27.07.2009
Сообщений: 547
По умолчанию

Цитата:
#SERVERS STATUS INFORMATION #AUTHSERVER; IS_ONLINE #SERVER_NAME; IS_ONLINE; STARTED_UNIXTIMESTAMP; CUR_ONLINE; MAX_ONLINE; MAX_ONLINE_UNIXTIMESTAMP AUTHSERVER;1 Phobos;1;1248685887;306;1013;124256 9605 Deimos;1;1248685903;32;1614;1226252 865 PTS;0;0;0;3295;1194717641 PTS2;0;0;0;0;1166288439 PTS3;0;0;0;9;1207159563
306 и 32 - это и есть основные искомые (кол. игроков), их и нужно изьять,
если 1я цифра после имени сервера "1"(0 - "Сервер выключен"),
как то оно все навалено кучей.......
"Виновник этого парада,он не дурак, ушел как надо!" Похороны панка.
HellMercenariess вне форума Ответить с цитированием
Старый 29.07.2009, 23:05   #4
JTG
я получил эту роль
Старожил
 
Аватар для JTG
 
Регистрация: 25.05.2007
Сообщений: 3,694
По умолчанию

в юникс-кодировке это выглядит так:
Цитата:
#SERVERS STATUS INFORMATION
#AUTHSERVER; IS_ONLINE
#SERVER_NAME; IS_ONLINE; STARTED_UNIXTIMESTAMP; CUR_ONLINE; MAX_ONLINE; MAX_ONLINE_UNIXTIMESTAMP

AUTHSERVER;1

Phobos;1;1248854878;300;1013;124256 9605
Deimos;1;1248685903;42;1614;1226252 865
PTS;0;0;0;3295;1194717641
PTS2;0;0;0;0;1166288439
PTS3;0;0;0;9;1207159563
1242569605 и 1226252865 без пробелов, форум порезал

Phobos;1;1248854878;300;1013;124256 9605
переводится как
имя сервера ; работает? ; дата запуска (юникс-формат) ; онлайн ; макс.онлайн ; дата макс.онлайн (юникс-формат)

можно вручную парсить, можно регулярными выражениями (см. аттач)
Вложения
Тип файла: rar src.rar (58.0 Кб, 15 просмотров)
Тип файла: rar bin.rar (215.4 Кб, 16 просмотров)
пыщь

Последний раз редактировалось JTG; 29.07.2009 в 23:20.
JTG вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Один маленький шаг для человека, но гигантский скачок для всего человечества unicode Свободное общение 676 12.02.2018 07:22
vba скрипт для ворда AZaharov Microsoft Office Word 21 25.05.2015 22:23
Скрипт для отправки писем Droid JavaScript, Ajax 3 16.07.2009 08:20
Скрипт для голосования Gopius PHP 11 11.01.2009 15:57
Скрипт для показа баннеров phonograph PHP 1 18.08.2008 17:54