OCRアニメーターキット/StegOnAviutl

ほえー、ここは予定地ですー

## OCRアニメーターキット/StegOnAviutl

* anm

種類
--

## 外部情報

### 公開日

????/??/??

StegOnAviutlとは、anm拡張子のブレンドE用Aviutlスクリプトの１つである。

## 設定項目

### bitinit(Rikkyブレンド)

#### タイプ

* 1:RedL

```
RedL=function(r1,g1,b1,r2,g2,b2)
local lg=g1
local lb=b1
local qr=Lower(r1)
return qr,lg,lb
end

```

* 2:GreenL

```
GreenL=function(r1,g1,b1,r2,g2,b2)
local lr=r1
local lb=b1
local qg=Lower(g1)
return lr,qg,lb
end

```

* 3:BlueL

```
BlueL=function(r1,g1,b1,r2,g2,b2)
local lr=r1
local lg=g1
local qb=Lower(b1)
return lr,lg,qb
end

```

* 4:RedU

```
RedU=function(r1,g1,b1,r2,g2,b2)
local lg=g1
local lb=b1
local qr=Upper(r1)
return qr,lg,lb
end

```

* 5:GreenU

```
GreenU=function(r1,g1,b1,r2,g2,b2)
local lr=r1
local lb=b1
local qg=Upper(g1)
return lr,qg,lb
end

```

* BlueU

```
BlueU=function(r1,g1,b1,r2,g2,b2)
local lr=r1
local lg=g1
local qb=Upper(b1)
return lr,lg,qb
end

```

* 7:AllL

```
AllL=function(r1,g1,b1,r2,g2,b2)
local qr=Lower(r1)
local qg=Lower(g1)
local qb=Lower(b1)
return qr,qg,qb
end

```

* 8:AllU

```
AllU=function(r1,g1,b1,r2,g2,b2)
local qr=Upper(r1)
local qg=Upper(g1)
local qb=Upper(b1)
return qr,qg,qb
end

```

* 9:MiddleL

```
MiddleL=function(r1,g1,b1,r2,g2,b2)
local t={r1,g1,b1,0,1,2}
t=HiToLoLT(t)
t[0],t[1],t[2]=PMit(t[0],t[1],t[2],1)
t[1]=Lower(t[1])
local r,g,b=t[3],t[4],t[5]
return n[r],n[g],n[b]
end

```

* 10:MiddleU

```
MiddleU=function(r1,g1,b1,r2,g2,b2)
local t={r1,g1,b1,0,1,2}
t=HiToLoLT(t)
t[0],t[1],t[2]=PMit(t[0],t[1],t[2],1)
t[1]=Upper(t[1])
local r,g,b=t[3],t[4],t[5]
return t[r],t[g],t[b]
end

```

### bitenc(Rikkyブレンド)

#### タイプ

* 1:LowRed

```
LowRed=function(r1,g1,b1,r2,g2,b2)
local lg=g2
local lb=b2
local qr=Lower(r2)
return qr,lg,lb
end

```

* 2:LowGreen

```
LowGreen=function(r1,g1,b1,r2,g2,b2)
local lr=r2
local lb=b2
local qg=Lower(g2)
return lr,qg,lb
end

```

* 3:LowBlue

```
LowBlue=function(r1,g1,b1,r2,g2,b2)
local lr=r2
local lg=g2
local qb=Lower(b2)
return lr,lg,qb
end

```

* 4:HiRed

```
HiRed=function(r1,g1,b1,r2,g2,b2)
local lg=g2
local lb=b2
local qr=Upper(r2)
return qr,lg,lb
end

```

* 5:HiGreen

```
HiGreen=function(r1,g1,b1,r2,g2,b2)
local lr=r2
local lb=b2
local qg=Upper(g2)
return lr,qg,lb
end

```

* 6:HiBlue

```
HiBlue=function(r1,g1,b1,r2,g2,b2)
local lr=r2
local lg=g2
local qb=Upper(b2)
return lr,lg,qb
end

```

* 7:AllL

```
AllL=function(r1,g1,b1,r2,g2,b2)
local qr=Lower(r2)
local qg=Lower(g2)
local qb=Lower(b2)
return qr,qg,qb
end

```

* 8:AllU

```
AllU=function(r1,g1,b1,r2,g2,b2)
local qr=Upper(r2)
local qg=Upper(g2)
local qb=Upper(b2)
return qr,qg,qb
end

```

* 9:MiddleL

