M EQU Byte Ptr 0[BX] title 'pathxly - Hatch and Pattern Fill bitmask' ; ; Digital Research, Inc. ; Revision : Sept 06, 1983 ; File PATHXLY.A86 Version 1.0 ;====> High X, Low Y resolution ; Fill Pattern Mask : high X resolution (Greater than 144 Dots per Inch) ; Normal Y resolution (72 Dots per Inch) public patmask DGROUP GROUP DATA dseg patmask db 11111111b ; Solid fill Pattern db 11111111b db 11111111b db 11111111b db 11111111b db 11111111b db 11111111b db 11111111b ; Hatch Fill bitMasks db 10000000b ; 1 - Wide Vertical Hatch pattern for db 10000000b ; High resolution, X > = 144 dpi db 10000000b db 10000000b db 10000000b db 10000000b db 10000000b db 10000000b db 11111111b ; 2 - Horizontal Hatch db 00000000b db 00000000b db 00000000b db 11111111b ; Horizontal Hatch db 00000000b db 00000000b db 00000000b db 00000001b ; 3 - + 45 Cross Hatch db 00000010b db 00000100b db 00001000b db 00010000b db 00100000b db 01000000b db 10000000b db 10000000b ; 4 - - 45 Cross Hatch db 01000000b db 00100000b db 00010000b db 00001000b db 00000100b db 00000010b db 00000001b db 11111111b ; 5 - Square Cross Hatch db 10000000b db 10000000b db 10000000b db 11111111b db 10000000b db 10000000b db 10000000b db 10000001b ; 6 - Cross Hatch db 01000010b db 00100100b db 00011000b db 00011000b db 00100100b db 01000010b db 10000001b ; Pattern Fill bitMasks : defined to simulate 6 levels of intensities db 10000000b ; Intensity level 1 db 00000000b db 00000000b db 00000000b db 00000000b db 00000000b db 00000000b db 00000001b db 00000010b ; Intensity level 2 db 00000000b db 00100000b db 00000000b db 00000010b db 00000000b db 00100000b db 00000000b ; db 00000000b ; Intensity level 3 db 00100010b db 00000000b db 10001000b db 00000000b db 00100010b db 00000000b db 10001000b ; db 10001000b ; 22H, Intensity level 4 db 00100010b db 10001000b db 00100010b db 10001000b db 00100010b db 10001000b db 00100010b ; db 00010001b ; Intensity Level 5 db 10101010b db 01000100b db 10101010b db 00010001b db 10101010b db 01000100b db 10101010b ; ;db 10101010b ; Level 5 ;db 11001100b ;db 01010101b ;db 00110011b ;db 10101010b ;db 11001100b ;db 01010101b ;db 01100110b ; db 01010101b ; Level 6 db 10101010b db 01010101b db 10101010b db 01010101b db 10101010b db 01010101b db 10101010b END