
                       T O P D R A W E R
                         Version 5. 12
                              on
                           L I N U X
                          Release 1.4c
                                                           ¼ Ƿ
                                                      
                                         okamura@timshel.riken.go.jp

 ǶΥåץǡȾϡʸ

0. Introduction

 Topdrawer ϡFNAL ǳƼ UNIX Ѥ˰ܿ줿Ǥ Linux 
ư褦˽Ĥεǽĥ(?)ܤΤǤ
ܥץΰܿݼϻθĿỤ̄ǹԤäƤΤǤꡢ
ؤظθŪؤȤϲδط⤢ޤ
ޤTopdrawer Ͻե꡼եȤǤϤޤΤǤդ
ܿθˤǤ FNAL ǴƤޤΤǡfnsg01.fnal.gov 
Ͽ򤷤 (mail Ǥ) ftp Ƥ
ۤ˴ؤʸϸʤΤǡǤλѾ郎ɤʤ뤫
ʬޤ󤬡ȳؤΥեȤȤɼˤޤˤޤ
Ǥǳĥ줿ǽΰϡgnuplot ΥѤƼ¸Ƥޤ
ξڤ gnuplot κԤ˴դޤ


1. Topdrawer  --- SLAC ǡTDRVAX.EXEBonner Lab.ǡFNAL 

Topdrawer Ȥϡ SLAC  R.B. Chaffee ˤäƳȯ줿
󼡸ǡΤѥեåɽץǤ
եåΥץߥƥ֤ʬϡƱ SLAC  R.C. Beach 
ˤäƳȯ줿 UGS2 (Unified Graphics System) ȤäƤꡢ
Ͽʵ OS ưƤ褦Ǥ X Window System 
(ʲ X11 ά) Ѥ˸¤ȡVMS ǤȤޤǤX11 
ȸ C ˤ륤󥿡եѰդƤʤΤ̤Ǥ
VMS/DECwindow  Xlib ϡ͡ʸ줫ѤǤ褦ȼλͤ
ʤäƤޤ UGS2 ϥᥤʬ FORTRAN ǽ񤫤Ƥ
Τ VMS ˤץȤʤäͳȻפޤ

Ȥǡդǲ桹̾ "Topdrawer" ȸƤǤΤϡKEK 
ƣ椵һˤäƵǽĥ줿ǤǤINCLUDE ʸ䡢
ǡ isometric ɽUBCFONT ˤʸHandyPak 
ե뤬ɤ߹롢ѹäƤޤʲǤϤǤ 
¹ԥե̾˽ä TDRVAX.EXE Ȼؤˤޤ

ꥸʥ SLAC ǤФơRice University  Bonner Lab.  
J. Clement ˤä˵ǽĥ줿Ǥ¸ߤޤ桹 
"NTOP" ȸƤǶ̤ƤΤǤĥ줿Τϡǡ
͡ɽؿեåȵǽHBOOK, HandyPak Υեɤ߹ߡ
饤إפݥƥ󥰥ǥХˤɸɤߺΤβ÷
Ѥζץߥ󥰵ǽ˲ˤޤ (ޥ˥奢 
66   256 ڡޤ)ĥǽˤ VMS Υ饤֥
ȤäƤΤ¿VMS ǤưʤǤˤʤäƤޤޤޤ
SLAC Ǥδ̸ߴǤʤȤ⤢ޤʸ CASE ʸ 
UGS2 λͤȤʤäƤꡢSLAC ǤΤ褦ѴϤƤޤ

Τ褦(?)顢Topdrawer  VMS Ǥ˻ȤƤޤ
ǤǶ UNIX workstation ήԤդߤơUNIX ؤΰܿ
FNAL  A.E. Kreymer ˤäƹԤޤBonner Lab. Ǥ򸵤ˤ
AIX, IRIX, SunOS, OSF1, Ultrix (Τ HP-UX ̵) γƼ OS 
ܿޤǰʤ÷Ĥνפʵǽά
ƤޤX ʬ˴ؤƤϤۤȤɽľ줿櫓Ǥ÷
ѤͤƤʤǽ̾ǤǡʽǤȤΤ
ľʴۤǤ1995 ǯ 8 ߤǤ⡢Ǥդ 1994 ǯ 8 
ΤޤѤäƤޤΤǡԤϤޤ⤯ʤ
Τޤ

Bonner Lab. Ǥγĥǽ̤ˤƤ⡢TDRVAX.EXE ˴Ƥͤ
ȤäƤϡϤ꾯򴶤ʬȻפޤ Linux 
ܿˤäƤϡ򤷤нǤϰϤǽߤ
ޤǤ OSF1  SunOS ؤεհܿԤʤ졢ܿ
ؤޤäȻפäƤޤʳ OS ˴ؤƤϡ䤬
ѤǤĶäƤʤΤǸƼϴꤤޤ

UNIX ưѥեåեȤȸ gnuplot ͭ̾ǡ
ºݹȤƤΤȻפޤθĿŪʹߤС
Topdrawer ΤƤΤǤϤʤȻפޤ (ޤӤȤƤǤ)
Topdrawer ϡˤ̤ '70 ǯˤޤãſȤץ
ǡǯΥեåץ˸ڤ䤫Ϥ
󤬡γҡҳ˼¸ǡɽŪȤƳȯ줿
եȤǤꡢǽŪʸ˷ǺܲǽʼνϤȤ
ǤϡʤޤΰĤȸȻפޤ


3. Linux ؤΰܿ˺ݤ

  פϥƥ¸򸺤餷ƽ̸ߴˤȤǤ

