| 4X_Pro
Руководитель Проекта
Настоящий Компьютерщик
Откуда: Москва
Всего сообщений: 2994
Рейтинг пользователя: 79
Дата регистрации на форуме:
29 сен. 2001
|
Профиль | Сообщить модератору | ИгнорироватьNEW! Сообщение отправлено: 12 декабря 2003 20:56
Короче, надо в ikon.lib найти процедуру whosonline, в ней за формирование списка присутствующих отвечает следующий код: <br> foreach $line (@onlinedata) { <br> chomp $line; <br> ($savedusername, $savedtime, $savedwhere, $savedipadr) = split(/\|/, $line); <br> $lookfor = substr($savedusername, 0, 5);<br> if ($lookfor eq "Guest") { <br> $guests++; }<br> else { <br> $members++; <br> $cleanmember = $savedusername; <br> $cleanmember =~ s/ /\_/g; <br> $savedusername =~ s/\_/ /g;<br> $savedusername = substr($savedusername,0,20) if length $savedusername > 19; <br> $memberoutput .= qq~» <a href="$profileprog?action=show&member=$cleanmember">$savedusername</a>~; <br> } <br> } # end foreach <br>
Вот здесь после savedusername = subst надо добавить : <br>if ($membercode eq "mod") { $memberoutput .= qq~здесь выделяешь имя нужным цветом, вставляешь значки и прочее~;<br>$moderoutput = qq~а это для того, чтобы вывести имена модераторов отдельно~; }<br>elsif ($membercode eq "ad") {<br> $memberoutpur .= qq~.....~;<br> $adminoutput = qq~....~;<br>}<br>else{ <br> $memberoutput .= qq~» <a href="$profileprog?action=show&member=$cleanmember">$savedusername</a>~; <br>
А потом где-нибудь в ikonboard.cgi предусмотреть вывод переменных $memberoutput и $adminoutput.
---
Каждый человек всегда может найти, чем он может быть полезен окружающим. Проблема только в одном: слишком многие не хотят это искать.
| 
