\begindata{text,538479712}
\textdsversion{12}
\template{default}
\define{global
}
After empowering the Ness inset below, moving the ``volume knob'' will alter 
the speaker value logarithmically.

\center{\
\begindata{cel,538596360}
\V 2
\begindata{value,538756488}
>1
\enddata{value,538756488}
10 538756488 1 0 0 0 
>OBJ< value
>VIEW< sliderV
>REF< volume
\begindata{text,539047432}
\textdsversion{12}
[string] <style> ()

[string] <immediate-update> ()

[string] <read-only> ()

[string] <color> (pink)

[string] <shade-color> ()

[long] <min_value> (01)

[long] <max_value> (60)

[long] <bodyfont-size> (8)

[string] <bodyfont> (andysans)

[string] <label> (Volume)

\enddata{text,539047432}
\enddata{cel,538596360}
\view{celview,538596360,682,0,181} 
\begindata{cel,539179528}
\V 2
\begindata{value,538756616}
>0
\enddata{value,538756616}
10 538756616 1 0 0 0 
>OBJ< value
>VIEW< bargraphV
>REF< speaker
\begindata{text,538286564}
\textdsversion{12}
[string] <style> ()

[string] <immediate-update> ()

[string] <read-only> ()

[string] <color> (light blue)

[string] <shade-color> ()

[long] <min_value> (0)

[long] <max_value> (409)

[long] <bodyfont-size> (8)

[string] <bodyfont> (andysans)

[string] <label> (Speaker)

\enddata{text,538286564}
\enddata{cel,539179528}
\view{celview,539179528,683,0,183} 
\begindata{cel,539179784}
\V 2
10 538756616 1 0 0 0 
>OBJ< value
>VIEW< sliderV
>REF< speakerknob
>LINK< speaker
\begindata{text,538418312}
\textdsversion{12}
[string] <style> ()

[string] <immediate-update> ()

[string] <read-only> ()

[string] <color> (green)

[string] <shade-color> (purple)

[long] <min_value> (-100)

[long] <max_value> (409)

[long] <bodyfont-size> (8)

[string] <bodyfont> (andysans)

[string] <label> (Speaker Knob)

\enddata{text,538418312}
\enddata{cel,539179784}
\view{celview,539179784,684,107,185}}

Speaker and Speaker Knob share the same data object, so they always have the 
same values.

\center{\
\begindata{ness,538752008}
\origin{-1\\unknown date\\????: Unknown User\\00}
\template{default}
\define{global
}
\define{sans
menu:[Font,Sans]
attr:[FontFamily AndySans Int 0]}
\italic{extend} \bold{"volume"}

	\italic{on mouse} \bold{"any"}

		dohit(currentinset, mouseaction, mousex, mousey);

		if mouseaction = mouseleftup then

			integer volume;

			volume := value_GetValue(currentinset);

			volume := round(100.0 * log(float(volume)));

			value_setValue(inset("speaker"), volume);

		end if;

	\italic{end mouse}

\italic{end extend}


function main()

	writefile("/tmp/t", "\bold{Now} is the \bigger{\bigger{\underline{season}}} 
to be \italic{Jolly}.");

end function;\
\enddata{ness,538752008}
\view{nessview,538752008,685,0,0}

}

\begindata{bp,537558784}
\enddata{bp,537558784}
\view{bpv,537558784,687,0,0}
Copyright 1992 Carnegie Mellon University and IBM.  All rights reserved.

\smaller{\smaller{$Disclaimer: 

Permission to use, copy, modify, and distribute this software and its 

documentation for any purpose is hereby granted without fee, 

provided that the above copyright notice appear in all copies and that 

both that copyright notice, this permission notice, and the following 

disclaimer appear in supporting documentation, and that the names of 

IBM, Carnegie Mellon University, and other copyright holders, not be 

used in advertising or publicity pertaining to distribution of the software 

without specific, written prior permission.



IBM, CARNEGIE MELLON UNIVERSITY, AND THE OTHER COPYRIGHT HOLDERS 

DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING 

ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS.  IN NO EVENT 

SHALL IBM, CARNEGIE MELLON UNIVERSITY, OR ANY OTHER COPYRIGHT HOLDER 

BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY 

DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, 

WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS 

ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE 

OF THIS SOFTWARE.

 $

}}\enddata{text,538479712}
