* case
solidpen 0 0 0 0
solidbrush 255 255 255
*rectangle 0 0 40 80
*
moveto 0 5
lineto 0 0 
lineto 40 0
lineto 40 5
polybezier 0 5  5 5      5 15  0 15
polybezier 40 5  35 5      35 15  40 15
moveto 0 15
lineto 0 80
lineto 40 80
lineto 40 15
*
moveto 20 -20
lineto 20 10
*
moveto 10 10 
lineto 30 10
moveto 15 15 
lineto 25 15
moveto 10 20 
lineto 30 20
moveto 15 25 
lineto 25 25
moveto 10 30 
lineto 30 30
moveto 15 35 
lineto 25 35
moveto 10 40
lineto 30 40
moveto 15 45 
lineto 25 45
moveto 10 50 
lineto 30 50
moveto 15 55 
lineto 25 55
moveto 10 60
lineto 30 60
moveto 15 65 
lineto 25 65
moveto 10 70 
lineto 30 70
moveto 15 75 
lineto 25 75
*
moveto 20 75
lineto 20 100
solidpen 192 192 192 0
solidbrush 192 192 192
rectangle 15 -5  25 0
*
* thermal connection
solidpen 0 255 255 3
solidbrush 0 255 255
rectangle 42 0 50 40
moveto 45 20
lineto 60 20
*
*monitor
solidpen 0 255 0 0
moveto 40 60
lineto 60 60
moveto 50 57
lineto 58 60
lineto 50 63
*