accessing
asWikiText
	| stream |
	stream := '' writeStream.
	stream
		nextPutAll: '<b>';
		nextPutAll: self chance first asString, '-', self chance last asString;
		nextPutAll: ' | ', self brief;
		nextPutAll: '</b>'; cr;
		nextPutAll: String cr;
		nextPutAll: self details;
		nextPutAll: String cr;
		nextPutAll: self subtableAsWikiText.
	stream 
		nextPutAll: String cr;
		nextPutAll: '<$details summary="Quest Starter">'; cr;
		nextPutAll: '//', self questStarter, '//'; cr;
		nextPutAll: '</$details>'.
	^ stream contents