! Created 25-feb-2008 by A. Baker
!
! To update this macro:
!  (1) find the commands for the field that has just been done
!  (2) comment out the two "draw text..." lines
!  (3) comment in the "offset", "start", "pixel", and "show" lines
!  (4) change the argument of "start" to whatever is appropriate
!  (5) in mopsic, invoke @217progress.MOPSIC

greg\limit 630 -630 -630 630
set box match
box
aeo
telescope iram
projection 10:46:00 +59:01:00
extent 90 96
velocity 5

! UD48+5-5
pen /colour 1
!draw text 540 -520 "+5" /user
!draw text 540 -560 "-5" /user 
offset 540 -540
start 06 35 00
pixel 16
show

! UD48+5-4
pen /colour 1
!draw text 540 -400 "+5" /user
!draw text 540 -440 "-4" /user 
offset 540 -420
start 09 02 00
pixel 16
show

! UD48+5-3
pen /colour 1
!draw text 540 -280 "+5" /user
!draw text 540 -320 "-3" /user 
offset 540 -300
start 11 37 00
pixel 16
show

! UD48+5-2
pen /colour 3
draw text 540 -160 "+5" /user
draw text 540 -200 "-2" /user 
!offset 540 -180
!start 06 30 00
!pixel 16
!show

! UD48+5-1
pen /colour 4
draw text 540 -40 "+5" /user
draw text 540 -80 "-1" /user 
!offset 540 -60
!start 06 30 00
!pixel 16
!show

! UD48+5+1
pen /colour 4
draw text 540 80 "+5" /user
draw text 540 40 "+1" /user 
!offset 540 60
!start 06 30 00
!pixel 16
!show

! UD48+5+2
pen /colour 4
draw text 540 200 "+5" /user
draw text 540 160 "+2" /user 
!offset 540 180
!start 06 30 00
!pixel 16
!show

! UD48+5+3
pen /colour 3
draw text 540 320 "+5" /user
draw text 540 280 "+3" /user 
!offset 540 300
!start 06 30 00
!pixel 16
!show

! UD48+5+4
pen /colour 3
draw text 540 440 "+5" /user
draw text 540 400 "+4" /user 
!offset 540 420
!start 06 30 00
!pixel 16
!show

! UD48+5+5
pen /colour 3
draw text 540 560 "+5" /user
draw text 540 520 "+5" /user 
!offset 540 540
!start 06 30 00
!pixel 16
!show

! UD36+4-5
pen /colour 1
!draw text 420 -520 "+4" /user
!draw text 420 -560 "-5" /user 
offset 420 -540
start 09 57 00
pixel 16
show

! UD36+4-4
pen /colour 1
!draw text 420 -400 "+4" /user
!draw text 420 -440 "-4" /user 
offset 420 -420
start 07 37 00
pixel 16
show

! UD36+4-3
pen /colour 1
!draw text 420 -280 "+4" /user
!draw text 420 -320 "-3" /user 
offset 420 -300
start 09 26 00
pixel 16
show

! UD36+4-2
pen /colour 3
draw text 420 -160 "+4" /user
draw text 420 -200 "-2" /user 
!offset 420 -180
!start 06 30 00
!pixel 16
!show

! UD36+4-1
pen /colour 4
draw text 420 -40 "+4" /user
draw text 420 -80 "-1" /user 
!offset 420 -60
!start 06 30 00
!pixel 16
!show

! UD36+4+1
pen /colour 4
draw text 420 80 "+4" /user
draw text 420 40 "+1" /user 
!offset 420 60
!start 06 30 00
!pixel 16
!show

! UD36+4+2
pen /colour 4
draw text 420 200 "+4" /user
draw text 420 160 "+2" /user 
!offset 420 180
!start 06 30 00
!pixel 16
!show

! UD36+4+3
pen /colour 3
draw text 420 320 "+4" /user
draw text 420 280 "+3" /user 
!offset 420 300
!start 06 30 00
!pixel 16
!show

! UD36+4+4
pen /colour 3
draw text 420 440 "+4" /user
draw text 420 400 "+4" /user 
!offset 420 420
!start 06 30 00
!pixel 16
!show

