阿根的Blog

没有恒心的家伙!哎!

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

COM output_layer_reset
    COM output_layer_set,layer=$lay,angle=0,mirror=no,x_scale=1,y_scale=1,\
        comp=0,polarity=positive,setupfile=,setupfiletmp=,line_units=inch,gscl_file=
    SU_ON   
    COM skip_next_pre_hook
    COM output,job=$job,step=$step,format=PostScript,dir_path=$_DIR,prefix=,\
        suffix=,break_sr=yes,break_symbols=yes,break_arc=yes,scale_mode=all,\
        surface_mode=contour,min_brush=0.2,x_anchor=0,y_anchor=0,x_offset=0,\
        y_offset=0,line_units=inch,override_online=yes,params_opt=yes,\
        orientation=automatic,title_opt=fix+auto,title=$title,size_mode=$_PAPER,\
        width=0,height=0,scale=0,output_files=multiple
    SU_OFF
end
# ====================
# PS convert PDF Format
# ====================

if ( -e ${_DIR}/${job}.ps ) /bin/rm -f ${_DIR}/${job}.ps
foreach lay ($layer)
    if ( -e ${_DIR}/$lay ) then
        cat ${_DIR}/$lay >> ${_DIR}/${job}.ps
        /bin/rm -f ${_DIR}/$lay
    endif
end

 

 

    if ( -e /opt/gs-5.10/bin/gs ) then
        if ( -e ${PDFDIR}/${job}.pdf ) /bin/rm -f ${PDFDIR}/${job}.pdf
        /opt/gs-5.10/bin/gs -dNOPAUSE -dBATCH -sDEVICE=pdfwrite -sOutputFile=${PDFDIR}/${job}.pdf \
                         -sPAPERSIZE=$_paper -c save pop -f ${_DIR}/${job}.ps
        chmod a+rw ${PDFDIR}/${job}.pdf
        mv ${PDFDIR}/${job}.pdf /wf_img
    else
        PAUSE system call error
        exit
    endif

posted on 2005-12-20 15:34  阿根  阅读(146)  评论(0编辑  收藏  举报