Код "случайный анекдот"

Bobych v.3 26.04.2004 17:02

Примитивный код, но всё таки хочется услышать мнения по рандомайзеру (может антикеширование какое ввести?):

@faq[SourceFile]
^if(def $SourceFile && -f "/textfiles/$SourceFile"){
	Рандом фак:
	$SourceFileTable[^table::load[/rrr/$SourceFile]]
	^SourceFileTable.offset(^math:random($SourceFileTable))
	Вопрос: $SourceFileTable.question <BR>
	Ответ: $SourceFileTable.answer <BR>
}

---