■掲示板に戻る■ 検索 全部 1- 最新50
【CS】ロジック集【CS】なにげにパート3
1 名前:kazu777 ★ 2003/03/04 15:11 ID:NPUxuE5m
http://amsmsato.mine.nu/cgi-bin/cs3/cs.cgi
TEAMBAKKAのAIロジック集です。
sage進行でお願いします。

2 名前:kazu777 ★ 2003/03/04 15:12 ID:NPUxuE5m
徘徊埋め立てロジック
相手陣地を探して埋め立てしていきますw

basecheck:B
enemycheck:X:Y
if:B:==:TRUE:goto:*BASE
lifecheck:C:HEAD
if:C:<:100:goto:*RETURN
lifecheck:C:LARM
if:C:<:100:goto:*RETURN
lifecheck:C:RARM
if:C:<:100:goto:*RETURN
if:X:==:0:goto:*ATTACK_V
if:Y:==:0:ifne:X:99:goto:*ATTACK_H
xycheck:X:Y
goto:*CHASE

*ATTACK_V
if:MYEN:<:200:end
if:Y:==:-2:attack:RARM:UP
if:Y:==:-1:attack:LARM:UP
if:Y:==:1:attack:LARM:DOWN
if:Y:==:2:attack:RARM:DOWN
print:それいけ〜
goto:*CHASE

*ATTACK_H
if:MYEN:<:200:end
if:X:==:-2:attack:RARM:LEFT
if:X:==:-1:attack:LARM:LEFT
if:X:==:1:attack:LARM:RIGHT
if:X:==:2:attack:RARM:RIGHT
print:それいけ〜
goto:*CHASE

*RETURN
basexycheck:X:Y
print:帰ろ。
if:X:==:0:if:Y:==:0:return
if:Y:<:0:move:UP
if:Y:>:0:move:DOWN
if:X:<:0:move:LEFT
if:X:>:0:move:RIGHT
end

*CHASE
rand:B:8
if:B:<:5:goto:*YJIKU
if:B:<:6:goto:*XJIKU
if:B:<:7:goto:*YJIKUYO
if:B:<:8:goto:*XJIKUYO

*YJIKU
if:MYEN:<:200:end
sonor:A:UP
if:A:==:0:goto:*XJIKU
if:Y:>:0:print:上いこ。
if:Y:>:0:move:UP
end

*XJIKU
if:MYEN:<:200:end
sonor:A:RIGHT
if:A:==:0:goto:*YJIKUYO
if:X:<:19:print:右いこ。
if:X:<:19:move:RIGHT
end

*YJIKUYO
if:MYEN:<:200:end
sonor:A:DOWN
if:A:==:0:goto:*XJIKUYO
if:Y:<:19:print:下いこ。
if:Y:<:19:move:DOWN
end

*XJIKUYO
if:MYEN:<:200:end
sonor:A:LEFT
if:A:==:0:goto:*NAIYO
if:X:>:0:print:左いこ。
if:X:>:0:move:LEFT
end

*NAIYO
rand:B:4
if:B:==:0:goto:*YJIKUDA
if:B:==:1:goto:*XJIKUDA
if:B:==:2:goto:*YJIKUDAYO
if:B:==:3:goto:*XJIKUDAYO
end

*YJIKUDA
if:MYEN:<:200:end
if:Y:>:0:move:UP
end

*XJIKUDA
if:MYEN:<:200:end
if:X:<:19:move:RIGHT
end

*YJIKUDAYO
if:MYEN:<:200:end
if:Y:<:19:move:DOWN
end

*XJIKUDAYO
if:MYEN:<:200:end
if:X:>:0:move:LEFT
end

*BASE
lifecheck:A:HEAD
ifdown:A:HEADMAX:end
lifecheck:A:LARM
ifdown:A:ARMMAX:end
lifecheck:A:RARM
ifdown:A:ARMMAX:end
print:出発しよ。
out


3 名前:kazu777 ★ 2003/03/04 15:05 ID:NPUxuE5m
迎撃ロジック
敵が基地に近づいたら出撃して追いかけ攻撃します。
遠くへ行ったときに基地へ戻すのにも便利w