! UD36+4+5
pen /colour 3
draw text 420 560 "+4" /user
draw text 420 520 "+5" /user 
!offset 420 540
!start 06 30 00
!pixel 16
!show

! UD48+3-5
pen /colour 1
!draw text 300 -520 "+3" /user
!draw text 300 -560 "-5" /user 
offset 300 -540
start 08 37 00
pixel 16
show

! UD48+3-4
pen /colour 1
!draw text 300 -400 "+3" /user
!draw text 300 -440 "-4" /user 
offset 300 -420
start 10 55 00
pixel 16
show

! UD48+3-3
pen /colour 1
!draw text 300 -280 "+3" /user
!draw text 300 -320 "-3" /user 
offset 300 -300
start 10 49 00
pixel 16
show

! UD48+3-2
pen /colour 3
draw text 300 -160 "+3" /user
draw text 300 -200 "-2" /user 
!offset 300 -180
!start 06 30 00
!pixel 16
!show

! UD48+3-1
pen /colour 4
draw text 300 -40 "+3" /user
draw text 300 -80 "-1" /user 
!offset 300 -60
!start 06 30 00
!pixel 16
!show

! UD48+3+1
pen /colour 4
draw text 300 80 "+3" /user
draw text 300 40 "+1" /user 
!offset 300 60
!start 06 30 00
!pixel 16
!show

! UD48+3+2
pen /colour 4
draw text 300 200 "+3" /user
draw text 300 160 "+2" /user 
!offset 300 180
!start 06 30 00
!pixel 16
!show

! UD48+3+3
pen /colour 3
draw text 300 320 "+3" /user
draw text 300 280 "+3" /user 
!offset 300 300
!start 06 30 00
!pixel 16
!show

! UD48+3+4
pen /colour 3
draw text 300 440 "+3" /user
draw text 300 400 "+4" /user 
!offset 300 420
!start 06 30 00
!pixel 16
!show

! UD48+3+5
pen /colour 3
draw text 300 560 "+3" /user
draw text 300 520 "+5" /user 
!offset 300 540
!start 06 30 00
!pixel 16
!show

! UD36+2-5
pen /colour 1
!draw text 180 -520 "+2" /user
!draw text 180 -560 "-5" /user 
offset 180 -540
start 12 28 00
pixel 16
show

! UD36+2-4
pen /colour 1
draw text 180 -400 "+2" /user
draw text 180 -440 "-4" /user 
!offset 180 -420
!start 06 30 00
!pixel 16
!show

! UD36+2-3
pen /colour 1
draw text 180 -280 "+2" /user
draw text 180 -320 "-3" /user 
!offset 180 -300
!start 06 30 00
!pixel 16
!show

! UD36+2-2
pen /colour 3
draw text 180 -160 "+2" /user
draw text 180 -200 "-2" /user 
!offset 180 -180
!start 06 30 00
!pixel 16
!show

! UD36+2-1
pen /colour 3
draw text 180 -40 "+2" /user
draw text 180 -80 "-1" /user 
!offset 180 -60
!start 06 30 00
!pixel 16
!show

! UD36+2+1
pen /colour 3
draw text 180 80 "+2" /user
draw text 180 40 "+1" /user 
!offset 180 60
!start 06 30 00
!pixel 16
!show

! UD36+2+2
pen /colour 3
draw text 180 200 "+2" /user
draw text 180 160 "+2" /user 
!offset 180 180
!start 06 30 00
!pixel 16
!show

! UD36+2+3
pen /colour 3
draw text 180 320 "+2" /user
draw text 180 280 "+3" /user 
!offset 180 300
!start 06 30 00
!pixel 16
!show

! UD36+2+4
pen /colour 3
draw text 180 440 "+2" /user
draw text 180 400 "+4" /user 
!offset 180 420
!start 06 30 00
!pixel 16
!show

! UD36+2+5
pen /colour 3
draw text 180 560 "+2" /user
draw text 180 520 "+5" /user 
!offset 180 540
!start 06 30 00
!pixel 16
!show

! UD48+1-5
pen /colour 1
draw text 60 -520 "+1" /user
draw text 60 -560 "-5" /user 
!offset 60 -540
!start 06 30 00
!pixel 16
!show

