とりあえず変数の代入 setq と繰り返しの loop が分かれば
基本的なプログラミングはできるかと思う