panel.rar

Genesis自动化程序

#!/bin/csh
###########################################
#                                         #
#        您想学Genesis2000吗？             #            
#        您想学Cshell编程吗？              #             
#        您的公司需要自动化程序吗？         #             
#        欢迎致电：                        #            
#                1582 0769 989            #
#                                         #
###########################################

alias cdgs 'cd /genesis/sys/scripts'
alias cdgf 'cd /genesis/fw/lib/forms'
alias cdgh 'cd /genesis/sys/hooks'
alias kit 'cd ${GENESIS_DIR}/kit.dir ; ${GENESIS_DIR}/e${GENESIS_VER}/misc/kit &'
alias dbutil '${GENESIS_DIR}/e${GENESIS_VER}/misc/dbutil \!:*'

set GENESIS_VER = `echo ${GENESIS_VER} | cut -c 1-2`
alias gui ${GENESIS_DIR}/e${GENESIS_VER}/all/gui
alias gui_out 'echo \!:* >> $GUI_DEF_FILE'
alias gui_list 'cat \!:* >> $GUI_DEF_FILE'
alias guiout 'touch $GUI_DEF_FILE; echo \!:* >> $GUI_DEF_FILE'
alias dogui '$GUI <$GUI_DEF_FILE >$GUI_DAT_FILE; source $GUI_DAT_FILE;rm $GUI_DAT_FILE $GUI_DEF_FILE'

set GUI  = /genesis/e$GENESIS_VER/all/gui
set GUI_DEF_FILE = /tmp/gui_def_$$
set GUI_DAT_FILE = /tmp/gui_dat_$$
set GUI_DAD_FILE = ${GENESIS_DIR}/e${GENESIS_VER}/nt


##############################################

alias ls 'ls -F'
alias lsa 'ls -a'
alias lsl 'ls -l'
alias h history
##############################################


        
   gui_out WIN 300 300
   gui_out FONT tbi18
   gui_out FG 000000
   gui_out BG 990099
   gui_out LABEL @886.xpm
   dogui

   gui_out WIN 300 300
   gui_out FONT tbi18
   gui_out FG 000000
   gui_out BG 990099
   gui_out LABEL @8861.xpm
   dogui
   
   gui_out WIN 300 300
   gui_out FONT tbi18
   gui_out FG 000000
   gui_out BG 990099
   gui_out LABEL @8862.xpm
   dogui
   
   gui_out WIN 300 300
   gui_out FONT tbi18
   gui_out FG 000000
   gui_out BG 990099
   gui_out LABEL @8863.xpm
   dogui

   gui_out WIN 300 300
   gui_out FONT tbi18
   gui_out FG 000000
   gui_out BG 990099
   gui_out LABEL @8864.xpm
   dogui