/*
	Scriptol Example
	Simple class with one method
	Count occurence of a words in a string
*/	


class Words

	int count(text base, text sea)
		int ctr = 0
		int i = 0
		while forever
			i = base.find(sea, i)
			if i = nil break
			i + 1
			ctr + 1
		/while
	return ctr

/class

Words demos
text sample = "a b c de a hello a"
print "Number of words:", demos.count(sample, "a")