! UD48+1-4
pen /colour 1
draw text 60 -400 "+1" /user
draw text 60 -440 "-4" /user 
!offset 60 -420
!start 06 30 00
!pixel 16
!show

! UD48+1-3
pen /colour 1
draw text 60 -280 "+1" /user
draw text 60 -320 "-3" /user 
!offset 60 -300
!start 06 30 00
!pixel 16
!show

! UD48+1-2
pen /colour 3
draw text 60 -160 "+1" /user
draw text 60 -200 "-2" /user 
!offset 60 -180
!start 06 30 00
!pixel 16
!show

! UD48+1-1
pen /colour 3
draw text 60 -40 "+1" /user
draw text 60 -80 "-1" /user 
!offset 60 -60
!start 06 30 00
!pixel 16
!show

! UD48+1+1
pen /colour 3
draw text 60 80 "+1" /user
draw text 60 40 "+1" /user 
!offset 60 60
!start 06 30 00
!pixel 16
!show

! UD48+1+2
pen /colour 3
draw text 60 200 "+1" /user
draw text 60 160 "+2" /user 
!offset 60 180
!start 06 30 00
!pixel 16
!show

! UD48+1+3
pen /colour 3
draw text 60 320 "+1" /user
draw text 60 280 "+3" /user 
!offset 60 300
!start 06 30 00
!pixel 16
!show

! UD48+1+4
pen /colour 3
draw text 60 440 "+1" /user
draw text 60 400 "+4" /user 
!offset 60 420
!start 06 30 00
!pixel 16
!show

! UD48+1+5
pen /colour 3
draw text 60 560 "+1" /user
draw text 60 520 "+5" /user 
!offset 60 540
!start 06 30 00
!pixel 16
!show

! UD36-1-5
pen /colour 6
draw text -60 -520 "-1" /user
draw text -60 -560 "-5" /user 
!offset -60 -540
!start 06 30 00
!pixel 16
!show

! UD36-1-4
pen /colour 6
draw text -60 -400 "-1" /user
draw text -60 -440 "-4" /user 
!offset -60 -420
!start 06 30 00
!pixel 16
!show

! UD36-1-3
pen /colour 6
draw text -60 -280 "-1" /user
draw text -60 -320 "-3" /user 
!offset -60 -300
!start 06 30 00
!pixel 16
!show

! UD36-1-2
pen /colour 3
draw text -60 -160 "-1" /user
draw text -60 -200 "-2" /user 
!offset -60 -180
!start 06 30 00
!pixel 16
!show

! UD36-1-1
pen /colour 3
draw text -60 -40 "-1" /user
draw text -60 -80 "-1" /user 
!offset -60 -60
!start 06 30 00
!pixel 16
!show

! UD36-1+1
pen /colour 14
draw text -60 80 "-1" /user
draw text -60 40 "+1" /user 
!offset -60 60
!start 06 30 00
!pixel 16
!show

! UD36-1+2
pen /colour 14
draw text -60 200 "-1" /user
draw text -60 160 "+2" /user 
!offset -60 180
!start 06 30 00
!pixel 16
!show

! UD36-1+3
pen /colour 14
draw text -60 320 "-1" /user
draw text -60 280 "+3" /user 
!offset -60 300
!start 06 30 00
!pixel 16
!show

! UD36-1+4
pen /colour 14
draw text -60 440 "-1" /user
draw text -60 400 "+4" /user 
!offset -60 420
!start 06 30 00
!pixel 16
!show

! UD36-1+5
pen /colour 14
draw text -60 560 "-1" /user
draw text -60 520 "+5" /user 
!offset -60 540
!start 06 30 00
!pixel 16
!show

! UD48-2-5
pen /colour 6
draw text -180 -520 "-2" /user
draw text -180 -560 "-5" /user 
!offset -180 -540
!start 06 30 00
!pixel 16
!show

! UD48-2-4
pen /colour 6
draw text -180 -400 "-2" /user
draw text -180 -440 "-4" /user 
!offset -180 -420
!start 06 30 00
!pixel 16
!show

! UD48-2-3
pen /colour 6
draw text -180 -280 "-2" /user
draw text -180 -320 "-3" /user 
!offset -180 -300
!start 06 30 00
!pixel 16
!show

