mieki256's diary

1. 平面ポリゴンを、ジオメトリノードを利用してビルボード化する。(カメラの方向を向くポリゴンにする)
2. パーティクルシステムを使って平面ポリゴンを複数並べて茂みにする。
3. カスタム法線(?)を転送して、茂みを膨張(?)させる。
4. シェーダを作成して適用する。
5. 木の形に整える。

• 「位置設定 (Set Position)」
• 「ベクトル回転 (Vector Rotate)」
• 「位置 (Position)」
• 「ドメインでの評価 (Evaluate on Domain)」
• 「オブジェクト情報 (Object Info)」

• 追加 → ジオメトリ → 書込 → 位置設定
• 追加 → ユーティリティ → ベクトル → ベクトル回転
• 追加 → ジオメトリ → 読込 → 位置
• 追加 → ユーティリティ → フィールド → ドメインでの評価
• 追加 → 入力 → シーン → オブジェクト情報

KinematicBody
  │
  ├─ MeshInstance
  │
  └─ CollisopnShape

Player (KinematicBody)
  │
  ├─ PlayerModel (MeshInstance)
  │     │
  │     ├─ MeshInstance
  │     │
  │     └─ MeshInstance
  │
  └─ CollisopnShape

sudo apt install gimp gimp-texturize

-- title:  NEWTOTOTONE
-- author: mieki256
-- desc:   It's a game to catch an apple.
-- script: lua

scrw,scrh=240,136

Player={}
Player.new=function()
 local obj={
  alive=true,flip=0,
  x=scrw/2,y=scrh-32+8
 }
 setmetatable(obj,{__index=Player})
 return obj
end

Player.init=function(self)
 self.alive=true
 self.x=scrw/2
 self.y=scrh-32+8
 self.flip=0
end

Player.update=function(self)
 if not self.alive then return end
 local spd=2
 if btn(2) then
  self.x=self.x-spd
  self.flip=0
 end
 if btn(3) then
  self.x=self.x+spd
  self.flip=1
 end
 if self.x <= 8 then self.x=8 end
 if self.x >= scrw-8 then
  self.x=scrw-8
 end
end

Player.draw=function(self)
 local id
 if self.alive then
  id=1+t%60//30*2
 else
  id=9
  self.flip=t%20//10
 end
 local x,y=self.x-8,self.y-8
 spr(id,x,y,14,1,self.flip,0,2,2)
end

Item={}
Item.new=function(_x,_y,_kind)
 local obj={
  alive=true,
  x=_x,y=_y,dx=0,dy=0,
  hit=false,kind=_kind,
  sprid=5
 }
 if _kind==1 then obj.sprid=7 end
 setmetatable(obj,{__index=Item})
 return obj
end

Item.update=function(self)
 self.x=self.x+self.dx
 self.y=self.y+self.dy
 self.dy=self.dy+0.3*9.8/60.0
 if self.y >= scrh then
  self.y=-16
  self.dy=0
  self.alive=false
 end
 if self.hit then
  if self.kind==0 then
   score=score+10
   bornInfo(self.x,self.y,10)
  end
  self.alive=false
 end
end

Item.draw=function(self)
 if self.alive then
  spr(self.sprid,self.x-8,self.y-8,
      14,1,0,0,2,2)
 end
end

Info={}
Info.new=function(_x,_y,_str)
 local obj={
  alive=true,
  x=_x,y=_y,str=_str,timer=0
 }
 setmetatable(obj,{__index=Info})
 return obj
end

Info.update=function(self)
 self.y=self.y-0.5
 self.timer=self.timer+1
 if self.timer>30 then
  self.alive=false
 end
end

Info.draw=function(self)
 print(self.str,self.x+1,self.y+1,0)
 print(self.str,self.x,self.y,15)
end

function bornInfo(_x,_y,_score)
 local info=Info.new(_x,_y-16,"+".._score)
 table.insert(infos,info)
end

function hitcheck(p,objs)
 for i,spr in ipairs(objs) do
  local dx,dy,dist
  dx=math.abs(spr.x-p.x)
  dy=math.abs(spr.y-p.y)
  if spr.kind==0 then
   if dx<=8 and dy<=8 then
    spr.hit=true
    sfx(1, "C-5")
   end
  elseif spr.kind==1 then
   if (dx*dx+dy*dy)<(8*8) then
    spr.hit=true
    p.alive=false
   end
  end
 end