o f2c + gcc ǥץץåȤ鷺̤褦˽񤭴ޤ (
   g77 )줿¾Ҥ UNIX fortran ФƤ
  ̸ߴȤʤ褦αդޤ

o X ˴ؤƤϡXlib + Xtoolkit(Intrinsics) Ȥ褦ѹ
  FNAL ǤǤ Motif Widget ȤäƤޤMotif Ȥɬ
  ϶ˤƴǡդ Motif Υ饤󥹤ʤƥؤΰܿ
  ˤ뤫Ǥ


4. FNAL ǤǾά줿 Bonner Lab. ǵǽ桢褵줿

o ÷ϡ
  ե뤫ǤʤϤˤ¹ԤǽˤޤϤˤϡ
  ＱŪʥڤӥȥ륭ˤԽȡҥȥ꡼¸ǽ
  ɲäޤ (ʬ gnuplot ΥѤƤޤ)

  # FNAL Ǥý᤿Τϡ X طν˵Ȼ
  # ޤX Ǥϡɥطؤä(Exposure ٥
  # ȯ)ɥαƤʬκ桼ץ
  # ԤʤФʤޤVMS  Xlib ǤƱ٥ȤȤΤ
  # Ǥơꥢ륿˥٥ȤǽäΤǤ̤ 
  # UNIX  Xlib Ǥϥ٥ȽΤΥݡ󥰤ɬפǤ X 
  # Ƥ롢ޥꥰΥեȤʤ餳ǤؤǤϤʤ
  # ǤTopdrawer Τ褦˥ᥤɸԤξ֤ǥ٥Ƚ
  # ȤΤľˤϼ¸ޤ󡣤褦̵ΤǰΥޡ
  # ߤǥ٥Ȥˤޤäơ褬Ƶۻߤޤ
  # 褦ʴФФ뤫ȻפޤƤʤߤ 
  # gnuplot ǤϡX طνΤ˥֥ץ򵯤Ƥꡢ
  # Ǥϥݡ󥰤ˤäƥ٥ȤåƤޤ򿿻Τ
  # ν񤭴ɬפʤΤǡ洪ۤ...

  ޥɥ饤󤫤ΥեʤΤǡʲλεưˡ
  ݡȤ褦ˤޤ
    1. td             # ޥ̾Τߤǵư
         TD: ΥץץȤФ÷ϥ⡼ɤޤ
         cut & paste κݤ˥ץץȤȻפä顢
                set  prompt  main  ""
         ¹ԤХץץȤФʤ褦ˤǤޤ
         ץץȤˤ楳ɤǤΤǡTek4010 ߥ졼
          Tek -> VT100 ؤ˻ȤΤޤ
    2. td  filename   # եꤷƵư
         եƤᤷƼ¹ԤޤX11  Tek4010 ÷
         ǥХξ硢new_frame  exit ˽в񤦤ȡ"tty"  PAUSE: 
         ΥץץȤФưߤޤ꥿󰿤 CONTINUE 
         ɤɽ³EXIT, HALT Ǽ¹ԤǤǤޤ
    3. td < filename  # stdin 쥯ȤƵư
         stdin ϤᤷƼ¹Ԥޤ2 Ȱä new  exit 
         вäƤ PAUSE ޤ()äơ嵭Τ褦˥ե
         쥯ȤƼ¹ԤƤ⡢X ξϥɥ
         褷ָˤϥɥĤƤޤˤʤޤΤǡ
         Ωޤ󡣤 Topdrawer ñѤǤʤ¾
         ץȸѥפ̤椹ŪȤդ
         ǽǤ㤨 Tcl/Tk ξ硢
                set  f  [open |td  w]
         ȤСputs $f ...  topdrawer Υޥɤˤ
         Tcl/Tk Ǥޤ (줬ŪǤ)
       -w ץդƵưˤꡢnew ޥɤ
         Ϥν (EOF) ФơȥʥԤġɤ褦˻ؼǤޤ
         (÷ǥХ (PostScript) ˽Ϥ -w ̵Ǥ)
         ʥϡSIGUSR1  CONTINUESIGUSR2  STOP Ȳᤷ
         ʳ̵뤷ޤΥץ Emacs-Lisp (td.el) 
         ǻȤƤޤܤ contrib/elisp/README.elisp(-j) 
         

  ѹȼǥХλ⥪ץ -d ˤѤޤ

  ʤTopdrawer ϸե̾硦ʸ̤ʤ VMS ǳȯ
  줿եȤǤ⤢ꡢե̾ʸѴΤǥե
  ưˤʤäƤޤ٤
        set mode filecase=mixed
  ȤޥɤѰդƤΤǤե̾ '-' (ޥʥ) 
  ޤޤƤꤹȱ黻ҤȲᤵƤޤΤǡ '' ޤ
   "" ǰϤ褦ˤǤ礦

o 饤إ׵ǽ
  إץե "topdrawer.gih" ΥѥϴĶѿ TD_HELP ǻꤷ
  ưڡϴĶѿ PAGER ǻꤵޤ
  饤إ׵ǽ gnuplot ΥҼڤƼ¸ޤ
  إץեΤ VMS Ǥ HLB  HLP Фgnuplot 
  ѴǤΤǡƤȼºݤ԰סɽԴʬ
  ޤƼϤʤVMS Υإץե뤫 gnuplot Ѥ
  ѴϴñǤΤǡ¾ˤܿΩĤΤ뤫Τޤ

   ڡȤ less 򤪻Ȥǡȥԥåνǰ졹 q 򲡤
    ʤȤʤȤ̤ꥢƤޤΤ˻פϡ
    ڡ 'less -EX' ѹƸᤷޤ

