Mais um blog inútil.

Boas tardes a todos,

Ontem à noite, pelas 4 ou 5 e tal da matina, provavelmente devido aos líquidos de Baco e afins, não consegui, por questões várias, colocar aqui a primeira versão da arvorezinha em AppleScript. Como poderá ver o leitor, trata-se de uma linguagem de programação altamente sofisticada e complexa, que não é para qualquer um...
Quem quiser faço um bundle para correr como aplicação :-)

(*
DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
Version 2, December 2004

Copyright (C) 2004 Sam Hocevar

Everyone is permitted to copy and distribute verbatim or modified
copies of this license document, and changing it is allowed as long
as the name is changed.

DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION

0. You just DO WHAT THE FUCK YOU WANT TO.

*)

set title to "\\m/ 4rV0R321NH4 4ppL3scR1p7 V1.0 H4rD3N3D \\m/"
set sloc to text returned of (display dialog "How many lines?
RFC is lines=5" with title title with icon 1 default answer "5" buttons {"Generate!"} default button 1)
set arv to ""
set j to sloc
set i to 1
try
repeat j times
repeat i times
set arv to arv & "*"
end repeat
set i to i + 1
set arv to arv & "
"
end repeat

display dialog arv with title title buttons {"Save the arvorezinha!"} default button 1
on error
display dialog "7H3R3 w42 4 3RR0r P4RS1N' 73h NUMb3R 0f l1N32. 7ry 4941n!" with title title buttons {"OK"} default button 1
end try

Finalmente, ao executarmos o script, de acordo com o RFC, obtemos o seguinte resultado:

Salvem a arvorezinha!...

source