! UD48-2-2
pen /colour 3
draw text -180 -160 "-2" /user
draw text -180 -200 "-2" /user 
!offset -180 -180
!start 06 30 00
!pixel 16
!show

! UD48-2-1
pen /colour 3
draw text -180 -40 "-2" /user
draw text -180 -80 "-1" /user 
!offset -180 -60
!start 06 30 00
!pixel 16
!show

! UD48-2+1
pen /colour 14
draw text -180 80 "-2" /user
draw text -180 40 "+1" /user 
!offset -180 60
!start 06 30 00
!pixel 16
!show

! UD48-2+2
pen /colour 14
draw text -180 200 "-2" /user
draw text -180 160 "+2" /user 
!offset -180 180
!start 06 30 00
!pixel 16
!show

! UD48-2+3
pen /colour 14
draw text -180 320 "-2" /user
draw text -180 280 "+3" /user 
!offset -180 300
!start 06 30 00
!pixel 16
!show

! UD48-2+4
pen /colour 14
draw text -180 440 "-2" /user
draw text -180 400 "+4" /user 
!offset -180 420
!start 06 30 00
!pixel 16
!show

! UD48-2+5
pen /colour 14
draw text -180 560 "-2" /user
draw text -180 520 "+5" /user 
!offset -180 540
!start 06 30 00
!pixel 16
!show

! UD36-3-5
pen /colour 14
draw text -300 -520 "-3" /user
draw text -300 -560 "-5" /user 
!offset -300 -540
!start 06 30 00
!pixel 16
!show

! UD36-3-4
pen /colour 14
draw text -300 -400 "-3" /user
draw text -300 -440 "-4" /user 
!offset -300 -420
!start 06 30 00
!pixel 16
!show

! UD36-3-3
pen /colour 14
draw text -300 -280 "-3" /user
draw text -300 -320 "-3" /user 
!offset -300 -300
!start 06 30 00
!pixel 16
!show

! UD36-3-2
pen /colour 14
draw text -300 -160 "-3" /user
draw text -300 -200 "-2" /user 
!offset -300 -180
!start 06 30 00
!pixel 16
!show

! UD36-3-1
pen /colour 14
draw text -300 -40 "-3" /user
draw text -300 -80 "-1" /user 
!offset -300 -60
!start 06 30 00
!pixel 16
!show

! UD36-3+1
pen /colour 14
draw text -300 80 "-3" /user
draw text -300 40 "+1" /user 
!offset -300 60
!start 06 30 00
!pixel 16
!show

! UD36-3+2
pen /colour 14
draw text -300 200 "-3" /user
draw text -300 160 "+2" /user 
!offset -300 180
!start 06 30 00
!pixel 16
!show

! UD36-3+3
pen /colour 14
draw text -300 320 "-3" /user
draw text -300 280 "+3" /user 
!offset -300 300
!start 06 30 00
!pixel 16
!show

! UD36-3+4
pen /colour 14
draw text -300 440 "-3" /user
draw text -300 400 "+4" /user 
!offset -300 420
!start 06 30 00
!pixel 16
!show

! UD36-3+5
pen /colour 14
draw text -300 560 "-3" /user
draw text -300 520 "+5" /user 
!offset -300 540
!start 06 30 00
!pixel 16
!show

! UD48-4-5
pen /colour 14
draw text -420 -520 "-4" /user
draw text -420 -560 "-5" /user 
!offset -420 -540
!start 06 30 00
!pixel 16
!show

! UD48-4-4
pen /colour 14
draw text -420 -400 "-4" /user
draw text -420 -440 "-4" /user 
!offset -420 -420
!start 06 30 00
!pixel 16
!show

! UD48-4-3
pen /colour 14
draw text -420 -280 "-4" /user
draw text -420 -320 "-3" /user 
!offset -420 -300
!start 06 30 00
!pixel 16
!show

! UD48-4-2
pen /colour 14
draw text -420 -160 "-4" /user
draw text -420 -200 "-2" /user 
!offset -420 -180
!start 06 30 00
!pixel 16
!show

