【コムサイト PC88 COMSIGHT TecnoSoft �@】

機種　PC88SR　X1Turbo
発売元　テクノソフト　ttp://www.tecnosoft.com/
画像　ttp://refugee2005.sakura.ne.jp/library/1987/COM01.gif

タンクの動きをプログラミングして戦わせるシュミレーションゲーム
コムサイトをまったり語りましょう（関連ゲームもＯＫ）
熱いバトルも大歓迎です

BPLソース貼りの場所としても活用ください

情報希少なのでまとまったらWikipedia掲載も？

88スレで挙がったプログラム対戦タイプゲーム
元祖はアップルの＊＊というゲームらしい（失念）

R.C. ロボットコンストラクション（X68）
ttp://www.electricsheep.co.jp/rc.shtml
マリオネットハンドラー（ＤＣ）
ttp://www.ni.bekkoame.ne.jp/jet_ryo/robo/game/marionettehandler.htm
地球防衛軍（PC98）
ttp://randy3.hp.infoseek.co.jp/retro/doc/farside.shtml
カルネージハート（PS2）
ttp://www.artdink.co.jp/japanese/title/chez/
MULTIPLY29
ttp://hp.vector.co.jp/authors/VA012411/chapter-10.html#MULTIPLY29
GUN-TACTYX
ttp://gameprog.it/hosted/guntactyx/

関連　ヘルツォーク
ttp://yasai.2ch.net/game/kako/979/979398739.html

BPLサンプルプログラム

100 '-------- SAMPLE PROGRAM ---------
110 ' (Search field)
120 SEARCH 64
130 IF @R=0 THEN GOSUB 400:GOTO 110
200 ' (Attack to enemy)
210 IF @Y>0 AND @Y>ABS(@X) THEN MISSILE @X, @Y, 1000
220 IF @Y>0 AND ABS(@X)<=3 THEN BEAM 1000:GOTO 110
300 ' (Move1)
310 IF @X<>0 THEN TURN @X ELSE LEFT
320 FORWARD
330 GOTO 110
400 ' (move2)
410 IF @Y=8 THEN RIGHT
420 FORWARD
430 RETURN

100　乙 TO 1
110 GOTO 100

応援だけー。

せめて、88 スレには宣伝するべきだと思うのです。
自分は本当に偶然発見しただけで…。

88版　4,301円で落札か
ttp://page6.auctions.yahoo.co.jp/jp/auction/f52109563
まだまだ印象深い作品なんだ

何故 >>2 にヘルツォークが関連として挙げられているのかよく分からないけれど、
そのヘルツォークのクローンゲームみたいなもの。

Rapid Aerial Deployment
http://www.leondroog.com/

見た目は大分簡素化されているけれど、やっている事は全く同じ。

>>1
プログラム対戦シミュ全般にしたほうがよかったんじゃね？
コムサイト一本でスレが持つのか不安だｗ

そう言いつつ、オレやったことないんだ・・・もの凄く欲しかったんだけど。
まわりにソフト持ってやってる人いなかったし、パソ通もやってなかったんで
これじゃせっかく買ってもＣＰＵ対戦しか出来ないなあ・・と思ってたので

EGGとかでだしてくれんかな。

↑
書き忘れ。フリーゲーム。


これも、SeeNa98 みたいに配布されないものかなぁ…。

わけわかんにゃい＞＜

>>8 = >>10

>>9 さんは別人ですよん

88スレから情報引継ぎ

当時テクノソフトがＢＢＳを開いていて専用通信ソフトがあった
対戦コンテストが開かれた
1 MOVE 15:TURN 1:GOTO 1 の逃げるだけマシンは結構勝つ
１定の値の奇数ビームは破壊力大の裏技があった

>>1　乙彼様。

とりあえず我が家のを、ひっぱり出してSRで動作確認したところ
ユーザーディスクのコピーは読み込めませんでしたので
新規にユーザーディスクを作成して起動、COM相手の動作確認できました。
BPL上げてくれたら、気合入れて打ち込むかもですよ。

パッケージ開けたら、当時送らなかった記入済みアンケート葉書入ってたよ。

