<% '################################################################################# '## Snitz Forums 2000 v3.4.05 '################################################################################# '## Copyright (C) 2000-05 Michael Anderson, Pierre Gorissen, '## Huw Reddick and Richard Kinser '## '## This program is free software; you can redistribute it and/or '## modify it under the terms of the GNU General Public License '## as published by the Free Software Foundation; either version 2 '## of the License, or (at your option) any later version. '## '## All copyright notices regarding Snitz Forums 2000 '## must remain intact in the scripts and in the outputted HTML '## The "powered by" text/logo with a link back to '## http://forum.snitz.com in the footer of the pages MUST '## remain visible when the pages are viewed on the internet or intranet. '## '## This program is distributed in the hope that it will be useful, '## but WITHOUT ANY WARRANTY; without even the implied warranty of '## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the '## GNU General Public License for more details. '## '## You should have received a copy of the GNU General Public License '## along with this program; if not, write to the Free Software '## Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. '## '## Support can be obtained from our support forums at: '## http://forum.snitz.com '## '## Correspondence and Marketing Questions can be sent to: '## manderson@snitz.com '## '################################################################################# %> <% strSmileCode = array("[:)]","[:D]","[8D]","[:I]","[:p]","[}:)]","[;)]","[:o)]","[B)]","[8]","[:(]","[8)]","[:0]","[:(!]","[xx(]","[|)]","[:X]","[^]","[V]","[?]") strSmileDesc = array("חיוך","חיוך גדול","מגניב","מסמיק","לשון","רשע","קריצה","ליצן","עין שחורה","כדור שמונה","זעפן","ביישן","בהלם","כועס","מת","ישנוני","נשיקות","מאשר","לא מאשר","שאלה") strSmileName = array(strIconSmile,strIconSmileBig,strIconSmileCool,strIconSmileBlush,strIconSmileTongue,strIconSmileEvil,strIconSmileWink,strIconSmileClown,strIconSmileBlackeye,strIconSmile8ball,strIconSmileSad,strIconSmileShy,strIconSmileShock,strIconSmileAngry,strIconSmileDead,strIconSmileSleepy,strIconSmileKisses,strIconSmileApprove,strIconSmileDisapprove,strIconSmileQuestion) Response.Write " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ "
" & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ "
סמיילים:
" & vbNewLine & _ "

" & vbNewLine & _ " ודאי ראית אנשים אחרים משתמשים בסמיילים וריגושונים (אמוטיקונים) אחרים בהודעות דוא""ל " & vbNewLine & _ " או הודעות אחרות. ריגושון הוא רצף סימנים מוקלד המביע איזשהו רגש, למשל חיוך " & vbNewLine & _ " " & getCurrentIcon(strIconSmile,"","hspace=""10"" align=""absmiddle""") & " או הזעפת פנים " & vbNewLine & _ " " & getCurrentIcon(strIconSmileSad,"","hspace=""10"" align=""absmiddle""") & ". פורום זה" & vbNewLine & _ " מתרגם באופן אוטומטי רצפי סימנים מסוימים לתמונות כאשר הרצף נמצא בין סוגריים מרובעים []. " & vbNewLine & _ " להלן מובאים הריגושונים שנתמכים ע""י " & strForumTitle & ":
" & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ "
" & vbNewLine & _ " " & vbNewLine for sm = 0 to 9 Response.Write " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine next Response.Write "
" & getCurrentIcon(strSmileName(sm),"","hspace=""10"" align=""absmiddle""") & "" & strSmileDesc(sm) & "" & strSmileCode(sm) & "
" & vbNewLine & _ "
" & vbNewLine & _ " " & vbNewLine for sm = 10 to 19 Response.Write " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine & _ " " & vbNewLine next Response.Write "
" & getCurrentIcon(strSmileName(sm),"","hspace=""10"" align=""absmiddle""") & "" & strSmileDesc(sm) & "" & strSmileCode(sm) & "
" & vbNewLine & _ "

" & vbNewLine & _ "
" & vbNewLine & _ "
" & vbNewLine WriteFooterShort Response.End %>