제목 : 허르미 2.0 - Hercules [3] 안녕하세요 허르미입니다. 오늘은 전강좌에서 예고했던 대로 박스칠하기와 가로선긋기,세로선긋기,스크롤 업의 소스를 보기로 하겠읍니다. 우선 박스칠하기입니다. 군데군데 주석을 달 도록 하겠읍니다. 참고하세요. void hercfill(int x1,int y1,int x2,int y2,int color) { // hgGetHFillXPattern 함수는 x pattern 을 돌려줌 unsigned x_width=x2-x1+1; // x width unsigned y_width=y2-y1+1; // y width unsigned char xpattern=hgGetHFillXPattern(color); unsigned char ypattern=hgGetHFillYPattern(color); _BX=ret_herc_offset(y1)+x1; // offset 계산 asm push ds asm push es asm mov ax,0b000h // segment Setting asm mov ds,ax asm mov es,ax asm mov cx,y_width // 반복 횟수 asm mov al,BYTE PTR xpattern // pattern load asm mov dl,BYTE PTR ypattern // 일단 y pattern 을 한번 Rotate 합니다. asm ror dl,1 // first bit must be 0,so pass. boxlp1: asm push cx asm mov cx,x_width asm mov di,bx <- bx -> di asm cld boxlp2: asm REP stosb hercadd(); <- offset 증가 noad: asm rol al,1 <- x pattern rotate asm cmp al,0 <- xpattern 이 0 이면 asm je nost 넘어간다. ( ymask 의 비트가 0 인경우 ) asm mov BYTE PTR xpattern,al nost: asm pop cx asm push cx ypat(xpattern); <- ypattern 처리 asm pop cx boxn1: asm loop boxlp1 asm pop es asm pop ds } void hsidefill(int x,int y1,int y2,unsigned char color,unsigned char ma sk) { unsigned char xpattern=hgGetHFillXPattern(color); unsigned char ypattern=hgGetHFillYPattern(color); _BX=ret_herc_offset(y1)+x; _CX=y2-y1+1; asm mov ax,0b000h asm mov es,ax asm mov al,BYTE PTR xpattern // xpattern load asm mov ah,al asm mov dh,BYTE PTR mask asm and ah,dh // masking asm mov dl,BYTE PTR ypattern // ypattern load asm rol dl,1 sfill: asm not dh // 쓰기작업..! asm and es:[bx],dh // 전 강좌를 참고 asm not dh // 하세요. asm or es:[bx],ah // asm rol al,1 // xpattern rotate asm cmp al,0 // al is 0 ? asm je nost asm mov BYTE PTR xpattern,al nost: hercadd(); asm push cx ypat(xpattern); asm pop cx asm mov ah,al asm and ah,dh asm loop sfill } void hgHBoxFill(int x1,int y1,int x2,int y2,int color) { int xs=x1/8+1; int xe=x2/8-1; unsigned char rmask=~get_mask(x2+1); if (!rmask) rmask=0xff; hercfill(xs,y1,xe,y2,color); hsidefill(xs-1,y1,y2,color,get_mask(x1)); hsidefill(xe+1,y1,y2,color,rmask); } 소스중에서 설명을 아직 안한 부분이 있는데.. ypat() 이란 부분 과 hercadd() 란 부분,그리고 al 이 0 일때의 처리가 있는데.. 일단 하나씩 살펴봅시다. void hercadd() { asm add bx,02000h asm cmp bx,08000h asm jb noadd asm sub bx,07fb0h noadd: return; } hercadd 는 다른게 아니고 bx 가 주소를 가리킬때 한줄 내린 옵 셋으로 만들어 주는 함수입니다. 허큘레스에서 한줄 내릴때 사용 합니다. 주소는 보통 si,di 를 사용하지만 movsb 등에 의해서 자 동으로 변하므로 bx,dx 에 그 값을 보존해 놓습니다. 따라서 hercsub(),hercadd_dx(),hercsub_dx() 와 같은 함수들도 있읍니 다. void ypat(int xpat) { asm rol dl,1 asm jc noad3 asm mov al,0 return; noad3: asm mov al,BYTE PTR xpat return; } ypat 은 xpat 을 입력을 받고 있읍니다. dl 레지스터에는 ypattern 의 값이 들어있는데 이를 왼쪽으로 로테이트해보아서 Carry 가 발생하면..즉 그 비트가 1 이면 al (쓸 데이터) 레지스 터에는 xpat (X pattern) 의 값을 넣고.. 아니면 0 을 넣어 줍니 다. 아까 루틴에서 al 이 0 이면 xpattern 의 초기화 루틴을 건 너뛰는 것을 보았읍니다. al 은 하나씩 rotate 되는데 xpattern 의 값에 rotate 되는 al 의 값을 계속적으로 대치해야 ypat 이 올바르게 동작할 것입니다. 이때 al 이 0 이면 xpattern 자체를 0 으로 대치하게 되므로 그 다음의 처리를 계속해 나갈 수가 없 게 됩니다. 따라서 al 이 0 인경우는 xpattern 에 변한 al 의 값 을 넣어주는 것을 하지 않는 것입니다. 그다음은 가로선 긋기입니다. void hbyteline(int x1,int x2,int y,char color) { unsigned char xpattern=hgGetHlinePattern(color); _DI=ret_herc_offset(y)+x1; _CX=x2-x1+1; asm mov ax,0b000h asm mov es,ax asm mov al,BYTE PTR xpattern; // x pattern load asm REP stosb // 전송 } void hsideline(int x,int y,char color,unsigned char mask) { unsigned char xpattern=hgGetHlinePattern(color); _BX=ret_herc_offset(y)+x; asm mov ax,0b000h asm mov es,ax asm mov ah,BYTE PTR xpattern asm mov al,BYTE PTR mask asm and ah,al // masking asm not al // reverse bitmask asm and es:[bx],al // 화면과 and asm or es:[bx],ah // 쓰기. } hbyteline 은 매우 단순한 처리를 합니다. al 에 xpattern 을 로 드하고 stosb 로 x2-x1+1 만큼을 전송하면 됩니다. hsideline 도 전강좌의 내용을 이해했다면 그대로 그 루틴을 쓴 것이라는 것을 알게 될 겁니다. void hvertline(int x,int y1,int y2,char color,unsigned char mask) { unsigned char ypattern=hgGetVlinePattern(color); _BX=ret_herc_offset(y1)+x; _CX=y2-y1+1; asm mov ax,0b000h asm mov es,ax asm mov dl,BYTE PTR ypattern asm mov al,BYTE PTR mask bfill: asm cmp dl,0 // ypattern 이 0 인 경우 asm jnz bnext asm not al // reverse mask asm and es:[bx],al // 화면과 and asm not al // reverse mask hercadd(); asm jmp bnext2 bnext: asm or es:[bx],al // ypattern 이 0 이 아니면 hercadd(); // 그냥 화면과 and 한다. asm push cx ypat(mask); // ypattern 처리 asm pop cx bnext2: asm loop bfill } ypattern 의 경우 계산되어 넘겨져온 mask 를 세로로 쭉 출력하 기만 하면 됩니다. 예를 들면 00001000 처럼 넘겨져 오면 이것을 세로로 화면에 OR 하면 되는데.. 단지 특별한 것은 hputche 의 경우처럼 검은색 선을 그릴수가 없다는 데 있읍니다. 따라서 ypattern 이 0 인 경우를 특별히 검은선으로 정의했읍니다. ypattern 이 0 이 아니면 그냥 OR 하고 0 이면 mask 를 reverse 하여 (11110111 이 됨.위의 경우) 이것을 화면과 OR 하면 mask 에서 0 인곳은 화면이 0 으로 되고(검게쓰여짐) 나머지는 화면그 대로 남아있게 됩니다. 따라서 검은 선으로 그릴수가 있는 것이 죠. 그럼 완성된 함수입니다. void hgHhline(int x1,int x2,int y,char color) { int xs; int xe; x2++; xs=x1/8+1; xe=x2/8-1; hbyteline(xs,xe,y,color); hsideline(xs-1,y,color,get_mask(x1)); hsideline(xe+1,y,color,~get_mask(x2)); } void hgHvline(int x,int y1,int y2,char color) { hvertline(x>>3,y1,y2,color,get_vmask(x)); } 마지막으로 스크롤업을 보겠읍니다. 스크롤의 일반적 허르미 1.0 에서의 강좌나 VGA 스크롤 부분을 보시기 바랍니다. 여기에서는 특별한 점만을 보겠읍니다. void hercscrup(int x1,int y1,int x2,int y2,int lines) { unsigned x_width=x2-x1+1; _BX=ret_herc_offset(y1)+x1; // 목적 주소 계산 _CX=y2-y1-lines+1; // y 반복횟수 asm push ds asm push es asm push cx // 일단 cx 저장 asm mov ax,0b000h // segment set asm mov es,ax asm mov ds,ax asm mov dx,bx // 일단 소스<-목적 asm mov cx,WORD PTR lines // 여기는 dx 를 // 아래로 uplp0: hercadd_dx(); // n line 내려줍 asm loop uplp0 // 니다. asm pop cx // 다시 cx 복귀 uplp2: asm push cx asm mov di,bx // di <- bx.. Destination asm mov si,dx // si <- dx.. Source _CX=x_width; // 전송량 asm cld uplp1: asm REP movsb // 전송! hercadd(); // bx 를 한라인 내림 hercadd_dx(); // dx 를 한라인 내림 asm pop cx asm loop uplp2 asm pop es asm pop ds } void hercsideup(int x,int y1,int y2,int lines,unsigned char mask) { unsigned char tmask=mask; _BX=ret_herc_offset(y1)+x; _CX=y2-y1-lines+1; asm push ds asm push es asm push cx // cx 저장 asm mov ax,0b000h // segment set asm mov es,ax asm mov ds,ax asm mov dx,bx // 일단 dx<-bx asm mov cx,WORD PTR lines // dx 를 lines uplp3: hercadd_dx(); // 만큼 아래로 asm loop uplp3 // 내림 asm pop cx // cx 복귀 asm mov al,BYTE PTR tmask // al is bitmask uplp2: asm push cx asm mov di,bx // di <- bx,destination asm mov si,dx // si <- dx,source asm mov ah,ds:[si] // 소스에서 읽어옴 asm and ah,al // masking asm not al // reverse bitmask asm and es:[di],al // 화면과 and asm not al // reverse bitmask asm or es:[di],ah // 실제로 씀(OR) hercadd(); // bx 내리기 hercadd_dx(); // dx 내리기 asm pop cx asm loop uplp2 asm pop es asm pop ds } void hgHScrUp(int x1,int y1,int x2,int y2,int lines,int bkcolor) { int xs=x1/8+1; int xe=x2/8-1; unsigned char rmask=~get_mask(x2+1); if (!rmask) rmask=0xff; hercscrup(xs,y1,xe,y2,lines); hercsideup(xs-1,y1,y2,lines,get_mask(x1)); hercsideup(xe+1,y1,y2,lines,rmask); hgHBoxFill(x1,y2-lines+1,x2,y2,bkcolor); } hercadd_dx() 함수가 처음 나오는데.. hercadd() 함수의 내용에 서 레지스터만 dx 로 바꾸면 됩니다. hercsideup 함수를 보면 전강좌에서 설명한 바와 같이 mask 를 reverse 하여 화면과 and 시키는 등의 작업으로 스크롤을 수행하 고 있읍니다. 이의 원리는 전강좌를 참고하도록 하세요. 그럼.. 다음 강좌는 Hercules 에서 쓰이는 Image 루틴에 대한 강좌를 간 단하게 해보도록 하겠읍니다. 허르미!