|
|
|
alias degrade {
var %a $2,%c $5,%d $6,%i
if ($1 = -h) var %z %c,%u %d + $8,%e $7
else var %h $7,%e $8,%z %d,%u %c + %h
tokenize 44 $rgb($3) $+ , $+ $rgb($4)
var %j $1 - $4,%k $2 - $5,%l $3 - $6,%r $1,%g $2,%b $3,%j %j / %e,%k %k / %e,%l %l / %e,%y %e + %z
while %z < %y {
%i = drawline -r %a $rgb(%r,%g,%b) 1
if (%h) %i %c %z %u %z
else %i %z %d %z %u
dec %r %j
dec %g %k
dec %b %l
inc %z
}
}
| |
|
Retour à la liste des snippets
Cette annonce est-elle crédible? |
|
|
|