デスラー砲 実装中3
デスラー砲 実装中3
まだ、まだだな。
■現時点の課題
弾の製造,威力, 命中精度
連射能力
給弾・装填・発射・排莢
戦闘機の航続距離
・・・
■現時点の戦力
零式二一型 相当 51機
零式三二型 相当 40機
■実装例
pushd %~dp0
::・・・
set 代理=''
set ダブルバッファリング=off
set 弾倉=.\弾倉_list\%~n0
if not exist %弾倉%\使用済み mkdir %弾倉%\使用済み
@set 編隊=零式二一型1 零式二一型2 零式二一型3 零式二一型4 零式二一型5
setlocal ENABLEDELAYEDEXPANSION
for %%x in (%編隊%) do (
set 時刻=!time: =0!
call set 時刻=%%時刻::=_%%
set 日付=!date:/=-!
@for /f %%i in ('dir /b /o-n %弾倉%\弾倉番号.*') do @set 弾倉番号=%%i
@set 出撃機=%%x
call set 使用弾倉番号=%弾倉%\%%日付%%-%%時刻%%-%%出撃機%%-%%弾倉番号%%.txt
call move %弾倉%\%%弾倉番号%% %%使用弾倉番号%%
call title %~d0 %ttt% %~n0 %%出撃機%% !time!
call ..\アタック %%出撃機%% %%使用弾倉%% | call tee .\log\%%日付%%-%%時刻%%-%%出撃機%%.txt
call move %%使用弾倉%% %弾倉%\使用済み
)
::pause
まだ、まだだな。
■現時点の課題
弾の製造,威力, 命中精度
連射能力
給弾・装填・発射・排莢
戦闘機の航続距離
・・・
■現時点の戦力
零式二一型 相当 51機
零式三二型 相当 40機
■実装例
pushd %~dp0
::・・・
set 代理=''
set ダブルバッファリング=off
set 弾倉=.\弾倉_list\%~n0
if not exist %弾倉%\使用済み mkdir %弾倉%\使用済み
@set 編隊=零式二一型1 零式二一型2 零式二一型3 零式二一型4 零式二一型5
setlocal ENABLEDELAYEDEXPANSION
for %%x in (%編隊%) do (
set 時刻=!time: =0!
call set 時刻=%%時刻::=_%%
set 日付=!date:/=-!
@for /f %%i in ('dir /b /o-n %弾倉%\弾倉番号.*') do @set 弾倉番号=%%i
@set 出撃機=%%x
call set 使用弾倉番号=%弾倉%\%%日付%%-%%時刻%%-%%出撃機%%-%%弾倉番号%%.txt
call move %弾倉%\%%弾倉番号%% %%使用弾倉番号%%
call title %~d0 %ttt% %~n0 %%出撃機%% !time!
call ..\アタック %%出撃機%% %%使用弾倉%% | call tee .\log\%%日付%%-%%時刻%%-%%出撃機%%.txt
call move %%使用弾倉%% %弾倉%\使用済み
)
::pause