basecheck:B
if:B:==:TRUE:goto:*BASE
enemycheck:X:Y
if:X:==:99:goto:*RETURN
lifecheck:C:HEAD
if:C:<:100:goto:*RETURN
lifecheck:C:LARM
if:C:<:100:goto:*RETURN
lifecheck:C:RARM
if:C:<:100:goto:*RETURN
if:X:==:0:goto:*ATTACK_V
if:Y:==:0:goto:*ATTACK_H
basexycheck:X:Y
abs:A:X
abs:B:Y
if:A:>:2:goto:*RETURN
if:B:>:2:goto:*RETURN
enemycheck:X:Y
goto:*CHASE

*ATTACK_V
if:MYEN:<:200:end
if:Y:==:-2:attack:RARM:UP
if:Y:==:-1:attack:LARM:UP
if:Y:==:1:attack:LARM:DOWN
if:Y:==:2:attack:RARM:DOWN
print:それいけ〜
goto:*CHASE

*ATTACK_H
if:MYEN:<:200:end
if:X:==:-2:attack:RARM:LEFT
if:X:==:-1:attack:LARM:LEFT
if:X:==:1:attack:LARM:RIGHT
if:X:==:2:attack:RARM:RIGHT
print:それいけ〜
goto:*CHASE

*RETURN
basexycheck:X:Y
print:帰ろ。
if:X:==:0:if:Y:==:0:return
*CHASE
if:Y:<:0:move:UP
if:Y:>:0:move:DOWN
if:X:<:0:move:LEFT
if:X:>:0:move:RIGHT
end

*BASE
enemycheck:X:Y
if:X:==:99:end
lifecheck:A:HEAD
ifdown:A:HEADMAX:end
lifecheck:A:LARM
ifdown:A:ARMMAX:end
lifecheck:A:RARM
ifdown:A:ARMMAX:end
print:守るぞ〜
out


4 名前:kazu777 ★ 2003/03/04 15:06 ID:NPUxuE5m
専守防衛ロジック
基地から動かず基地を攻撃してきた者を攻撃します。

basecheck:A
if:A:==:1:goto:*base
enemycheck:X:Y
if:X:==:99:return
lifecheck:C:HEAD
if:C:==:0:return
lifecheck:C:LARM
if:C:==:0:return
lifecheck:C:RARM
if:C:==:0:return
if:X:==:0:goto:*yattack
if:Y:==:0:goto:*xattack

*yattack
if:Y:==:-2:attack:RIGHT:UP
if:Y:==:2:attack:RIGHT:DOWN
if:Y:==:-1:attack:LEFT:UP
if:Y:==:1:attack:LEFT:DOWN

*xattack
if:X:==:-2:attack:RIGHT:LEFT
if:X:==:2:attack:RIGHT:RIGHT
if:X:==:-1:attack:LEFT:LEFT
if:X:==:1:attack:LEFT:RIGHT

*base
enemycheck:X:Y
if:X:==:99:end
lifecheck:A:RARM
if:A:==:ARMMAX:out


5 名前:名無しさん 2003/03/04 15:06 ID:NPUxuE5m
名前:Flost ◆RPdDaVH. 2003/03/04 15:00 ID:ZIL.bCqt
1ターンに100行実行されます
ラベルは数に含まれません
endすると100行未満でもターン終了となるみたいです

3 名前:kazu777 ★ 2003/03/04 19:38 ID:NPUxuE5m
徘徊ロジックVER1.10

basecheck:B
enemycheck:X:Y
if:B:==:TRUE:goto:*BASE
lifecheck:C:HEAD
if:C:<:100:goto:*RETURN
lifecheck:C:LARM
if:C:<:100:goto:*RETURN
lifecheck:C:RARM
if:C:<:100:goto:*RETURN
if:X:==:0:goto:*ATTACK_V
if:Y:==:0:ifne:X:99:goto:*ATTACK_H
xycheck:X:Y
goto:*CHASE

*ATTACK_V
if:MYEN:<:200:end
if:Y:==:-2:attack:RARM:UP
if:Y:==:-1:attack:LARM:UP
if:Y:==:1:attack:LARM:DOWN
if:Y:==:2:attack:RARM:DOWN
print:それいけ〜
goto:*CHASE

