關於BMP轉logo

Butler99

請問大家layout logo是怎麽做得，感覺BMP 單色位轉成layout效果不好，如果采用這個方法要每個字母做成一個cell，然後還要load一個可以自動縮放的script，而且轉成單色位圖片會有很嚴重的毛邊，轉出來會很難看，所以是怎麽做比較好
, ~( i9 x' u6 j0 v$ s) j% N
5 f9 c' l, r, G以下是skill
let((win cv bmpfile bmpSize WORD Wnum number Grid Layer row column max_column
6 j' ^3 o  R( \9 S& {/ d+ c        i dot x y signature offset width height pixel ImageSize )
, C* G7 P2 V4 B" K
  Z' w( n5 @9 U. h9 c        win = hiGetCurrentWindow()
4 Y0 S7 n% Z8 P$ C        cv = getEditRep(win)

& f. J: ]8 r1 B        bmpfile = "~/number_mini.bmp"                        ;;; Input BMP File
4 i1 F# ], ^% O% F        Layer = list("TTOPME" "drawing")        ;;; Output Layer
4 U9 q" E* G6 d) k' l) e9 t: s        Grid = 1                                ;;; Rectangle Size
  f1 ^4 |0 e9 O+ @4 c  o        column = 0

1 g+ k* g( l4 l7 H' Eprocedure(MessageForm(text)
    prog( ()
        hiDisplayAppDBox(
. Z; o# J" n; C: D                ?name 'JWDBox_Message
% y. a4 K2 ?/ w/ h* ]$ w8 Q7 \                ?dboxBanner "Message!!"
                ?buttonLayout 'Close
5 ?6 E& Q, ?4 `+ o4 k4 F                ?dboxText text
        )
    );prog
# T. b0 Z) T. P: a. W$ W);procedure

5 a) E* ?6 \/ L* u$ S2 U;Read BMP file
4 Y8 b( `' b6 F- X. ~- e" v        if(InFile = infile(bmpfile) then
                bmpSize = fileLength(bmpfile)
                declare(WORD[bmpSize])
                for(Wnum 0 bmpSize-1        WORD[Wnum] = charToInt(getc(InFile)) )
- F( P: Y# J- `$ m                close(InFile)
        else
9 f; G4 T' p) T* S1 w, ]( G                MessageForm("Input file does not exist!")
, z3 E( s+ j0 I, x                return()
        )

. {& J8 h5 I7 ^% q! D4 l' ]  |        sprintf(signature "%02x%02x" WORD[0] WORD[1])
        offset = (WORD[0x0d]<<24) + (WORD[0x0c]<<16) + (WORD[0x0b]<<8) + WORD[0x0a]
        width  = (WORD[0x15]<<24) + (WORD[0x14]<<16) + (WORD[0x13]<<8) + WORD[0x12]
5 M5 h0 j1 M* |" D* e% ?        height = (WORD[0x19]<<24) + (WORD[0x18]<<16) + (WORD[0x17]<<8) + WORD[0x16]
4 f3 U( K% {) }3 e3 [: j% {: H        pixel  = (WORD[0x1d]<<8) + WORD[0x1c]
        ImageSize = (WORD[0x25]<<24) + (WORD[0x24]<<16) + (WORD[0x23]<<8) + WORD[0x22]
: j: Z5 W' l+ a+ K& y5 l7 j
        printf("--- BMP2LAY Start --- %L\n" getCurrentTime())
        printf("offset  : 0x%x \n" offset)
$ }+ \, Z0 S# X1 ~3 }6 E        printf("width   : 0x%x \n" width)
: L9 H6 L  u  a- G$ M* s8 K; h        printf("height  : 0x%x \n" height)
        printf("ImgSize : 0x%x \n" ImageSize)
3 s- c0 s9 K0 r% @  D8 Y
;check bmp file
1 k. E+ h- E7 ~! Y6 r. r% B2 \: i  V        if(!equal(signature "424d") then
3 @. [/ q7 \( c# T                MessageForm("*ERROR* Standard Input is not a BMP file")
( Z# Y8 Q7 ^7 a                return()
) F/ n0 e! {- I2 u) ~* Z        )

;check mono bmp file
. {/ R" G8 K' V9 @        if(!equal(pixel 0x01) then
                MessageForm("*ERROR* only supports mono bmp files")
" {- ?) B8 r% ~) G! a                return()
5 Y* y" n, C6 t+ \7 e        )
* p  h" t2 g4 _* E; o. C+ C
;BMP2LAY
8 d* i7 ]' ]1 ^$ q/ b5 d% e* s; w1 m        max_column = ImageSize/height<<3
        number = offset+ImageSize-1

: Q$ U( i) Y1 U# K* }' J. R        for(Wnum offset number
                row = fix((Wnum-offset)/(max_column>>3))
                y = Grid*row

                for(i 0 7
8 {* o( V1 h6 x0 L                        dot = bitfield1(WORD[Wnum] 7-i)                ; bit<7> ~ bit<0>
                        x = Grid*column
                        if(zerop(dot) && column<width then
                                geSelectObject(dbCreateRect(cv Layer list(x:y x+Grid:y+Grid)))
                        )
% W' G: ~, @  w0 I& d                        column++
                );for
                if(equal(column max_column)        column=0)
                Wnum++
! Y; _' @5 Y2 s. f7 V0 r9 ?6 }8 o        );for

        hiZoomIn(win list(-10:-10 x+10:y+10))
$ |. w; j9 Y) e; D# X        printf("--- BMP2LAY End ----- %L\nt\n" getCurrentTime())
);let
% K& g- }# s5 X# R; O/ H  m
8 R0 E) |) \3 C6 F& P