if ( RAMA_PLOT .eq. "OFF" ) then
image erase PLOT_RAMACH
image group show

image group name PLOT_RAMACH
graph
object = 1
scale = 1.0 
character scale = 0.01
read file >utils/rama.graph lwplot
exit
 set dial = 1 init
 set dial = 1 graph obj = 1 translate
 set dial = 4 graph obj = 1 scale equal
!  set dial = 5 graph obj = 1 char
 set dial = 1 write
 set dial = 1 from = 1
! image from erase
set vari RAMA_PLOT global char = "ON"
menu block UTILS item RAMACHAN button on
return
end_if

if ( RAMA_PLOT .eq. "ON" ) then
!image from 3
!image erase
image erase PLOT_RAMACH
set vari RAMA_PLOT global char = "OFF"
menu block UTILS item RAMACHAN button off
return
end_if