*ATTACK_H
if:MYEN:<:200:end
if:X:==:-2:attack:RARM:LEFT
if:X:==:-1:attack:LARM:LEFT
if:X:==:1:attack:LARM:RIGHT
if:X:==:2:attack:RARM:RIGHT
print:それいけ〜
goto:*CHASE

*RETURN
basexycheck:X:Y
print:帰ろ。
if:X:==:0:if:Y:==:0:return
if:Y:<:0:move:UP
if:Y:>:0:move:DOWN
if:X:<:0:move:LEFT
if:X:>:0:move:RIGHT
end

*CHASE
rand:B:8
if:B:<:5:goto:*YJIKU
if:B:<:6:goto:*XJIKU
if:B:<:7:goto:*YJIKUYO
if:B:<:8:goto:*XJIKUYO

*YJIKU
if:MYEN:<:200:end
sonor:A:UP
if:A:==:0:goto:*XJIKU
if:Y:==:0:goto:*XJIKU
if:Y:>:0:print:上いこ。
if:Y:>:0:move:UP

*XJIKU
if:MYEN:<:200:end
sonor:A:RIGHT
if:A:==:0:goto:*YJIKUYO
if:X:==:19:goto:*YJIKUYO
if:X:<:19:print:右いこ。
if:X:<:19:move:RIGHT

*YJIKUYO
if:MYEN:<:200:end
sonor:A:DOWN
if:A:==:0:goto:*XJIKUYO
if:Y:==:19:goto:*XJIKUYO
if:Y:<:19:print:下いこ。
if:Y:<:19:move:DOWN

*XJIKUYO
if:MYEN:<:200:end
sonor:A:LEFT
if:A:==:0:goto:*NAIYO
if:X:==:0:goto:*NAIYO
if:X:>:0:print:左いこ。
if:X:>:0:move:LEFT

*NAIYO
rand:B:4
if:B:==:0:goto:*YJIKUDA
if:B:==:1:goto:*XJIKUDA
if:B:==:2:goto:*YJIKUDAYO
if:B:==:3:goto:*XJIKUDAYO

*YJIKUDA
if:MYEN:<:200:end
if:Y:>:0:move:UP

*XJIKUDA
if:MYEN:<:200:end
if:X:<:19:move:RIGHT

*YJIKUDAYO
if:MYEN:<:200:end
if:Y:<:19:move:DOWN

*XJIKUDAYO
if:MYEN:<:200:end
if:X:>:0:move:LEFT

*BASE
lifecheck:A:HEAD
ifdown:A:HEADMAX:end
lifecheck:A:LARM
ifdown:A:ARMMAX:end
lifecheck:A:RARM
ifdown:A:ARMMAX:end
print:出発しよ。
out