日曜宣伝age
コンテストの優勝者とか元開発者とかが降臨してくれると
スレ的にはおいしい展開なんだが
当時のＴＳは３Ｄは得意分野だったんだろうけど
いったい誰が開発したんだろ

検索コムサイト　別ないろいろが引っかかってしまう名前だ

>>1
乙　っていうかすげーな。こんなスレがあるなんて。
プログラムが良く判らんまま作ってみたら、マイタンクが瞬殺されて呆然としたっけなｗｗ

スレが伸びることを祈ってage。

>>8
R.A.Dやってみた　ヘルツのクローンだね
モデリングされたキャラがいい
バルキリー変形してるのがけなげだ
将来はネット対戦対応みたいだね
ＰＣ版、ツヴァイ共クリアした自分としては期待○
コムサイトのクローンは..海外での知名度なんてないか.

MULTIPLY29っていうのもなかなかすごいな

96年頃ユーザーのコムサイトページあったんだけどな

MULTIPLY29 は、紹介ページの方にあるのはアーカイブが壊れていて展開できない。
Vector のライブラリからダウンロードすると良い様子。

http://www.vector.co.jp/games/soft/win95/game/se057976.html

にしても、何をどうしていいのかさっぱりさっぱり。

X68にライブラリで思考作ってＣでコンパイルリンクして
実行でバトルさせるやつあったみたいだけどあれなんだったっけ

バーチャルバトル　こんなん見つけた
ttp://www.dokidoki.ne.jp/home2/yoshieo/vb/index.html
ロボットは歩くけどゲーム性は未完っぽい　1=1 とか PASSがいる

初書込ですー。

コムサイト，入手しただけで使っていませんでして…
実家からマニュアルを発掘してきました。
ディスクははＤ８８化してますので，エミュレータ上でバトルも不可能ではないですね。

おおぉ　いらしゃいませ〜
そうですねー
バトルに参加してくれる人が出てくればこのスレも活性化することでしょう
時々製作の覚え書きでも書き込んでください

ここにちょっとだけコムサイトに触れた文が
ttp://buiin.exblog.jp/2205856/

http://www.vector.co.jp/games/soft/winnt/game/se413863.html

保守

あらまあ、二週間もレスが無かったのか…便乗保守。

V.T.
http://www.vector.co.jp/soft/win95/game/se412159.html

> V.T.はプログラミング対戦型戦車バトルゲームです。
> プレイヤーはC言語に似たプログラムで各戦車の動きを決定します。
> コンピュータ対戦モードと二人対戦モードがあります。
> コンピュータ対戦モードではプレイヤーはBlue Tank側になります。
> 二人対戦モードでは青と赤両方の戦車のプログラム同士が対戦します。
> ゲームステージは3つの中から一つを選べます。
> 設定画面で各ステージごとに戦車プログラムや対戦モードを設定できます。

自分は未プレイなので何とも。画面を見た感じはチェスっぽいかなー。
この手のは習得するまでに時間が掛かるのがネックかな。

誰かが何か１つゲームを決めて、
そのソースを貼りだしたりしていけば盛り上がるのかもしれないけど。

このスレは存在することに意義があるのだぁぁ
Yahoo Gogle にPC88付ければヒットするよぉぉ
現在唯一のよりどころだからね

>>26
面白そう　でも動かなかった

一番とっつきやすいのはコムサイトかなあ
最初に基本ソースをＵＰして誰かが気が向いた時に改良してＵＰして
オープンソース的にみんなで１つのタンクを製作するっていうのも
一つの方法かもしれない

基本プログラム作ってみました
１行目タンク名　DefenseLevel TankType

100 'ShareTank DL=1 SIEVA
110 SEARCH 64
120 BEAM 0
130 MISSILE @X,@Y,1:MISSILE @X,@Y,1
140 TURN (ABS(@X)>ABS(@Y))*-SGN(@X)
150 MOVE (@Y/8-3)
160 GOTO 110

敵のほう向いて距離とってミサイル撃つだけの物です
改良箇所と解説入れないと厳しいかも

COMSIGHT　1987
タンクタイプ　シールドの効き方向

CIRC　円状均等
MASH　前後楕円状
SIEVA　前方扇状
AGLEX　前後左右突出
VOA　斜め四方突出
HOGS　前後突出
ZAR　左右突出
WEITZ　後方扇状

