[פרסום] פרצופים למירק

[Panorma]

סתם משהו קטן !! מרוב שיעמום תהנו
ON *:INPUT:*: {
if ($1 == :D) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ D | halt }
if ($1 == :o) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ o | halt }
if ($1 == :S) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ S | halt }
if ($1 == :P) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ P | halt }
if ($1 == :C) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ C | halt }

[Nox]

סקריפט לא שימושי, אה ושכחת סוגר בסוף.
אה ולפי מה שאני רואה זה פועל רק אם המילה הראשונה היא פרצוף.
אם כבר תעשה שאם יש במשפט כולשהו שאתה כותב את אחד מהפרצופים הללו שזה יעשה החלפה לפרצוף עם צבע.

[ZxoR]

1. יש לפרסם את האשכול לפי "תבנית פרסום הודעות" בנעוץ.
2. חסר סוגר בסוף
3. לא מומלץ להשתמש בסקריפטים של On INPUT, הם יוצרים סיבוכי מירק.
4. זה לא כלכך סקריפט, מצטער.

[Ocean]

ארוך מידיי יכולתה לעשות את כל זה בשורה אחת :/

[ZxoR]

דרך אגב, תשתמש ב elseif

בכל מקרה, הסקריפט הזה לא יכול להתפרסם, לפני שיועבר למחסן האשכול ישאר פה למשך זמן מסויים ע"מ שתקבל תגובות ותוכל להגיב בעצמך.

[shay99]

הנה הקוד שעושה שגם אם זה באמצע הודעה :

קוד: בחר הכל

ON *:INPUT:*: {
  if (:D isin $1-) { msg $active $replace($1-,:D, $+ $r(1,15) $+ : $+ $r(1,15) $+ D) | halt }
  elseif (:S isin $1-) { msg $active $replace($1-,:S, $+ $r(1,15) $+ : $+ $r(1,15) $+ S) | halt }
  elseif (:O isin $1-) { msg $active $replace($1-,:O, $+ $r(1,15) $+ : $+ $r(1,15) $+ O) | halt }
  elseif (:P isin $1-) { msg $active $replace($1-,:P, $+ $r(1,15) $+ : $+ $r(1,15) $+ P) | halt }
  elseif (: $+ $CHR(41) isin $1-) { msg $active $replace($1-,: $+ $CHR(41), $+ $r(1,15) $+ : $+ $r(1,15) $+ $CHR(41)) | halt }
}

תהנו D:

[Panorma]

חח בסדר גמור!! לא שימושי אני יודע זה סתם בשביל הכיף

[vendetta]

Panorma כתב:

סתם משהו קטן !! מרוב שיעמום תהנו
ON *:INPUT:*: {
if ($1 == ) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ D | halt }
if ($1 == ) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ o | halt }
if ($1 == :S) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ S | halt }
if ($1 == ) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ P | halt }
if ($1 == :C) { msg $Active  $+ $r(1,15) $+ : $+ $r(1,15) $+ C | halt }

קוד: בחר הכל

alias msg2 {
  if (*:* iswm $2-) {
    var %x 1
    while ($gettok($2-,%x,32)) {
      var %v1 $v1
      if ($len(%v1) == 2) && (*:* iswm %v1) set %sd %sd $+($chr(3),$r(1,15),:,$chr(3),$r(1,15),$remove(%v1,:),$chr(3))
      else set %sd %sd %v1
      inc %x
    }
    msg $1 %sd
    unset %sd
  }
  else msg $1-
}

יותר מומלץ,