;-----------------------------------------------------------------------
pro plot_cities,fname,clipwin
;-----------------------------------------------------------------------

; called from main as:
; plot_cities,'/?dir?/lmich_cities.dat',[41.5,-88.5,43.5,-85.5]


a=strarr(11)
clabel=' '
openr,1,fname
readf,1,a
close,1
clon=float(strmid(a,0,9))
clat=float(strmid(a,9,9))
clabel=strmid(a,21,13)
symsizes=[2,1,1,1,1,1,2,4,2,1,3]
xoffset=[0,.02,0,.02,.02,0,.02,0,-.02,-.02,0.]
yoffset=[0,0,0,0,0,0,-.03,0,0,0,0]
xloffset=[.04,.05,.03,.05,.05,.04,.06,-.28,-.35,-.24,-.35]
yloffset=[0,0,0,0,0,0,-.04,0,0,0,0]
L=where(clon gt clipwin(1) and clon lt clipwin(3) and clat gt clipwin(0) and clat lt clipwin(2))
for i=0,n_elements(L)-1 do begin
   plots,clon(L(i))+xoffset(L(i)),clat(L(i))+yoffset(L(i)),psym=5,symsize=symsizes(L(i))*.8
   xyouts,clon(L(i))+xloffset(L(i)),clat(L(i))+yloffset(L(i)),clabel(L(i)),size=.85
end
return
end