**************************************************
************** كل كلمه لون ***********************
**************************************************
; هالامر اللوان يختار لون بطريقة عشوائيه 

on *:input:*:{ 
  Set %arabic ابتثجحخدذرزسشصضطظفقعغكلمنهويةىلاؤءئأإ
  if ($left($1,1) isin %arabic) {
    if ($left($1,1) != /) { var %i $0 | while (%i) { var %r = %r $chr(3) $+ $gettok(02.03.04.07,$rand(1,4),46) $+ $ [ $+ [ %i ] ] | dec %i  } | say %r | halt } ]
  }
}

**************************************************
**************************************************

; هالامر يختار اللون بالترتيب حسب مانت حاط اللوان

on *:input:*:{ 
  Set %arabic ابتثجحخدذرزسشصضطظفقعغكلمنهويةىلاؤءئأإ
  if ($left($1,1) isin %arabic) {
    if (/* !iswm $1) { var %colours = 02 03 04 07 | var %c = 1 | var %g = $0 | while (%g) { var %s = %s $chr(3) $+ $gettok(%colours,%c,32) $+ $ [ $+ [ %g ] ] | if (%c == 4) { var %c = 1 } | else { inc %c } | dec %g } | say %s | halt }
  }
}