end

function updateSprites(objs)
 for i,spr in ipairs(objs) do
  spr:update()
 end
end

function removeSprites(objs)
 local elen=#objs
 for i=elen,1,-1 do
  if not objs[i].alive then
   table.remove(objs,i)
  end
 end
end

function drawSprites(objs)
 for i,spr in ipairs(objs) do
  spr:draw()
 end
end

function printCt(_s,_y,_scale)
 local w=print(_s,0,-6)
 local x=(scrw-(w*_scale))//2
 local a=_scale
 print(_s,x+a,_y+a,0,false,_scale)
 print(_s,x,_y,15,false,_scale)
end

score=0
hiscore=0
gmstep=0
t=0
brate=100

player=Player.new()
items={}
infos={}

PALADDR=0x3FC0+14*3
R1,G1,B1=0x59,0x7D,0xCE
R2,G2,B2=0x6D,0xC2,0xCA

function SCN(row)
 -- sky gradient
 local d,hh,h
 hh=scrh-8*4
 h=hh*0.75
 if row<h then d=0
 elseif row>hh then d=1
 else d=(row-h)/(hh-h) end
 poke(PALADDR,R1+(R2-R1)*d)
 poke(PALADDR+1,G1+(G2-G1)*d)
 poke(PALADDR+2,B1+(B2-B1)*d)
end

function TIC()
 if gmstep==0 then
  -- title
  if btnp(0) then
   gmstep=1
   score=0
   brate=100
   music(0)
   math.randomseed(0)
  end
 elseif gmstep==1 then
  -- game main
  hitcheck(player,items)
  player:update()

  -- born item
  if t%60==0 then
   brate=brate-1
   if brate<=1 then brate=100 end
  end
  if t%8==0 then
   local ex,b,k,item
   ex=math.random(8,scrw-8)
   b=math.max(20,brate)
   k=(math.random(100)>b) and 1 or 0
   item=Item.new(ex,-16,k)
   table.insert(items,item)
  end
 
  updateSprites(items)
  updateSprites(infos)
  
  removeSprites(items)
  removeSprites(infos)
  
  if score>hiscore then
   hiscore=score
  end
  
  if not player.alive then
   gmstep=2
   t=0
   sfx(2,"C-5")
   music()  -- music stop
  end
 elseif gmstep==2 then
  -- game over
  if t>=60+30 then
   player:init()
   gmstep=0
   items={}
   infos={}
  end
 end

 -- draw 
 cls(14)
 map(0,0,30,17,0,0,14)
 player:draw()
 drawSprites(items)
 drawSprites(infos)
 print("SCORE: "..score,4,2)
 print("HI-SCORE: "..hiscore,120,2)
 
 if gmstep==0 then
  printCt("NEWTOTOTONE",52,2)
  printCt("MOVE: LEFT,RIGHT KEY",84,1)
  printCt("PUSH UP KEY TO START",94,1)
 elseif gmstep==2 then
  printCt("GAME OVER",54,2)
 end
 
 t=t+1
end

• 〜.new が、クラスのインスタンス発生＋初期化処理
• 〜.update が更新処理(1秒間に60回呼ばれる)
• 〜.draw が描画処理

• 時間制限をつけて、1分以内に何点稼げるかで競う感じにするとか。
• 地面の上に蛇でも出すとか。プレイヤーキャラはジャンプで避けるとか。あるいは弾を撃って蛇を倒すとか。
• フィーバータイムをつけるとか。何かを取ると一定時間、全てが林檎に変化したり。
• ステージを設けるとか。ある程度取るとステージクリア。
• 長くプレイしてると背景が変わってくるとか。徐々に夕焼けになったり、夜空になったり。

• 横スクロールシューティングゲームを作れ。
• 自機はカーソルキーで上下左右に動く。
• 自機は弾を撃てる。
• 雑魚敵は画面内に複数出てくる。
• 雑魚敵は自機の弾で消せる。
• 雑魚敵を4種類実装しろ。
• 雑魚敵Aは、画面右から出現。sinカーブで飛んでくる。
• 雑魚敵Bは、画面右から出現。自機を追いかける。
• 雑魚敵Cは、画面左から出現。放物線を描いて画面左に帰っていく。
• 雑魚敵Dは、(仕様失念)

