/window -ep @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]re
/grid @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]re 5 1
/grid @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]re 7 8

alias grid {
  if (@* !iswm $1) { return }
  if ($2 !isnum) { return }
  var %grd-renk = $3
  if ($3 !isnum) { var %grd-renk = 1 }
  var %grd-wh = $2
  var %x = $window($1).bw
  var %y = $window($1).bh
  var %ilk-x = 1
  var  %m = 1, %deg-y = 1
  while (%m <= %x) {  
    drawline  $1 %grd-renk 1 %ilk-x %deg-y %x %deg-y
    inc %deg-y %grd-wh 
    inc %m
  }
  var %m = 1, %deg-x = 1
  while (%m <= %y) {
    drawline $1 %grd-renk 1 %deg-x 1 %deg-x %x
    inc %m
    inc %deg-x %grd-wh 
  }
}