```
MiddleL=function(r1,g1,b1,r2,g2,b2)
local t={r2,g2,b2,0,1,2}
t=HiToLoLT(t)
t[1]=Lower(t[1])
local r,g,b=t[3],t[4],t[5]
return t[r],t[g],t[b]
end

```

* 10:MiddleU

```
MiddleU=function(r1,g1,b1,r2,g2,b2)
local t={r2,g2,b2,0,1,2}
t=HiToLoLT(t)
t[1]=Upper(t[1])
local r,g,b=t[3],t[4],t[5]
return t[r],t[g],t[b]
end

```

### bitupwrite(Rikkyブレンド)

#### タイプ

* 1:Red

```
Red=function(r1,g1,b1,r2,g2,b2)
local lg=g2
local lb=b2
local qr=Lower(r1,r2)
return qr,lg,lb
end

```

* 2:Green

```
Green=function(r1,g1,b1,r2,g2,b2)
local lr=r2
local lb=b2
local qg=Lower(g1,g2)
return lr,qg,lb
end

```

* 3:Blue

```
Blue=function(r1,g1,b1,r2,g2,b2)
local lr=r2
local lg=g2
local qb=Lower(b1,b2)
return lr,lg,qb
end

```

* 4:All

```
All=function(r1,g1,b1,r2,g2,b2)
local qr=Lower(r1,r2)
local qg=Lower(g1,g2)
local qb=Lower(b1,b2)
return qr,qg,qb
end

```

* 5:Middle

```
Middle=function(r1,g1,b1,r2,g2,b2)
local t={}
function Swap(n1,n2,n3,n4,n5,n6)
	return n2,n1,n4,n3,n6,n5
end
	t[0],t[1],t[2],t[3],t[4],t[5],t[6],t[7],t[8]=r2,g2,b2,0,1,2,r1,g1,b1
	--345でどこに格納されているのか分かります。
	if t[0]<t[1] then
		t[0],t[1],t[3],t[4],t[6],t[7]=Swap(t[0],t[1],t[3],t[4],t[6],t[7])
	end
	if t[1]<t[2] then
		t[0],t[1],t[3],t[4],t[6],t[7]=Swap(t[0],t[1],t[3],t[4],t[6],t[7])
		if t[0]<t[1] then
			t[0],t[1],t[3],t[4],t[6],t[7]=Swap(t[0],t[1],t[3],t[4],t[6],t[7])
		end
	end
	t[0],t[1],t[2]=PMit(t[0],t[1],t[2],p)
	t[1]=Lower(t[7],t[1])
	local r,g,b=t[3],t[4],t[5]
	return t[r],t[g],t[b]
end

```

### bitdec(Rikkyブレンド)

#### タイプ

* 1:Red

```
Red=function(r1,g1,b1,r2,g2,b2)
local lg=g1
local lb=b1
local qr=Lower(r1)
return qr,lg,lb
end

```

* 2:Green

```
Green=function(r1,g1,b1,r2,g2,b2)
local lr=r1
local lb=b1
local qg=Lower(g1)
return lr,qg,lb
end

```

* 3:Blue

```
Blue=function(r1,g1,b1,r2,g2,b2)
local lr=r1
local lg=g1
local qb=Lower(b1)
return lr,lg,qb
end

```

* 4:All

```
All=function(r1,g1,b1,r2,g2,b2)
local qr=Lower(r1)
local qg=Lower(g1)
local qb=Lower(b1)
return qr,qg,qb
end

```

* 5:Middle

```
Middle=function(r1,g1,b1,r2,g2,b2)
local na,nb,nc=HiToLo(r1,g1,b1)
nb=Lower(nb)
return nb,nb,nb
end

```

### PMAvgUtil(Rikkyブレンド)

#### タイプ

* 1:HTLRGB

```
HTLRGB=function(r1,g1,b1,r2,g2,b2)
local nh,nm,nl=HiToLo(r1,g1,b1)
return nh,nm,nl
end

```

* 2:DefMiddle

```
DefMiddle=function(r1,g1,b1,r2,g2,b2)
local na,nb,nc=HiToLo(r1,g1,b1)
local nh,nl=Calc(na-nb),Calc(nb-nc)
return nh,nb,nl
end

```

* 3:AvgMiddle

```
AvgMiddle=function(r1,g1,b1,r2,g2,b2)
local na,nb,nc=HiToLo(r1,g1,b1)
local np=Calc((na+nc)/2-nb)
return np,np,np
end

```

## 使い方

こちらステガノグラフィ専用ブレンドです(Youtubeに投稿できない代物です)。Aviutl上でpngを出力するプラグインと合わせて使います。