■掲示板に戻る■ 検索 全部 1- 最新50
【CS】ロジック集【CS】なにげにパート3
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行未満でもターン終了となるみたいです

12/200k

名前: メール:
メッセージ:
URL:
 sagestay等幅パスワード:

- Flash CGI/Mini Thread Version 3.31β -