改正
120 BEAM -(@X=0)

BPL コマンド

SEARCH MISSILE BEAM TURN MOVE
FORWARD BACK RIGHT LEFT

RUN LIST LLIST DELETE RENUM CONT '
GOTO GOSUB RETURN IF THEN ELSE FOR TO NEXT
AND OR NOT ABS SGN SQR RND

() = > < <>
@X @Y @R @D @ME @MS @MD @EE @ES @ED

ハウメニロボット やったことある人います？
面白かったのかな？
最初操作するだけで後は学習で動くと雑誌で紹介されてたけど

一撃必殺ビームは
BEAM 18081

ミサイルは8連射まで45度以上は撃てない

↑のはＤＬ＝１の相手に対してだった
ＤＬ＝１６には

BEAM 19041　だ

検索（最大8の平方）圏外で@R（距離）=0の時は
@X@Yは敵の位置でなく近くの外壁までの距離（1マス8）がわかるので
ただ中心に行くだけのプログラムは次のようになる
10 SEARCH 64
20 A=-SGN(@X)
30 MOVE 8*-SGN(@Y)+@Y/8
40 TURN A
50 MOVE 8*-SGN(@X*A)+@X*A/8
60 STOP

@Dは相手の向きが反時計回りに90度＝16でわかるので
相手が進む方向の予測に使えるかも
Ｘ軸向き -1左か1右か0縦 ＝　(@D/16 MOD 2)*SGN(@D-32)
Ｙ軸向き -1下か1上か0横 ＝　NOT(-@D/16 MOD 2)*SGN(@D-16)
式だけ書くとわかりにくいけど

これ、どう考えても (プログラミング) マニュアルが無いと不可能だよね…。

動作にクロック消費数がある

代入式　論理演算    = 0

GOTO GOSUB RETURN IF FOR NEXT    = 1
SEARCH    = 1

MISSAILE    = 1
BEAM    = 1

MOVE    = 8
TURN    = 16

論理演算式を多用した方が早く強くなる

２０年の謎は解き放たれた
ファイル
 PandoraBox
 Secrecy
 SubRoutine
PASSWORD:""

1 PandoraBox "" なし
    Good ____
2 Secrecy "luck"
    Next hint ﾊﾟﾝﾄﾞﾗ ﾉ ﾊｺ ﾆ ｻｲｺﾞ ﾆ ﾉｺｻﾚﾀ ﾓﾉ
3 SubRoutine "hope"

バトルゾーン（製品）
ttp://www.bzfiles.net/
情報求む

ttp://upload.wikimedia.org/wikipedia/en/thumb/c/c0/Bztank.JPG/300px-Bztank.JPG

ヘルツォークスレより抜粋
（リンク切れ）
ユーザーの作ったマップがある 
ttp://www.planetbattlezone.com/maproom/ 
エディタの使い方 
ttp://www.insomniax.net/bz2editing/faq/images/ 
AI作成ツールやドキュメント 
ttp://www.planetbattlezone.com/launchpad/ 

プログラムシュミレーションゲームというくくりだけでは
やはりなかなかスレが伸びないな
リアルタイムシュミレーションゲームと枠を少し広げてみるか
タンク系　ロボット系・・
とりあえずヘルツォーク　バトルゴリラ（専スレ無）好きな人も来て語って欲しいな
PGS＆RTS　どちらもファンはいるけど語られることは少ないという点で共通してるしｗ

さすがに、当時のマニュアルの実物を持っているかBPLの文法を
覚えている人はそう多くないと思うなあ。
エミュでピーしてもっている人は少なからずいるだろうけど。
そんな私も実家に丸ごとパッケージを寝かせているので文法分からん。

文法難しいかなあ　このスレやサンプルとかもあるし
コンソールで行無しで直接命令打ってF1>DUMMY使って数値変化見るのもいいし
まあ最初は論理式使わないでIF文多用したがいいかもね
バトルで弾受けるとまずシールドが減って尽きるとダメージ減る
時間でシールド回復するがエネルギーが消費する
タイプはSIEVA　DLは１にしとけばいい
BASIC基本文はそのマニュアルかWEBを見るといい
難しいのはSEARCH圏外の時と@Dぐらい

