Это ведь так просто... чуть-чуть документации..

Pavel Zagrebelin 01.06.2004 18:46

@CLASS
class

@init[iparam]
#iparam --- локальное, а lparam -- глобальное для класса
$lparam[^hash::create[$iparam]]

@do[text]
^if($lparam.para1 eq "1"){$text}{не $text, a $lparam.para2}

@main[]
^use[class.p]

#не даём никаких параметров
$var[^class::init[]]
^var.do[lala]
<hr>
#а теперь скармливаем кучу параметров.
$var[^class::init[
	$.para1[1]
	$.para2[2]
]]
^var.do[bebe]

<hr>
#и ещё раз. с другим значением para1
$var[^class::init[
	$.para1[2]
	$.para2[2]
]]
^var.do[hehe]