ファイルの有無を調べなければインストール
Sik pop @popのインストール
echo Sik pop @こうすれば同時にログも取れて安心(あればtrueなければfalse)
Rim require "pop" @ライブラリの取り込み
Rim fdraw As require "pop->file->draw"
Rimはファイル自身。requireは文字列の名前空間を探す。asは別名を作成
@代入にはset簡単でしょ
n set loop t of count 10 to if t->mod 2 = 1:{1,t->tostr}:{2,t->tostr}
call T t->add1 n 0
@メソッド定義
Trait T
bind f h m n = h->each->(m)->append n
Trait end
@メソッド定義
Method T extends Trait
@めんどくさけりゃusing ? repeat $だぜ!
using bind repeat $
$add1 h m = f h m 1 @h->each->(0)->inc とも書ける
$inc h m = h->each->(m)->inc
$dec h m = h->each->(m)->dec
Proc Construct me-lily ,grp set {}
Lily grp set grp
img set{fdraw'{}'->Format C:\Data\Mg.png ->Image 1}
ndir set nodir
chdir img->(0)->Getdir
Lily geekimg set img
Proc End-> nil
Method End