o 뵡ǽ (spawn)
  spawn ޥɤ³ԤΥ륳ޥɤ¹Ԥޤϰ
  ϤޤʤդƤͿʤä硢Ķѿ SHELL 
  Ƥ륷뤬ưޤ (¿ξ硢Ҥ PSEUDO PIPE 
  ǽѤϹ⤤Ȼפޤ)

  spawn ޥɤʣΥ륳ޥɤ٤˼¹Ԥ硢̾
  ʤжڤ ";" ȤäƥޥɤϢͤǤ櫓Ǥ
  ";"  topdrawer ˤȤäƤڤ (terminator ȸƤǤޤ) ʤΤǡ
  spawn ޥɤ ";" ʹߤ򼡤 topdrawer ޥɤȲᤷƤޤޤ
  Bonner Lab. ǤǤüʸβϺǽǤΤǡ
        set character terminator "&"  ("&" ڤҤȤϿ)
        set character special    ";"  (";" ̵̣üʸȤ)
  ƤСspawn ޥɤʣΥ륳ޥɤѲǽ
  ʤޤ

  ĤǤʤ顢ȤǥեȤǤ "("")" ǰϤǻꤹ
  ʤäƤޤ
        set character comment    "!"  (VMS ȹ)
        set character comment    "#"  (UNIX ȹ)
        set character comment    "*"  (FORTRAN ȹ)
        set character comment    "{"  (pascal )
        set character endcomment "}"  (               )
  Τ褦ˡߤ˹碌ǽǤ

  Ǹ "!""#""*" ȤȤƺѤΤ
  ʸפǤäơֹԡפǤϤʤդƤ㤨
        # state-1 ; state-2 ; state-3
  ȤϤξ硢state-1 ϥȥȤޤstate-2 
  state-3 ϼ¹ԤƤޤޤ

  Ŭΰ򥳥ȥȤˤ
        if 0 .ne. 0 then
          ....
        endif
  ̵̣ if ʸǰϤ⤤ȸǤ礦

o ޥǽ
  㤨СĶѿ
               TD_C_INCLUDE = "set file input="
  ͽƤޤ Topdrawer 
               define command include "set file input="
  ƤСinclude եɤ߹ߤΥޥɤȤƻ
  Ǥ褦ˤʤޤ (Ĥ褦ǤTDRVAX.EXE ¸ߤ include 
  ޥɤƣ椵ˤĥǽǤꡢSLAC Ǥ Bonner Lab. ǤǤ
  Ȥޤ)ǰʤ顢
               TD_C_INC*LUDE = "set file input="
  ȤäơINC Ǥ INCL Ǥ INCLUDE Ǥդ褦ˤ롢Ȥ
  ϡVMS Τ褦ʥƥ饤̵֥꤬ΤǡǤޤ

  ޤ Bonner Lab. Ǥ˸¤Ǥ褦ȤƤ륳ޥɤ
  դ˸ȺƵˤʤäƤޤ̵¥롼פ˴٤ޤΤǸդ

  Bonner Lab. ǤФĥȤơ alias Ʊͤ˥ޥ
  ʸ !:1,... !:9, !^, !$, !* ֤뵡ǽäޤ

