- 积分
- 905
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2012-7-22
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
# function to display label at the up left corner of a displayed picture
# by GaoWL ,2015.12.18
function main(args)
if(args='')
say 'please input the letter of the label'
pull lab
else
lab=args
endif
'set strsiz 0.3'
w = 0.5
h = 0.65
'q gxinfo'
line3=sublin(result,3)
line4=sublin(result,4)
x=subwrd(line3,4)
y=subwrd(line4,6)
'set line 0'
'draw recf 'x' '%(y-h)%' '%(x+w)%' 'y
'set line 1 '
'draw rec 'x' '%(y-h)%' '%(x+w)%' 'y
'set string 1 c 7'
'draw string '%(x+w/2)%' '%(y-h/2+0.05)%' `'1lab
return
|
评分
-
查看全部评分
|