作ってみたプログラム

プログラムは、右クリックメニューのリンク先のファイルを保存で保存してください


ふたりが出会うと子供ができる(性別関係無し)プログラム(seishoku.fas)(Lisp)
ソース(seishoku.lisp)
使い方:
(load "seishoku.fas")で関数を読み込むとシミュレーションが始まります
Enterキーを押すと、1ターン進みます
数字を入力してEnterキーを押すと、その数だけターンが進みます
(100とかやると時間がかかるので注意)
kは子供(18歳未満)、 fは若い女性(50歳未満)、 mは若い男性(50歳未満)、 Fは50歳以上の女性、 Mは50歳以上の男性です。
fとf、fとm、mとf、mとmが隣同士になると、片方が妊娠し(女性が妊娠するとは限りません)
妊娠した次のターンに出産します(妊娠している人の周りに空いたスペースが無ければ、出産できません)
この世界の住人の寿命は100です。
生まれてから100ターンすると死にます(画面上からいなくなります)
最初にいる人たちの性別・年齢・場所は、ランダムに決められています。


ふたりが出会うと子供ができる(性別関係有り)プログラム(seishoku2.fas)(Lisp)
ソース(seishoku2.lisp)
使い方:
(load "seishoku2.fas")で関数を読み込むとシミュレーションが始まります。
Enterキーを押すと、1ターン進みます
数字を入力してEnterキーを押すと、その数だけターンが進みます
(100とかやると時間がかかるので注意)
kは子供(18歳未満)、 fは若い女性(50歳未満)、 mは若い男性(50歳未満)、 Fは50歳以上の女性、 Mは50歳以上の男性です。
fとm隣同士になると、fが妊娠し
妊娠した次のターンに出産します(妊娠している人の周りに空いたスペースが無ければ、出産できません)
この世界の住人の寿命は100です。
生まれてから100ターンすると死にます(画面上からいなくなります)
最初にいる人たちの性別・年齢・場所は、ランダムに決められています。


ふたりが出会うと子供ができる(性別関係有り、天敵付き)プログラム(seishoku3.fas)(Lisp)
ソース(seishoku3.lisp)
使い方:
& (load "seishoku3.fas")で関数を読み込むとシミュレーションが始まります。
Enterキーを押すと、1ターン進みます
数字を入力してEnterキーを押すと、その数だけターンが進みます
(100とかやると時間がかかるので注意)
kは子供(18歳未満)、 fは若い女性(50歳未満)、 mは若い男性(50歳未満)、 Fは50歳以上の女性、 Mは50歳以上の男性 eは天敵です。
fとm隣同士になると、fが妊娠し
妊娠した次のターンに出産します(妊娠している人の周りに空いたスペースが無ければ、出産できません)
この世界の住人の寿命は100です。
生まれてから100ターンすると死にます(画面上からいなくなります)
天敵は人間を食べて生きます。
人間を食べるごとに天敵の寿命は50延びます。
寿命が200を超えている天敵は、自分の寿命を100削って無性生殖することがあります。
最初にいる人たちの性別・年齢・場所は、ランダムに決められています。
最初にいる天敵たちの場所はランダムに決められています。


素材を集めてなにか作って売ったりするゲーム(game1.zip)
使い方:
a.exeをダブルクリックするとゲームが起動します
操作方法は、readme.txtを参照してください



スネークゲーム的な(snake.lisp)
使い方:
snake.lispを読み込み、(start)で開始します
あなたはヘビ(@**みたいなの)になります。
エサ(a)をたくさん食べてください。
他のヘビ(o++みたいなの)もエサを狙ってます
他のヘビとぶつかったらゲームオーバーです。
uで上に、dで下に、rで右にlで左に行きます。
uuurrrと打つと、上に3マス・右に3マス進み6ターン進みます。


Lispの動かし方については、こちらを参考にしてください