o ѿ(lexical)ǽ
  lexical Ȥʤ Bonner Lab. Ǥ̥ϤȾǤ顣
  # ưʤõˡVMS Ǥ SYMBOL ʸޤ
  # ǤƤΤΤޤ....

  ޳ѤǤ lexical Ȥä󤲤ޤȡ褺
      define value theta=0
  Τ褦ͤȡѿ v_theta ޤʹߤ
      set limit x from  v_theta  to 360
  Τ褦ˡɤ lexical ֤Ǥޤ
  Ȥ̤ˡBonner Lab. ǤǤ < > Ƕޤ줿ʬϼȸ路
  ɾƤ饳ޥɤ¹ԤȤǽäƤޤ㤨
      repeat  "v_theta <sin(theta)>;  -
               define value theta=<theta+1>"  361
  ¹ԤСؿΥǡåȤ夬ޤȽ
  褦ˡ< > Ǥ 'v_' դѿ򻲾ȤǤޤޤ 
  '-' ιԤؤη³ɽȤΤϡVMS/DCL Τͤˤ߿
  ȻפޤǤǤ UNIX ˥Хåå '\' ˤ³⥵
  ȤƤޤ³ϲǽʸκĹ 512 ʸǤ
  ĶĹޥʸͿ define command Ѥ
  Ƥ define command ǤʸĹ (
  ֤Ԥä̤Ȥ !) 512 ʸۤϤǤޤ (^^;

  lexical ϡޥƱͤ˴Ķѿ졢㤨 v_theta 
      TD_V_THETA=.0
  Τ褦˳ƤޤΤǡɤȤ(?)ͽƤ
  ǽǤ

  ʤߤˡdefine value ϿͤǤʸ
      define string name="Yumiko"
  ΥޥɤޤȤˤ
      title top 'My name is ' s_name
  Τ褦 's_' դޤ (Ǥϡǽ '' ǰϤޤ줿ʸȾ
  Ϣ뤹Τ´Ϳ뤫Τޤ.... ưΤǤ)
  ʸ TD_S_NAME ȤǴĶѿ˳Ƥޤ

  ޤdefine value 줿ѿ⡢'s_' դʸȤƻ
  ǤޤΤǡ㤨
      define value tmp=<sin(30)>
      type s_tmp
  Τ褦˱黻̤γǧǤꤷޤ

  줿ޥɤ lexical 򸫤뤿 show commandshow values 
  äޥɤ⡢괺褷ޤ (ϻͤǤ) 
  show values Ǥ Topdrawer ƥȤƻѤ lexical ѿ 
  (help lexical_values list_of_names ɽ) ɽޤ
  äˡΥƥѿͤϲǽǡ顼
  ٹФʤΤǤԤȰۤʤư򤹤ΤǺϥ˴٤ޤ
  礨桼 lexical ѿϡͭꤽ̵̾ɤ
  Ȥͽ type ޥɤƤʤǧ̵Ǥ

  define طǤϡ⤦ key ȤΤͭޤϤޤפ
  ̵ȻפޤΤǡȤʤޤäƤޤ

o ưνǽ
  桼Υۡǥ쥯ȥ ".topdrawrc" Ȥե뤬¸ߤ
  ˤϡƤ褺¹Ԥ褦ˤޤ

o 󼡸ҥȥ scatter plot (ˤ륻)
  ϴĤ꤬ޤơĤ X ѥɥ饤ФʬХ
  äƤޤ顼ΰְäƤǤ8 ӥåȥ顼
  Ȥʤȶ (?) ˤ⤦ޤ褵ƤޤΤǡFNAL κ
  ⵤդʤäΤǤ礦 (ط̵ǤɡX Υץꥱˤ 
  8 ӥåȥ顼ǤʤưʤΤä¿Ǥ)⤦Ĥ 
  Topdrawer ȤΥ X-Y ؤäɽȤХä
  ΤǤVMS ưƤ Bonner Lab. ǤĴ٤ꡢVer.3.? ('89) դ
  ǤưƤΤˡVer.4.4 ('92) Ʊͤξɾ򼨤褦ˤʤä
  ޤ (ս EQUIVALENCE Ȥäƾά褦Ȥƥϥޤä
  褦ǤϤ狼ޤ...)

  scatter plot ɽϡread mesh ɤ߹ޤ줿󼡸ǡФ
          set  three  off
  塢plot ޥɤǹԤޤο plot random=10 
  ˤäĴǤޤplot ޥɤ򷫤֤¹Ԥˤä
  ʡǻǤޤФܥˤ륻ɽ 
  (󼡸ҥȥΥ쥴ɽ) Ԥˤ
          plot  norandom  variable  symbol=CP  size=4
  Ϥޤ (٤ܥ CP ˤĤƤϸҤޤ)

o ޥˤɸɤߺΤ
   X ǤưǧƤޤ÷⡼ɤŬʿޤϤ
  
          show  cursor
  ϤȽ뤬ޤΤǡޥܥ򥯥åȡ
  ֤ɸӥǥХɸ (title ޥɤǻꤹΤ
  )ˤɤΥܥ󤬲줿֤äƤޤ (1, 2, 3 б 
  'X', ' ', 'Q' ȤʤޤΤʤΤϡ㤨 fit ΰ򥫡
  ǻꤹˡĴ٤Ƹȿ¬ǤǤ礦)ץåȤǤ
  ǽޤ.... ֤äͤΰ̣ϥޥ˥奢򸫤Ƥ
  ϡX-server ǽϤ˱ƤǤ礭ʥӥåȥޥåפ
  Ƥ褦ˤƤޤӥåȥޥåץ뤬ǽʤˤϡ
  եȥȤޤ

o X ɥ饤ФǥӥåȥޥåץեȤȤ褦ˤޤ
  ʽϤ뤿ˤ duplex եȤǽʬȤϻפޤ
  ̤Υҥȥǡѥѥį᤿Ȥʤɤϡϡ(?)
  եȤȤ®̾β⤤ȸޤ
  եȤϡǽҤ٤ font pattern ˥ޥåΤ椫顢
  ׵ᤵ礭˺ǤᤤΤưŪ򤷤ޤäơ
  font pattern Υʬ asterisk (*) ˤƤΤ̵Ǥ

   X11 ΥեȤϲˤʤ (žǤʤ) ΤͤǤ
  X11R5/contrib  xvertext-5.0 ( xfig-3.x ѤƤ)
  ѤơǤճ٤βž¸ƤޤΥե꡼եȤκԤ
  ξڤƴդޤ

  ȤǡBonner Lab. ǤǥϡɥեȤȤˤ set font basic 
  ¾ set mode vector=off ¹ԤɬפΤ SLAC ǤȰۤʤΤ
  դɬפǤ


5. TDRVAX.EXE ȤθߴΤ˻ܤѹ

o CASE ʸˤ뽤 SYMBOL  SLAC ǤȸߴΤΤˤޤ
  Bonner Lab. ǤȤθߴ⡼ (¨ UGS νˡ) ˤϡ
  ޥɥ饤󥪥ץ -b ؤǤޤ

o DUPLEX եȤȤ UBCFONT Ѥ㴳γĥäޤ
  UBCFONT Ǥ CASE ʸ "I""J""1""2" ꤹȡơ
  Italic, Script, Sans-Serif, Gothic ǽϤޤ 
  ( set font duplex ¹ԤΤ)
   TDRVAX.EXE γĥǽǤUGS2 ΤȤƻѤƤ 
  Hershey database (*) ˤϸޤޤƤեȤΰǤ
  ϹˡCASE ʸ "3""4" λ Bold-Roman, Bold-Italic 
  褦˳ĥäޤ
  ޤ "-" ϥϥեȤƻȤȴֱӤƤޤΤǡCASE "1" 
   "-" ϡĹ򾯤ûܤˤޤ

  ơ޳ѿʥեȤ٤Ƥ⼴ο (LABEL)  CASE 
  ǤʤƤͭȾǤǡäȶǤ
        set  font  duplex  I
  Τ褦ˡset font ޥɤΥѥ᡼䤷ơCASE " " ǻꤵ
  ٤ǥեȤλΤͿƤ褦ˤޤΥѥ᡼ˤ
  I, J, 1, 2, 3, 4 ΤߤͭǤ

 (*) Hershey database (NBS Special Publication No. 424) ȤϡAlan V. 
     Hershey ᤬ National Bureau of Standards ߿ˤޤȤ᤿ץå
     ѥ٥ȥեȥǡǡ2000 ʾΥդäƤޤ
     GhostScript Ǥ Hershey database եȤ˻ȤäƤꡢܤ
      ghostscript/doc/hershey.doc ˤޤ

o sidewaysrotateportrait βžդˤޤ
  ٤ʻǤĹοޤ set device ޤ set size 
  Υѥ᡼ꤷ硢Τ Bonner Lab. ǤǤ SLAC 
  (ϾＱŪȸؤƤɤǤ) Ȥϵ¨ײ
  žޤϡ㤨 PostScript Ϥ GhostScript Ǹꡢ
  TeX ɤ߹ݤ˵ͤˤʤäƤޤ櫓ǡäȺޤ
  Bonner Lab. Ǥˤ orient=... ˤä 90ñ̤Ǥ˲ž
  ǽΤܼŪǤϤޤ󤬡ߴΤѹäޤ

  ȤǡSLAC ǤǤ set device sideways ޤ󤬡Bonner 
  Lab. ǤǤ set size sideways ( rotate|portrait|orient=... ) 
  Ȥޤλϥ桼ȸϡ(ΰ̣Ǥ) ǥХ
  ʳ set device ޥɤȤäߤʤȤ˵Ƥ
  ȻפޤBonner Lab. Ǥ set device ޥɤȤˤϡɬ
  ǥХ̾źʤȡ㤨 PostScript ξˤե̾
  ϤʤԹ礬ΤǡդɬפǤ

o ϥǥХȤ EPSF ɲäޤ
  ȸäƤ⡢ΥǥХ̾ϴŪʤΤǤ¤ FNAL Ǥ PostScript
   UGS ɥ饤ФǤϴ BoundingBox ԥåꤹ뵡ǽղ
  Ƥꡢ̤ü˾줿ޤ TeX ˼Ǥ⼫ưŪ
  ַᤵ褦ˤʤäƤޤɲä EPSF ɥ饤Ф PostScript 
  ɥ饤ФȰۤʤϡñѻ֤ˤƻѤ (¦ȾʬѤ
  ʤ) ǤܼŪˤϲ -d postscr,sideways Ǽ¸Ǥ
  ʤΤǤʥޥɲ㤤ʤͤǤ礦 ^^;)
  TeX  EPSF ޥǤϡȲžɤǤʤȤ顢ճ˽
  Ԥޤ

  ʤߤˡŬڤ BoundingBox λꤵ줿 (Topdrawer ϤǤϤʤä
  ȴԤ櫓Ǥ) PostScript ե TeX ˼ˤϡ
          \documentstyle[...,eclepsf]{....}
             .......
          \begin{figure}[h]
          \centering
          \epsfile{file=figure.eps, scale=0.5}
          \caption{hogehoge}
          \end{figure}
             ......
  ȤǤ xdvi ư PSfile ܥ򥯥åС
  ưŪ˺Ŭΰ֤ŽޤƤΤǧϤǤ

o Xterm (Kterm) ǤѤθơTEK4010 ΥǥХ¸ɤ
  VT100 <=> TEK4010 Υ⡼ؤΥץ󥹤äޤ
  # ǰʤ顢kterm-6.2 Ǥ Tektronics ߥ졼ǥեȤǤ
  # Ȥ߹ޤʤͤѹƤޤޤġ


6. ȼγĥ

o ϥǥХϡޥɥ饤󥪥ץ -d device-name 
  ǻꤹ褦ˤޤ ( UNIX ȤƤϼ)
  device-name ˤ SET DEVICE ǻȤ륪ץǽǤ
  㤨
         % td -d postscr,sideways
  ȤСeclepsf.sty Ŭե뤬Ϥޤ
   (,) ˥ڡʤ褦դƤ

o ե̾κݤˡĶѿ ($ ǻϤޤʸ)  ~ (tilde: 
  $HOME ǻꤵ home directory) ִԤʤ褦ˤޤ

o PSEUDO PIPE ǽ
  set file input='...' ǻꤵե̾ '|' ǻϤޤˤϡ
  ʹߤ򥷥륳ޥɤȲᤷμ¹Է̤ topdrawer ޥ
  ȤϤޤǤͭ꾡ʱ gzip ȤäȻפ
  ޤtopdrawer ϥǡʸǤ١礭ʤä
  ޤޤ gzip ǰ̤Ƥɤ߹ݤˤ
         set file input='| gunzip -c hogehoge.dat.gz'
  ŸСǥΰˤʤޤ⤦ȥå
  򼨤ޤȡޤϻĤäƤɼ¹ԥեνߤ˺Ƥ
  äȤ֤򤱤뤿ˡȥ˥եѥդˡǤ
         set file input='| echo define string dir=\"`pwd`\"'
         title top s_dir "/hogehoge.tdr"
  ǤŰХååǥפդ
  

  Ȥ "PSEUDO PIPE" ȸƤǤΤϡ줬ܤ pipe μ
  ʤäƤʤǤC ʤ popen Ǵñ˼¸ǤʤΤǤ
  Fortran Ǥϥ (Ū) ¸ˡͭޤ󤷡UNIT ֹ
  ϤͭΤ Fortran-callable  C 롼񤯤ȤˤԤ
  ޤ󡣻̵ΤǡSTATUS='SCRATCH'  OPEN ե
  ˥쥯Ȥǽ񤭹Ǥޤäơեʤ
  ϥǽʾ˺ץåȥۡब⤷ͭȤС
  ǤܵǽϻȤޤ

o ѿ(͡ʸ)򥳥ޥɥ饤󤫤Ǥ褦ˤޤ
  줾 -V  -S ȤץȤä
         % td -V value=0. -S name="Yumiko"
  ȤǻǽǤŪ˴ĶѿǤǤʤΤǤ
  ڤǤ(ѿ̾ʸˤɬפ̵^^;)

o ޤǤ 7 ˲ä BLACK ǽˤޤ
  BLACK ȤطʿλǤfill Ȥ߹碌ơȴפ¸
  Ǥޤǰʻ joinplot 襳ޥɤ
  꽤ҡ set ޥɤǤϡ 3-bit encoding 
  뤿ᡢBLACK  NONE (̵) ȲᤵƤޤޤBLACK 
  ͭʤΤϡset color ޥɤˤ (㳰Ȥ) title ο
  ΤߤǤ

o X νϤκݤˡdefault-file °򸫤褦ˤޤ
  ץꥱ̾ϡUgsɤǡ꥽̾Ⱦάͤ
         Ugs*width:       768         # ɥ礭
         Ugs*height:      585
         Ugs*white:       White       # UGS οб
         Ugs*red:         Red         # ºݤ˻Ȥο̾
         Ugs*green:       Green       # ޤϡ#RRGGBBǤʸ
         Ugs*blue:        Blue
         Ugs*yellow:      Yellow
         Ugs*magenta:     Magenta
         Ugs*cyan:        Cyan
         Ugs*background:  Black
         Ugs*fontPattern: -adobe-helvetica-medium-r-normal--*-*-75-75-*
                                      # ҤΥӥåȥޥåץեȤ򻲾
         Ugs*title:       UGS on X Window System    # ȥС
         Ugs*iconName:    UGS
         Ugs*geometry:   (̵)
                          # +0+0 Ȥв̤κü˥ɥ򳫤
  ȤʤäƤޤѹ ~/.Xdefaults ˤιԤ
  äƤ (font[P]attern  icon[N]ame ʸդƤ
  ϰϰǤ̵X ̾δ˽äǤ) X ˴
  ͤϡʤ toplevel Υ饹ͤꤷơå̾ 
  (¤ϡpadɤȤʤäƤޤ) դʤΤԼ˻פΤޤ󤬡
  ְ㤤ǤϤޤ󡣲åȤĤ̵Τǡ꥽
  ΤޤްѤǤΤǤ

  X ΥץꥱǤϡＱŪ -geometry Ȥ -display Ȥ
  ޥɥ饤󥪥ץǥǥեȤѹǤޤǰʤ
  Topdrawer ǤϤΥץϻȤޤҤΤ褦 Topdrawer  
  XȤɤΤ˽񤫤Ƥ櫓ǤϤʤΤǡΥץ
  դ褦ˤˤϡޤ굤οʤޤʤ񤭴ɬפǤ

o ٤ܥɲ
  ̾Υץåȥܥ (SLAC ǤǤ 'P'Bonner Lab. ǤǤ 'O' ǽ
  ) 0, 1,... 9 ¾ˡʲΥܥäޤ
         A  B  C  D  E  F  G  H  I  J  K  L  X  Y
                     \\ \\
  ٤򥵥ݡȤǥХ¨ X11  PostScript Ǥºݤˤ
  ٤ޤ󡣥ץ󥷥ܥطʿ٤Ƥ褷ƤΤǡ
  ¾ΥܥȽŤʤäƤ (줬夫줿Τʤ) ץ
  ܥΤޤޤǤ
  'X'  'Y' ǻꤵ '\\' ϡơ X  Y ΡϢ³ɤ
  ɽǤ (ʬѤĤ¤٤硢ڤܤɽ
  ȤȸФ狼ͤˤϤ狼)ܤδ֤طʿ٤Τǡ
  ȤȡڤܤǤޤ

o ϰϤγĥ
  INTENSITY ޤ WIDTH ǻꤵ 1  5 ¤ͭޤ
  ʲΤ褦ѹޤ
        set intensity ޥɤǻꤹ   1  9
        join, histogram 襳ޥɤ 
                  intensity ꤹ   1  7
  ̵¤ϰϤԲǽͳϡUGS ˥ޥɤϤݤ˥
  (DIM Ȥ BRIGHT ) ѤƤ뤿ᡢǽϰʬΥɤ
  ѰդʤȤʤǤ襳ޥɤνξ 7 ޤǤ
  ȤʤΤϡ octal (3 ӥå) ˥ѥåƤ뤿Ǥ T_T)
  ΰ٤ͭäơintensity 8  9 ϴư򤹤 (texture 
  ˲) ͭΤǡդƤ

o PostScript ΥǥХ¸ޥɤɲ
  postscr (epsf) ΥǥХ¸⥸塼˰ʲΥޥɤɲäޤ
        FONT=<font>
        WHITE=<rgb>
        (RED, GREEN, BLUE, YELLOW, MAGENTA, CYAN, BLACK Ʊ)
   <rgb> ȤĤοɽ 16 ʿ 6 ޤ 12 ʸǡ
  <font> Ȥ
        Times-Roman
        Times-Italic
        Times-Bold
        Times-BoldItalic
        Helvetica
        Helvetica-Oblique
        Helvetica-Bold
        Helvetica-BoldOblique
        Courier
        Courier-Oblique
        Courier-Bold
        Courier-BoldOblique
        Symbol
  Τ줫ʸǤ (/ʸ϶̤ޤ)̵꤬
  ǥեȤϡFONT=HelvetiaWHITE=FFFFFFRED=FF0000GREEN=00FF00
  BLUE=0000FFYELLOW=FFFF00MAGENTA=FF00FFCYAN=00FFFFBLACK=000000
  ǤϥǥХȶ˻ꤵޤtd ޥɤ椫ϡ
        set device postscr "font=helvetia-oblique,red=ff2211"
  Τ褦˻ꤷƤ̾ device ѥ᡼Ȱۤʤꡢ (")
  ǰϤɬפդƤΥޥɥ饤󤫤
  ϡ뤬ᤷƤޤޤ顢
        % td -d postscr,\"font=times-roman,cyan=11eeee\"
  ͤ˥פƤޥɥ饤λǤϡޤ
  ˶ƤϤʤʤդƤޤեȤ
  PostScript ץ󥿡ΥϡɥեȤǤ顢
        set font basic
        set mode vector=off
  ʤȡѤޤ

o PostScript ɥ饤ФΥǥեȤβ٤ 600dpi ˤޤ
  FNAL ǤΥǥեȤ 300dpi äΤǤޤθǤġ
  UGS ϲ٤ truncate 줿ͤɥ饤ФϤΤǡʸ
  ܥɽϤʤѤޤ¤ϡ٤ϥǥХ¸ޥ
  ѹǤΤǤĴʬХä (٤
  夲٤ʤ褦ˤʤä) Τǡ⽤ޤ
  κǾñ (set intensity 1 Ϳ) ϡߴΤ 
  1/300ˤƤޤߤˡ () ˴ؤǥХ¸
  ѥ᡼̾Ƚͤϰʲ̤Ǥ
        RUCMX = 600/2.54   RUCMY = 600/2.54  ;  Rusters/cm
        XMIN  =  300       YMIN  =  300      ;  Minimum in ruster unit
        XMAX  = 6300       YMAX  = 4800      ;  Maximum in ruster unit
  ѹˤꡢܥ޷٤ܤΥǡ
  ʤޤ줬ˤʤϾʤȴԤޤ


7. FNAL ǤѤƤ

o ݡȤƤǥХ X11, PostScript, Tek4010 Τߡ

o HBOOK ҥȥեɤ߹ޤ
  (FNAL ǤǤϰ󥯤ϤƤޤ̵̤ʤΤǳޤ)

o Shared memory Ȥʤ (VMS ǤǤȤä̵ΤǥΡ)

o ǡΰΥʥߥåʥ󤬤Ǥʤ
  ˴ؤƤܼŪʺ񤬤櫓Ǥ̵ΤǤ... ¸ΤΤ褦
  UNIX ƥΥʥߥå (϶ͭ) Ƥε FORTRAN
  Τǡʤν񤭴פޤʤΤǡ
  괺ǡΰΥǥեȤ 1 MB ˹Ƥޤ (FORTRAN 
  ƥåΰƤƤޤΤǡexecutable Υ礭
  ʤäƤޤޤͳˤä volatile ˤϤǤʤΤǤ)

o ֥롼饤֥ (tdhist, tdjoin ) ϥݡȤʤ
  ϡVMS/DEC-Fortran Υ֥롼˴ؤ밷ȼͤʤΤ
  ܿ񤷤ȤȡFortran callable ʥ饤֥ȤƤ PGPLOT 
  ɽϤͭꡢڤƤθȡTopdrawer 
  ˹åȤ򴶤ʤǤ

o ΤΥХδĤ()


8. С

o Release 0.1  1995 ǯ 9  10 

  礨 Linux ưǤδOSF/1 Ǥưǧ

o Release 0.2--0.4

  ɤѹä줿ϿϻĤäƤޤ

o Release 0.5  1996 ǯ 1  20 

  X Υ꥽ʬɤ Core åȤ̵ 
  (white, red, ...)  Font Pattern Ǥ褦ˤޤ

o Release 0.6  1996 ǯ 2  3 

  ǽĥͭޤ󤬡δս (FORTRAN77 
  ʸˡǤϵƤ餺unix-fortran Ǥ԰ưθˤʤ
  פʬ) ŰŪ˽ޤޤ known problem 
  äǥХؤ fault ⵯʤʤꡢϴ
  ȻפäƤޤ

o Release 0.7  1996 ǯ 2  25 

  OSF/1SunOS Ǥñ make Ǥ褦ˡ Imakefile 
  ޤȼ INSTALL ɥȤդޤޤ
  reference ޥ˥奢Ǥ TOPDRAWER.DOC  HTML ǤѰդޤ

o Release 0.8  1996 ǯ 5  19 

  Linux  ELF Хʥ򥹥ȥ졼Ȥ make Ǥ褦ˤޤ (
  äƤ g77-0.5.18 ǽäǤ)¾ˤ¿
  ޥʡХꡢCASE λȤޤȤ᤿ html ե
  äꤷƤΤǡǰڤȤޤ

o Release 0.9  1996 ǯ 7  31 

  ѿΥޥɥ饤󥪥ץ (-V, -S) äޤ
  ѸΥɥ򾯤ʤޤ

o Release 1.0  1996 ǯ 8  16 

   (INTENSITY) Υ٥ 5 ʳ 9 (7) ʳѹޤ
  PostScript ΥǥХ¸ޥ (FONT, WHITE,...) ɲäޤ

o Release 1.1  1996 ǯ 8  23 

  td Υե̵̣ʥǥեȻӤĶѿ 
  ~ (tilde) βä褦ˤޤ

o Release 1.1a 1996 ǯ 9  13 

  ĥܥ ()  texture ˰¸ʤ褦ˤޤ

o Release 1.2  1996 ǯ 11  20 

  OSF/1 ѿǽƯʤ (Bonner Lab. ǥꥸʥʬ)
  ХޤDDNAME λǥե̾ʸѴ
  ޤΤػߤ褦ѹޤstdin 쥯Ȥ
  ưݤˡڡڤܤ SIGNAL ԤĤΥץ -w 
  ɲäޤεǽѤ Emacs (Mule)  topdrawer 
  ư뤿 e-lisp "td.el" (ʪ ˤ) 
  contrib/elisp/ ʲ˲äޤ

o Release 1.2a 1996 ǯ 11  23 

  td.el  PostScript (Хѥ)Զ
  epsf ɥ饤ФΥǥХ¸ѥ᡼

o Release 1.2b 1996 ǯ 11  30 

  ե̾Ĺ(topdrawer  80 ʸUGS  PostScript 
  ɥ饤Ф 64 ʸ) 256 ʸ˳ĥޤ
  topdrawer ޥ˥奢 HTML Ǥ FRAME бѹޤ
  td.el εǽĥ(\C-t \C-d Ϣ³¹Ԥ˸Ť֥ץ 
  killBonner Lab. CASE ХѥΥݡ)

o Release 1.2c 1996 ǯ 12  11 

  stdin Ѥˡ '-' ˤ³ƯʤХ
  set fill angle λ꤬ radian ǲᤵΤ degree ˽
  arrowbox ޥ fill  log scale ƯʤХ
  (Ϥ Bonner Lab. ǥꥸʥΥХǤ)

o Release 1.3  1996 ǯ 12  14 

  UGS  X Window System ɥ饤Фޤη
  SunOS ǥ뤬ɽʤХ衣
  Exposure Event νַڤפʤޤ
  դΥץ󥷥ܥ뤬ȥåϮˡȴɽ
    褦ˤʤޤ

o Release 1.3a 1996 ǯ 12  28 

  PostScript ɥ饤ФΥǥեȤβ٤ 600dpi ѹޤ
  ٤˰¸(٤夲Ȥ٤ʤ^^;)Х
  ĥҤ ".top"".tdr" ʳλ ".ps"".eps" Ϳ
  ʤ(ե̾Ĺ 256 ʸ˳ĥư)Х

o Release 1.3b 1997 ǯ  1   7 

  PostScript ɥ饤Фβ٤Ѥ BoundingBox 
  ʤХtd.el  PostScript Ϥǡhyphen ζڤҤ
  ޤե̾Фƥ顼ˤʤХ

o Release 1.3c 1997 ǯ  5  19 

  show data, show cursor  (Bonner Lab. ǥꥸʥ) Х
  Solaris Υݡ (ȸäƤ⥽ѹͭޤ󤬡)

o Release 1.3d 1997 ǯ  5  24 

  td.el ΥХ (̵̾Хåե PostScript Ϥȥ顼ˤʤ) 
  doc/topdrawer.tex δ֤ˤƤΤ衣help 
  underline  bold ɽ褦 doc/topdrawer4.0.hlp  
  doc/doc2gih.f ѹ (줬λ)

o Release 1.3e 1997 ǯ  5  27 

  box, circle, ellipse, diamond ޥɤ from|to ɸѤ
   size ʪɸˤʤäƤޤ (Bonner Lab. ǥꥸʥ) Х
  

o Release 1.3f 1997 ǯ  8  17 

  define command 줿ޥɤϤΥХ
  ջѴؿΥ饸ѴΥХ

o Release 1.3g 1997 ǯ  8  22 

  define command ΰޥɤΥޥơ
  ȻѤǽˤʤä

o Release 1.3h 1997 ǯ  9  18 

  PostScript ꤷʤä 'ugdevice.xx' ˤʤʤ
  Х (1.3g Ƴ줿) html ʸʸˡְ㤤

o Release 1.4  1997 ǯ  9  20 

  X ɥ饤ФǥӥåȥޥåץեȤβž򥵥ݡȡ٤ĥܥ
  βž⥵ݡȡ

o Release 1.4a 1997 ǯ  9  26 

  PSEUDO PIPE ǽΥݡȡ

o Release 1.4b 1998 ǯ  1  23 

  set shield  sideways/rotated/orientation=1,2,3 ưʤ 
  (Bonner Lab. ǥꥸʥ) Х

o Release 1.4c 1998 ǯ  3  20 

  ɸԤǤ signal 򤦤ޤʤ (OSF1, Solaris, 
  libc-5.4.38 ʹߤ Linux) бޤâlibc-5.4.38 Ȥ
  ХͭäƤޤǽʤΤǡ5.4.44 ʹߤȤäƤ