• 画面内に複数のオブジェクトを出して動かす仕組み、の基本を学べる。
• 速度と加速度の使い方を学ぶ。
• 角度から速度を求めて使うやり方を知る。(三角関数の復習。)

deb http://ftp.jp.debian.org/debian/ stretch main contrib non-free
deb-src http://ftp.jp.debian.org/debian/ stretch main contrib non-free

apt update
apt upgrade

apt install aptitude

apt install sudo

ユーザ名 ALL=(ALL) ALL

sudo aptitude install build-essential linux-headers-amd64

sudo aptitude install open-vm-tools open-vm-tools-dkms open-vm-tools-desktop

sudo vi /etc/default/grub

sudo update-grub

sudo aptitude install net-tools

sudo apt-get install xdg-user-dirs-gtk
LANG=C xdg-user-dirs-gtk-update

sudo aptitude install mpg321 vorbis-tools flac

sudo aptitude install xscreensaver xscreensaver-data-extra xscreensaver-gl xscreensaver-gl-extra xscreensaver-screensaver-bsod xscreensaver-screensaver-dizzy xscreensaver-screensaver-webcollage

xscreensaver -nosplash

sudo aptitude install love
love

sudo apt remove love
sudo aptitude search sdl2
sudo aptitude install libsdl2-dev libsdl2-image-dev libsdl2-mixer-dev libsdl2-net-dev libsdl2-ttf-dev libsdl2-gfx-dev

# sudo apt install liballegro4.4 libdevil1c2 libluajit-5.1-2 libluajit-5.1-common libopenal-data libopenal1 libphysfs1
# sudo aptitude install lua50 lua5.1 lua5.2 lua5.3 luajit

sudo aptitude install liblua5.1-dev
sudo aptitude install build-essential autotools-dev automake libtool pkg-config libdevil-dev libfreetype6-dev libluajit-5.1-dev libphysfs-dev libsdl2-dev libopenal-dev libogg-dev libvorbis-dev libflac-dev libflac++-dev libmodplug-dev libmpg123-dev libmng-dev libturbojpeg0 libtheora-dev

mkdir packages
cd packages
wget https://bitbucket.org/rude/love/downloads/love-0.10.2-linux-src.tar.gz
tar zxvf love-0.10.2-linux-src.tar.gz
cd love-0.10.2
./configure
make
sudo make install

• Insert,Delete,Home,End,PgUp,PgDnは、キーを小さくして上部に追いやった。
• カーソルキーは、右Shiftの下のほうに、やはりキーを小さくして追いやった。
• Fnキーを導入して、滅多に使わないキーは別のキーを流用。

convert 背景とキャラ.png 背景.png -compose ChangeMask -composite キャラ.png

enblend -v -m 512 -w -a -l 29 -o OutputImage.tif InputImage*.tif

-v

処理内容を逐一表示させる。

-m MemoryMB

処理に使うメモリを指定するらしい。「-m 512」なら、512MBを割り当てる、のかな？ たぶん。

-w

左端と右端がループするように合成する。360度パノラマ画像を出力する際は、指定しないと話にならない。hugin が呼び出す際は、勝手に -w をつけてるらしい。

-a

画像を何枚か合成した後に、それら画像をさらに合成する、のだと思う。合成回数を少なくする＝ちょっとは時間を節約してくれるのかも。品質のほうはどうなるか不明。

-l Level

合成時の品質レベルのようなものを指定するらしい？ 「-l 29」といった感じで指定。最大値は29。値が大きいと、合成の不自然さは減るが、グーンと時間がかかる。てな話を見かけた。

-o 出力ファイル名

出力 tiff ファイル名を指定。

入力ファイル名

Input*.tif と指定すれば(ワイルドカード指定)、Input〜.tif という名前の全ファイルを元画像として使ってくれる。

• hugin 上で、きりのいい出力画像サイズを指定すること。
• hugin 上で、「クロップ(crop)」関連のオプションは無効にすること。

新幹線を擬人化して涙してしまうのはひょっとしたら男だけなんじゃないのかなぁ？