關於BMP轉logo

Butler99

請問大家layout logo是怎麽做得，感覺BMP 單色位轉成layout效果不好，如果采用這個方法要每個字母做成一個cell，然後還要load一個可以自動縮放的script，而且轉成單色位圖片會有很嚴重的毛邊，轉出來會很難看，所以是怎麽做比較好
) w. t9 Q8 u" b" W/ q7 p: R
以下是skill
" M% _" M7 V/ }! v& W9 W  Klet((win cv bmpfile bmpSize WORD Wnum number Grid Layer row column max_column
9 m5 m( J: a  P+ X1 O. [9 |        i dot x y signature offset width height pixel ImageSize )

( p9 @/ b/ y* w$ F$ O, Y        win = hiGetCurrentWindow()
( ]' T; j' c& _4 g& d" M, x5 I" l        cv = getEditRep(win)
& G5 l7 {0 H) ~/ `
# M; I6 w8 W5 A3 Y  w2 R* t        bmpfile = "~/number_mini.bmp"                        ;;; Input BMP File
        Layer = list("TTOPME" "drawing")        ;;; Output Layer
6 d) T8 W" X8 @, s- U9 w. z        Grid = 1                                ;;; Rectangle Size
        column = 0
8 F& Z$ v! X4 D# k4 H
3 Y3 L8 o2 @5 z' K' gprocedure(MessageForm(text)
    prog( ()
        hiDisplayAppDBox(
                ?name 'JWDBox_Message
                ?dboxBanner "Message!!"
; n! R: X. c+ ]) y! [2 D/ _                ?buttonLayout 'Close
                ?dboxText text
        )
    );prog
);procedure
- S2 `' B6 W0 P6 v
;Read BMP file
: a5 o( n: e7 C/ {) M8 z2 Y$ G        if(InFile = infile(bmpfile) then
                bmpSize = fileLength(bmpfile)
2 \0 C  `1 V2 P4 `" U                declare(WORD[bmpSize])
                for(Wnum 0 bmpSize-1        WORD[Wnum] = charToInt(getc(InFile)) )
  ?3 z# _2 x$ B  |8 l) J( \                close(InFile)
        else
                MessageForm("Input file does not exist!")
: M( f+ H: e. y$ h& I                return()
/ X1 T4 l" Q# j8 k# k        )
, k+ ~" o% P0 O1 J; G
        sprintf(signature "%02x%02x" WORD[0] WORD[1])
- H8 r9 m4 j! H: k! k        offset = (WORD[0x0d]<<24) + (WORD[0x0c]<<16) + (WORD[0x0b]<<8) + WORD[0x0a]
        width  = (WORD[0x15]<<24) + (WORD[0x14]<<16) + (WORD[0x13]<<8) + WORD[0x12]
2 O- x1 a4 h  Y" m# ~        height = (WORD[0x19]<<24) + (WORD[0x18]<<16) + (WORD[0x17]<<8) + WORD[0x16]
        pixel  = (WORD[0x1d]<<8) + WORD[0x1c]
2 K) y) a1 B9 I9 j% H" W9 {. q2 U        ImageSize = (WORD[0x25]<<24) + (WORD[0x24]<<16) + (WORD[0x23]<<8) + WORD[0x22]

        printf("--- BMP2LAY Start --- %L\n" getCurrentTime())
        printf("offset  : 0x%x \n" offset)
2 |! \+ Y( ]* C6 P, k        printf("width   : 0x%x \n" width)
, h  ]  V, m9 W, H, d# K: Z* {        printf("height  : 0x%x \n" height)
0 q' B, |$ X3 D/ W  M% V  `6 |        printf("ImgSize : 0x%x \n" ImageSize)

;check bmp file
7 W, A/ E$ d, o" l* z/ T  @        if(!equal(signature "424d") then
                MessageForm("*ERROR* Standard Input is not a BMP file")
                return()
0 I$ E( D; q+ j' q  X        )
# H9 n* a8 {' L6 P. ~. f0 ]
;check mono bmp file
* v$ @! T1 E7 {+ w2 C! i        if(!equal(pixel 0x01) then
, ~# ^" K: H! l& R* _2 n                MessageForm("*ERROR* only supports mono bmp files")
                return()
        )

) V$ p% b* z3 b: t* a! m5 }0 j;BMP2LAY
        max_column = ImageSize/height<<3
  k0 Y9 c" m3 U0 @        number = offset+ImageSize-1
" }5 y' n2 ]$ }/ [0 b
        for(Wnum offset number
# ?. V. q* ?& U% C3 x$ {0 Q4 v                row = fix((Wnum-offset)/(max_column>>3))
0 o+ O% C& L) k                y = Grid*row

                for(i 0 7
                        dot = bitfield1(WORD[Wnum] 7-i)                ; bit<7> ~ bit<0>
9 N3 \$ R8 J! {  W4 F                        x = Grid*column
                        if(zerop(dot) && column<width then
/ D; a: o* e( n: {                                geSelectObject(dbCreateRect(cv Layer list(x:y x+Grid:y+Grid)))
                        )
. p" J; X8 z; K" b( C                        column++
                );for
+ J4 Y" u8 X2 D8 i                if(equal(column max_column)        column=0)
# h! e, Z, j, N                Wnum++
        );for
/ v1 h( m, l: t( [. `4 u
1 E, x! v  M& c, s3 W5 k# {3 ^        hiZoomIn(win list(-10:-10 x+10:y+10))
        printf("--- BMP2LAY End ----- %L\nt\n" getCurrentTime())
; o% k5 F6 ^& ]0 o);let