! UD48-4-1
pen /colour 14
draw text -420 -40 "-4" /user
draw text -420 -80 "-1" /user 
!offset -420 -60
!start 06 30 00
!pixel 16
!show

! UD48-4+1
pen /colour 14
draw text -420 80 "-4" /user
draw text -420 40 "+1" /user 
!offset -420 60
!start 06 30 00
!pixel 16
!show

! UD48-4+2
pen /colour 14
draw text -420 200 "-4" /user
draw text -420 160 "+2" /user 
!offset -420 180
!start 06 30 00
!pixel 16
!show

! UD48-4+3
pen /colour 14
draw text -420 320 "-4" /user
draw text -420 280 "+3" /user 
!offset -420 300
!start 06 30 00
!pixel 16
!show

! UD48-4+4
pen /colour 14
draw text -420 440 "-4" /user
draw text -420 400 "+4" /user 
!offset -420 420
!start 06 30 00
!pixel 16
!show

! UD48-4+5
pen /colour 14
draw text -420 560 "-4" /user
draw text -420 520 "+5" /user 
!offset -420 540
!start 06 30 00
!pixel 16
!show

! UD36-5-5
pen /colour 14
draw text -540 -520 "-5" /user
draw text -540 -560 "-5" /user 
!offset -540 -540
!start 06 30 00
!pixel 16
!show

! UD36-5-4
pen /colour 14
draw text -540 -400 "-5" /user
draw text -540 -440 "-4" /user 
!offset -540 -420
!start 06 30 00
!pixel 16
!show

! UD36-5-3
pen /colour 14
draw text -540 -280 "-5" /user
draw text -540 -320 "-3" /user 
!offset -540 -300
!start 06 30 00
!pixel 16
!show

! UD36-5-2
pen /colour 14
draw text -540 -160 "-5" /user
draw text -540 -200 "-2" /user 
!offset -540 -180
!start 06 30 00
!pixel 16
!show

! UD36-5-1
pen /colour 14
draw text -540 -40 "-5" /user
draw text -540 -80 "-1" /user 
!offset -540 -60
!start 06 30 00
!pixel 16
!show

! UD36-5+1
pen /colour 14
draw text -540 80 "-5" /user
draw text -540 40 "+1" /user 
!offset -540 60
!start 06 30 00
!pixel 16
!show

! UD36-5+2
pen /colour 14
draw text -540 200 "-5" /user
draw text -540 160 "+2" /user 
!offset -540 180
!start 06 30 00
!pixel 16
!show

! UD36-5+3
pen /colour 14
draw text -540 320 "-5" /user
draw text -540 280 "+3" /user 
!offset -540 300
!start 06 30 00
!pixel 16
!show

! UD36-5+4
pen /colour 14
draw text -540 440 "-5" /user
draw text -540 400 "+4" /user 
!offset -540 420
!start 06 30 00
!pixel 16
!show

! UD36-5+5
pen /colour 14
draw text -540 560 "-5" /user
draw text -540 520 "+5" /user 
!offset -540 540
!start 06 30 00
!pixel 16
!show

pen /colour 0
draw text -650 500 "Progress for project 217-07" /user
pen /colour 1
draw text -650 400 "priority 5 maps" /user
pen /colour 6
draw text -650 300 "priority 4 maps" /user
pen /colour 4
draw text -650 200 "priority 3 maps" /user
pen /colour 3
draw text -650 100 "priority 2 maps" /user
pen /colour 14
draw text -650   0 "priority 1 maps" /user
pen /colour 0
draw text -650 -200 "Source name = UD" /user
draw text -660 -250 "+ bsw code at top of column" /user
draw text -660 -300 "+ grid code in cell" /user
draw text -650 -350 "(e.g., UD48+1-4)" /user

pen /colour 0
draw text  640 650 "bsw =" /user
draw text  540 650 "48" /user
draw text  420 650 "36" /user
draw text  300 650 "48" /user
draw text  180 650 "36" /user
draw text   60 650 "48" /user
draw text  -60 650 "36" /user
draw text -180 650 "48" /user
draw text -300 650 "36" /user
draw text -420 650 "48" /user
draw text -540 650 "36" /user

hardcopy "217progress.ps"

finish