mieki256's diary

-- title:   game title
-- author:  game developer, email, etc.
-- desc:    short description
-- site:    website link
-- license: MIT License (change this to your license of choice)
-- version: 0.1
-- script:  moon

t=0
x=96
y=24

export TIC=->
 if btn 0
  y-=1
 if btn 1
  y+=1
 if btn 2
  x-=1
 if btn 3
  x+=1

 cls 13
 spr 1+(t%60)//30*2,x,y,14,3,0,0,2,2
 print "HELLO WORLD!",84,84
 t+=1

• コメント行は Lua と同様、「--」から始まる。
• ブロックの終了を示す「end」「)」「}」が無い。Pythonと同様にインデントでブロックを表す。
• 関数を作成する時は、TIC=-> のように書くらしい。
• 関数呼び出し時、Ruby のように、括弧を省略できる。
• 代入演算子の += が使える。ということは -=, *=, /= も使えるのだろう…。

-- script:  moon

class Ball

 new: (@x,@y,@scrw,@scrh) =>
  @id = 1 + 2 * math.random(0,5)
  spd = 0.4 * @scrw / 60.0
  a = math.rad(math.random(360))
  @dx = spd * math.cos(a)
  @dy = spd * math.sin(a)
  
 update: =>
  @x += @dx
  @y += @dy
  if @x<=0 or @x>=@scrw-16
   @dx *=-1
  if @y<=0 or @y>=@scrh-16
   @dy *= -1
 
 draw: =>
  spr @id,@x,@y,0,1,0,0,2,2


export t=0
sw,sh=240,136

-- init objs
export objs={}
n=80
for i=1,n
 objs[i] = Ball(sw/2,sh/2,sw,sh)


export TIC=->
 
 -- update
 for i=1,#objs
  objs[i]\update!
  
 -- draw
 cls 0
 for i=1,#objs
  objs[i]\draw!
 
 print "Lua: #{_VERSION}",4,8,12
 print "count: #{t}",4,16,12
 print "#{t//60} sec",4,24,12
 
 t+=1

• class Hoge と書けばクラスを定義できる。
• クラスのインスタンス変数には「@」をつけるっぽい。
• new: がコンストラクタの定義。
• 関数の引数が無い場合は、update! のように、最後に「!」をつけて「引数が無いよ」と伝えるらしい。update() でも良さそうだけど…。
• objs[i].draw! でも objs[i]:draw! でもなく、objs[i]\draw! と書く。「:」は別のどこかで区切り文字として使ってしまっているから、らしい。
• #objs で、テーブルの個数を取得できる。
• for i=1,#objs で、最後につける do は省略できる。
• Rubyと同様に、"hoge #{t}" と書けば、文字列内に t の値が展開される。
• グローバル変数、グローバル関数には export をつける。

sudo apt install cpu-checker

$ kvm-ok
INFO: /dev/kvm exists
KVM acceleration can be used

$ lscpu | grep -Ei "(vt-x|amd-v)"
仮想化:                              AMD-V

$ grep -E "(vmx|svm)" /proc/cpuinfo
flags: ... svm ... svm_lock ...

$ lsmod | grep kvm
kvm_amd                98304  0
ccp                    86016  1 kvm_amd
kvm                   663552  1 kvm_amd

sudo apt install qemu-kvm qemu libvirt-clients libvirt-daemon-system libvirt-daemon virtinst bridge-utils libguestfs-tools virt-top virt-manager virt-viewer
sudo apt install qemu-system qemu-system-arm

sudo reboot

$ sudo systemctl is-active libvirtd
active

or 

$ systemctl status libvirtd

$ sudo gpasswd -a $(whoami) libvirt
$ sudo gpasswd -a $(whoami) kvm
$ sudo gpasswd -a $(whoami) libvirt-qemu

or 

$ sudo adduser `id -un` libvirt
$ sudo adduser `id -un` kvm
$ sudo adduser `whoami` libvirt-qemu

$ groups $(whoami)

$ ip a
1: lo: <LOOPBACK,UP,LOWER_UP> mtu 65536 qdisc noqueue state UNKNOWN group default qlen 1000
    link/loopback 00:00:00:00:00:00 brd 00:00:00:00:00:00
    inet 127.0.0.1/8 scope host lo
...
2: enp1s0: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc fq_codel state UP group default qlen 1000
...
3: virbr0: <NO-CARRIER,BROADCAST,MULTICAST,UP> mtu 1500 qdisc noqueue state DOWN group default qlen 1000
...
4: virbr0-nic: <BROADCAST,MULTICAST> mtu 1500 qdisc fq_codel master virbr0 state DOWN group default qlen 1000
...
5: vmnet1: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc fq_codel state UNKNOWN group default qlen 1000
...
6: vmnet8: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc fq_codel state UNKNOWN group default qlen 1000
...

$ cd /etc/netplan/

$ ls -al
合計 20
drwxr-xr-x   2 root root  4096  8月  6  2019 .
drwxr-xr-x 187 root root 12288 11月  8 05:43 ..
-rw-r--r--   1 root root   104  8月  6  2019 01-network-manager-all.yaml

$ sudo cp /etc/netplan/01-network-manager-all.yaml /etc/netplan/01-network-manager-all.yaml.orig

sudo vi /etc/netplan/01-network-manager-all.yaml

# Let NetworkManager manage all devices on this system
network:
  ethernets:
    enp1s0:
      dhcp4: yes
      dhcp6: yes
  bridges:
    br0:
      interfaces: [enp1s0]
      dhcp4: yes
      dhcp6: yes
  version: 2
#  renderer: NetworkManager

$ sudo netpaln apply

$ ip a
1: lo: <LOOPBACK,UP,LOWER_UP> mtu 65536 qdisc noqueue state UNKNOWN group default qlen 1000
...
2: enp1s0: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc fq_codel master br0 state UP group default qlen 1000
...
3: virbr0: <NO-CARRIER,BROADCAST,MULTICAST,UP> mtu 1500 qdisc noqueue state DOWN group default qlen 1000
...
4: virbr0-nic: <BROADCAST,MULTICAST> mtu 1500 qdisc fq_codel master virbr0 state DOWN group default qlen 1000
...
5: vmnet1: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc fq_codel state UNKNOWN group default qlen 1000
...
6: vmnet8: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc fq_codel state UNKNOWN group default qlen 1000
...
7: br0: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc noqueue state UP group default qlen 1000
...

$ sudo vi /etc/netplan/01-network-manager-all.yaml

# Let NetworkManager manage all devices on this system
network:
  version: 2
  renderer: NetworkManager

$ sudo apt purge qemu-kvm qemu libvirt-clients libvirt-daemon-system libvirt-daemon virtinst bridge-utils libguestfs-tools virt-top virt-manager virt-viewer qemu-system qemu-system-arm

$ sudo apt autoremove

dpkg: 警告: libvirt-daemon-system の削除中、ディレクトリ '/var/lib/libvirt/qemu' が空でないため削除できませんでした
dpkg: 警告: libvirt-daemon-system の削除中、ディレクトリ '/var/lib/libvirt/images' が空でないため削除できませんでした
dpkg: 警告: libvirt-daemon-system の削除中、ディレクトリ '/etc/libvirt' が空でないため削除できませんでした