とりあえず簡易ヘルプ
１マス＝８座標です　フィールド全１６×１６マス
変数名は１文字かそれに数字をつけたものまで　例　C=0:D2=50
IF (A=1 AND B=2) THEN GOTO 200　もしAが1でBが2なら200行に飛ぶ　ORなら又は
FOR I=1 TO 10:PRINT"Hello":NEXT　１０回繰り返す
BEAM 1　エネルギー１のビームを打つ
MISSILE 16,32,1　座標(X16,Y32)へエネルギー１のミサイルを打つ
TURN  1　右へ回転　　TURN  -1　左へ回転
MOVE 4　前へ４マス進む　　MOVE -1　後ろへ１マスバック
SEARCH 64　半径８マス（掛ける8で64に）をサーチしてレジスタ値をセット　通常こう書く　これが最大
A=ABS(-7)　絶対値　符号を取って7を返す
A=SGN(X)　Xがマイナスなら-1 0なら0　プラスなら1を返す
RUN　シュミレーションモードで実行　　LIST　リスト表示
RENUM 100　行番号をそろえる

レジスタ　SEARCH して圏内なら敵と自分の値を返す
@X @Y 敵座標を示す　左と後ろはマイナス　圏外の時は最寄の壁までの距離
@R 距離を示す　圏外なら0になる（重要）
@D 相手の向き 値＝（同じ0 左16 向い32 右48）　上級まで使わず
自分の　@ME エネルギー　@MS シールド　@MD ダメージ　　最初は@MEぐらいしか使いません
相手の　@EE エネルギー　@ES シールド　@ED ダメージ　　それぞれ最大値(30000 100 100)
これだけ　あとは使わない

論理演算の使い方
IF @X=0 THEN BEAM 1
敵とX軸が合えばビームを撃つ
これを0クロック論理演算で書くと
BEAM -(@X=0) 
@X=0が真なら-1になる　偽なら0になる　なので-(式)とマイナスを掛けなければならない
他にも　>左辺大きいなら　<小さいなら　<>違うなら　>=以上　<=以下　NOT(式)違うなら　など　
MOD は除算の余り　7 MOD 3 は1になる　除算の解は全て整数で返る
あと圏外の時が難しいがソースの最初に>>36を入れて60行のSTOPを'REM文にして
15 IF @R<>0 THEN GOTO 60　を追加すれば勝手に中央まで行き圏内になります

難しそうだな
これで偏差射撃とかできるのか

私は、偏差射撃なんだが、弾道飛翔速度とかまで解析できなくて
(というかそこまで実験実測する気合もなくて)さっぱり諦めたよ。
その点はミサイルもビームも大して変わらん。

荒れるネタになりそうなのでレスはしないでもらいたいが、
某A社のPS版ロボット格闘ゲームC.H.(ブロックでロジックを組む)、
個別武装の解析とかまでやっていた同人本を見て、絶句。
なんでそこまでせにゃならんのかと。
雑誌か何かで全国大会か何かやっていたくらいだから、極めた連中は
とことんなんだろうが、私はそこまで行けないヌルゲーマーと思い知った。

というわけで＾＾上級向け数値データ
ミサイルは１クロックで２座標の距離進むようだ（タンクの２倍速）
単純に前進している相手と想定すれば距離の２/３あたりに撃てば当たる計算になる
（もちろんそれだけではないが）
相手当たり判定は中心から+3まで
ビームは１クロック消費で即相手に当たる　距離は関係ない
１クロックエネルギー消費量=DL（デェフェンスレベル）+2
シールドは１クロック１回復
１クロックシールド回復エネルギー消費量=DL*3+37
壁や敵にぶつかったときのシールドダメージ=(16-DL)*2+34
まあこんな数値気にしないで使うポイントがあったら組み込むぐらいに考えて
BPLバトルを楽しむのが良いかと

図解 @X@Yの値（自は上を向いている）
　圏内の時　相対的な敵座標

　　囗囗囗囗囗壁
　　囗敵囗囗囗壁
　　囗囗囗囗囗壁
　　囗囗囗囗囗壁
　　囗囗囗自囗壁
　　壁壁壁壁壁壁

　　@X=-16 @Y=24

　圏外の時　近い側の壁までの距離（つまり絶対座標がわかる）

