창조유저그룹-커즈닷컴

기타자료실
- '창조'로 제작하지 않은 프로그램이나, '창조'와 관련된 프로그램들을 올리는 곳입니다.
- 첨부가능 확장자는 *.zip,*.rar,*.exe,*.jpg,*.gif,*.png 입니다.

LIST ALL

Posted by 성인e

2009-10-29 22:07:55, Hit : 5553

[re] 비트맵 이미지 회전

File #1 : 회전.exe (734.7 KB) Download : 130

File #2 : abc.png (20.5 KB) Download : 76

Post URL : http://cugz.sjworks.net/bbs/zboard.php?id=pds_etc&no=906

위 : 원본
가운데 : 고블러
아래 : 현블러

블러를 더욱 자연스럽게 고쳤습니다.

블러 연산 :

실수:단위[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]);