위 : 원본 가운데 : 고블러 아래 : 현블러
블러를 더욱 자연스럽게 고쳤습니다.
블러 연산 :
실수:단위[2],거뤼[2][2]; 단위[0]:=소수추출(c); 단위[1]:=소수추출(d); 거뤼[0][0]:=제곱근(제곱(단위[0],2)+제곱(단위[1],2)); 거뤼[0][1]:=제곱근(제곱(단위[0],2)+제곱(1-단위[1],2)); 거뤼[1][0]:=제곱근(제곱(1-단위[0],2)+제곱(단위[1],2)); 거뤼[1][1]:=제곱근(제곱(1-단위[0],2)+제곱(1-단위[1],2)); 실수:색[2][2],빨[3][2],초[3][2],파[3][2],전거리; 색[0][0]:=t.배경.붓.색상; 색[0][1]:=t.배경.붓.색상; 색[1][0]:=t.배경.붓.색상; 색[1][1]:=t.배경.붓.색상; c:=소반올림(c); d:=소반올림(d); 만일(c>=0) 만일(c<폭) 만일(d>=0) 만일(d<높) 색[0][0]:=o.배경.점제어(c,d,-1);// 만일(c>=0) 만일(c<폭) 만일(d+1>=0) 만일(d+1<높) 색[0][1]:=o.배경.점제어(c,d+1,-1);// 만일(c+1>=0) 만일(c+1<폭) 만일(d>=0) 만일(d<높) 색[1][0]:=o.배경.점제어(c+1,d,-1);// 만일(c+1>=0) 만일(c+1<폭) 만일(d+1>=0) 만일(d+1<높) 색[1][1]:=o.배경.점제어(c+1,d+1,-1);// // 빨[0][0]:=band(색[0][0],255); 빨[0][1]:=band(색[0][1],255); 빨[1][0]:=band(색[1][0],255); 빨[1][1]:=band(색[1][1],255); 초[0][0]:=band(shr(색[0][0],8),255); 초[0][1]:=band(shr(색[0][1],8),255); 초[1][0]:=band(shr(색[1][0],8),255); 초[1][1]:=band(shr(색[1][1],8),255); 파[0][0]:=band(shr(색[0][0],16),255); 파[0][1]:=band(shr(색[0][1],16),255); 파[1][0]:=band(shr(색[1][0],16),255); 파[1][1]:=band(shr(색[1][1],16),255); // 실수:전거[2]; 빨[2][0]:=빨[0][0]*거뤼[0][1]+빨[0][1]*거뤼[0][0]; 초[2][0]:=초[0][0]*거뤼[0][1]+초[0][1]*거뤼[0][0]; 파[2][0]:=파[0][0]*거뤼[0][1]+파[0][1]*거뤼[0][0]; 전거[0]:=거뤼[0][0]+거뤼[0][1]; 빨[2][0]:=빨[2][0]/전거[0]; 초[2][0]:=초[2][0]/전거[0]; 파[2][0]:=파[2][0]/전거[0]; // 빨[2][1]:=빨[1][0]*거뤼[1][1]+빨[1][1]*거뤼[1][0]; 초[2][1]:=초[1][0]*거뤼[1][1]+초[1][1]*거뤼[1][0]; 파[2][1]:=파[1][0]*거뤼[1][1]+파[1][1]*거뤼[1][0]; 전거[1]:=거뤼[1][0]+거뤼[1][1]; 빨[2][1]:=빨[2][1]/전거[1]; 초[2][1]:=초[2][1]/전거[1]; 파[2][1]:=파[2][1]/전거[1]; // 빨[2][0]:=빨[2][0]*전거[1]+빨[2][1]*전거[0]; 초[2][0]:=초[2][0]*전거[1]+초[2][1]*전거[0]; 파[2][0]:=파[2][0]*전거[1]+파[2][1]*전거[0]; 전거리:=전거[0]+전거[1]; 빨[2][0]:=빨[2][0]/전거리; 초[2][0]:=초[2][0]/전거리; 파[2][0]:=파[2][0]/전거리; 색솽:=rgb(빨[2][0],초[2][0],파[2][0]); |
|
|