[תוסף] Slide dialog

[intersys]

שם הקוד: תוסף לדיאלוג (סלייד).
יוצר: intersys
גירסא: 1.0
תיאור: תוסף לדיאלוג המאפשר ליוצר הדיאלוג לעשות שהדיאלוג שלו ייפתח, יגדל, יקטן לאורך ולרוחב והכל בסלייד - לא במכה .. וכך לחסוך שטחים מתים בדיאלוג, וליצור דיאלוג יפה יותר ומסודר יותר שלא חייב להיות לכל הטאבים או לכל דבר שתרצו באותו גודל, אלא בגודל משתנה לפי רצונכם.
שימוש:

קוד: בחר הכל

/sdialog <dname> <height> <width>

הקוד:

קוד: בחר הכל

; Made by intersys ;
; /sdialog <dname> <height> <width> ;
 
alias sdialog {
  if !$dialog($1) { dialog -m $1 $1 | dialog -s $1 -1 -1 0 0  }
var %x = $2,%y = $3,%dname = $1
  if %x && %y && %dname {
    var %a = 1
    while %a <= %y {
      dialog -s %dname -1 -1 %a 1
      var %c = %a
      inc %a
    }
    var %s = 1
    while %s <= %x {
      dialog -s %dname -1 -1 %c %s
      inc %s
    }
  }
}