4 名前:kazu777 ★ 2003/03/04 20:14 ID:NPUxuE5m
徘徊ロジック、バージョンアップ目前(ぇ

5 名前: 2003/03/05 02:56 ID:PLuUfNVp
basecheck:B
if:B:==:TRUE:goto:*BASE
enemycheck:X:Y
if:X:==:99:goto:*RETURN
lifecheck:C:HEAD
if:C:<:100:goto:*RETURN
lifecheck:C:RARM
if:C:<:100:goto:*RETURN
if:X:==:0:goto:*ATTACK_V
if:Y:==:0:goto:*ATTACK_H
basexycheck:X:Y
abs:A:X
abs:B:Y
if:A:>:2:goto:*RETURN
if:B:>:2:goto:*RETURN
enemycheck:X:Y
goto:*CHASE

*ATTACK_V
if:MYEN:<:200:end
if:Y:==:-1:attack:RARM:UP
if:Y:==:1:attack:RARM:DOWN
print:それいけ〜
goto:*CHASE

*ATTACK_H
if:MYEN:<:200:end
if:X:==:-1:attack:RARM:LEFT
if:X:==:1:attack:RARM:RIGHT
print:それいけ〜
goto:*CHASE

*RETURN
basexycheck:X:Y
print:帰ろ。
if:X:==:0:if:Y:==:0:return
*CHASE
if:Y:<:0:move:UP
if:Y:>:0:move:DOWN
if:X:<:0:move:LEFT
if:X:>:0:move:RIGHT
end

*BASE
enemycheck:X:Y
if:X:==:99:end
lifecheck:A:HEAD
ifdown:A:HEADMAX:end
lifecheck:A:LARM
ifdown:A:ARMMAX:end
lifecheck:A:RARM
ifdown:A:ARMMAX:end
print:守るぞ〜
out


kazuさんの改造した俺専用守備ロジック?

6 名前:kazu777 ★ 2003/03/05 07:52 ID:uRD.INfN

上のは接近戦用機体専用ロジックです。
(こんな説明つけてくれると嬉しい)

7 名前:kazu777 ★ 2003/03/05 12:38 ID:uRD.INfN
行きたいとこ行っちゃうぞロジック(ジグザグバージョン)完成(多分
目標地点までジグザグに進みます。
敵を見つけたら攻撃して、ある程度ダメージ食らったら帰って仕切りなおします。

basecheck:B
if:B:==:TRUE:goto:*BASE
enemycheck:X:Y
lifecheck:C:HEAD
if:C:<:100:goto:*RETURN
lifecheck:C:LARM
if:C:<:100:goto:*RETURN
lifecheck:C:RARM
if:C:<:100:goto:*RETURN
if:X:==:0:goto:*ATTACK_V
if:Y:==:0:ifne:X:99:goto:*ATTACK_H
let:A:19
let:B:0
xycheck:X:Y
goto:*CHASE

*ATTACK_V
if:MYEN:<:200:end
if:Y:==:-2:attack:RARM:UP
if:Y:==:-1:attack:LARM:UP
if:Y:==:1:attack:LARM:DOWN
if:Y:==:2:attack:RARM:DOWN
print:それいけ〜
goto:*CHASE

*ATTACK_H
if:MYEN:<:200:end
if:X:==:-2:attack:RARM:LEFT
if:X:==:-1:attack:LARM:LEFT
if:X:==:1:attack:LARM:RIGHT
if:X:==:2:attack:RARM:RIGHT
print:それいけ〜
goto:*CHASE

*RETURN
basexycheck:X:Y
print:帰ろ。
if:X:==:0:if:Y:==:0:return
if:MYEN:<:200:end
if:Y:<:0:move:UP
if:Y:>:0:move:DOWN
if:X:<:0:move:LEFT
if:X:>:0:move:RIGHT
end

*CHASE
rand:C:2
if:C:==:0:goto:*CHASEA
goto:*CHASEB

*CHASEA
if:MYEN:<:200:end
if:Y:>:B:move:UP
if:Y:<:B:move:DOWN
if:X:>:A:move:LEFT
if:X:<:A:move:RIGHT
end

*CHASEB
if:MYEN:<:200:end
if:X:>:A:move:LEFT
if:X:<:A:move:RIGHT
if:Y:>:B:move:UP
if:Y:<:B:move:DOWN
end

*BASE
lifecheck:A:HEAD
ifdown:A:HEADMAX:end
lifecheck:A:LARM
ifdown:A:ARMMAX:end
lifecheck:A:RARM
ifdown:A:ARMMAX:end
print:進むぞ〜
out

この
let:A:19
let:B:0
に、行きたい座標を入れます。
Aは横
Bは縦
の座標です。

8 名前:Flost ◆RPdDaVH. 2003/03/05 14:46 ID:bNsgLBvN
あっちに移動しますた(謎
以後あっちによろしく

9 名前:kazu777 ★ 2003/03/06 21:11 ID:hOASrNwp
まあそんなに隠さなくても(笑)
オフ会掲示板に移動しました

10 名前:名無しさん 2003/06/16 22:25 ID:S8SFk8hu
小学生チャットに来てね
http://www13.big.or.jp/~fubuki/chat/chat1.html

11 名前:  2006/04/14 20:50 ID:LUZhhLwz
>>10
> 小学生チャットに来てね
> http://www13.big.or.jp/~fubuki/chat/chat1.html


12/200k

■掲示板に戻る■ 検索 全部 1- 最新50 新着レス
名前: メール:
メッセージ:
URL:
 sagestay等幅パスワード:

- Flash CGI/Mini Thread Version 3.31β -