DimoN
Tech administrator | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Cтандартные смайлы
topic.cgi
Код:
if (($emoticons eq 'on') && ($showemoticons eq 'yes')) {
$post =~ s/\:\)/<img src=\"$imagesurl\/emoticons\/smile.gif\" border=\"0\">/g;
$post =~ s/\;\)/<img src=\"$imagesurl\/emoticons\/wink.gif\" border=\"0\">/g;
$post =~ s/\:\(/<img src=\"$imagesurl\/emoticons\/sad.gif\" border=\"0\">/g;
$post =~ s/\:o/<img src=\"$imagesurl\/emoticons\/shocked.gif\" border=\"0\">/g;
}
|
PS ну они еще и в других местах понапиханы
post.cgi, messenger.cgi
Код:
$post =~ s/\:\)/<img src=\"$imagesurl\/emoticons\/smile.gif\" border=\"0\">/g;
$post =~ s/\;\)/<img src=\"$imagesurl\/emoticons\/wink.gif\" border=\"0\">/g;
$post =~ s/\:\(/<img src=\"$imagesurl\/emoticons\/sad.gif\" border=\"0\">/g;
$post =~ s/\:o/<img src=\"$imagesurl\/emoticons\/shocked.gif\" border=\"0\">/g;
|
Все остальные
ikon.lib
Код:
###########################
# Emoticon Swopper
sub doemoticons {
my $post = shift;
$dirtoopen = "$imagesdir" . "emoticons";
opendir (DIR, "$dirtoopen") or die "$ibtxt{'1204'} $dirtoopen )";
@dirdata = readdir(DIR);
closedir (DIR);
@emoticondata = grep(/gif/,@dirdata);
@emoticondata = sort @emoticondata;
foreach $picture (@emoticondata) {
$smileyname = $picture;
$smileyname =~ s/\.gif//g;
$post =~ s/\:$smileyname\:/\<img src=\"$imagesurl\/emoticons\/$picture\" border=\"0\">/g;
}
return $post;
}
|
Для изменения кода достаточно переименовать файл.
Кто хочет\может лучше поставить хак ускоряющий работу форума.
Сейчас процедура смайлов работает так
- проганяет всю директорию со смайлами и запоминает
- прогоняет пост
- все с начала для каждого поста
Если поставить хак:
все смайлы жестко прописаны, поэтому ненадо каждый раз гонять циклы. достаточно сравнить коды в посте. Это намного быстрее.
Минус: для установки смайла и изменения кода надо вручную прописывать его в sub doemoticons ikon.lib
Добавлено
Хак тут http://forum.ru-board.com/topic.cgi?forum=21&topic=0876#1
или в архиве
----------
Мы Баним с улыбкой :) ™ |
|
urplegrin: 