　　壁壁壁壁壁壁　　　　　　囗囗囗囗囗壁
　　壁囗囗囗囗囗　　　　　　囗囗囗囗囗壁
　　壁囗囗囗囗囗　　　　　　囗囗囗囗囗壁
　　壁囗囗囗囗囗　　　　　　囗囗自囗囗壁
　　壁囗囗自囗囗　　　　　　囗囗囗囗囗壁
　　壁囗囗囗囗囗　　　　　　壁壁壁壁壁壁

　　@X=-24 @Y=32　　　　　@X=24 @Y=-16

　敵の向きと@Dの関係
　　囗囗囗囗囗囗囗囗囗
　　囗_0囗16囗32囗48囗
　　囗↑囗←囗↓囗→囗
　　囗囗囗囗囗囗囗囗囗
　　囗囗囗囗自囗囗囗囗

聞いたところによると元祖はAppleIIの Robot Warというものらしい (1981年)
ttp://www.mobygames.com/game/apple2/robot-war/screenshots　（画像あり）

Robot War by Warner, Muse; strategy. 
"Strategy game with battling robots is great teaching device for programming." 
This game allowed creating your own robot with its simple program that determined how it fought. 
In some parts of the country, 
Robot War aficionados had tournaments pitting one person's robot-program against another. 
It gave experience in simple artificial intelligence programming. 

ex.Apple's WarGame : (1980)Computer Bismarck　(1982)Computer Ambush　

Programming Games のリンク集（英語）
ttp://www.cs.mcgill.ca/~stever/games/
米では受けがいい分野なのか多くのものが存在している

モータースクウォードとかもここの仲間でいいんだよな？

>>51
なんだか知らんけど盛り上げてくれ

ttp://rars.sourceforge.net/
異色だけどこれよさそう
レースマシンの動きをプログラムする

海外物はC言語ベースでマニュアルとコミュニティが英語なのがネックか

最近はやりの２足歩行ミニロボットもプログラムコントロールなんだよね
あれはまだ１０万ぐらいするけど

>>50
ログインの「ロボットバトルV」がそれにそっくりだな。
あれは面白かった。
FM7、８８、PASOPI7版などがあって、ちょうどその３機種の友人がいたので
誰かの家に行っては盛り上がってた。

>>54
あれは、細かい制御は出来ないけど、
簡単に作ってバトルできたから面白かったね。
極めるほど種類は作らなかったけどね。
…ホバー型機体を作って、ロケットの弾を積み忘れた。
shellって英単語を理解していないリアル中学生だったわ。
私の好みはキャタピラ型でHi-Laser。

プログラムポシェット、Ｘ１版でロボットバトルＶみたいな投稿ゲームあったんだけど
誰か覚えてないかな。俺は８８だったので画面写真しかしらないんだけど。

88スレからきました、需要あるか分かりませんが昔拾ったbplの説明txtです。
ttp://www.heat-devil.com/up/src/No0042.zip
p comsight

同じく88スレから。
まさか専用スレが立ってるとは思わなかったぜ。
　
敵の移動予測先にミサイルばら撒いたり、旋回中の敵に対して
一撃で破壊可能な必殺ミサイルを撃ち込む戦車を作ったなぁ。
　
ちょっと裏技的な情報をひとつ。
COM側のDiskを見ると、PandoraBoxとかいう名前のものを含めて
3台くらい戦闘能力のない戦車があって、リストを見るとサンプルの
ルーチン（敵戦車の旋回終了までのクロック算出とか）が見れる。
パスワードの無い戦車のリストが他の戦車のパスワードのヒントになってる。

その情報を見ると解ることなんだけど……
　
コマンドを実行するとクロック消費する。　
論理演算だけならクロックは消費しない。　
Move 0やTurn 0で実行した場合、何も動作しないけどクロックも消費しない。
これをうまく使うとIF文なしで行動する、動作に隙の少ない戦車が作れる。

ごめん>>39に書いてあったね。

ttp://www.c21-online.jp/special/introduction/index.html

コムスンあげ

誰かニコニコに動画でもうｐしてくれんかのぅ。
5インチディスク出てきたけど、動かすPC無くて(´･ω･`)ｼｮﾎﾞｰﾝ