Monday, November 08, 2010 at 12:06 AM.

---

system.verbs.builtins.userland.isValidSerialNumber

on isValidSerialNumber (s) {
	<<Changes
		<<12/4/01; 5:32:08 PM by DW
			<<Kernelized.
		<<12/2/01; 10:28:10 AM by DW
			<<Created. Returns true if it is a valid serial number, false otherwise. Jake has the code that really does this, I hope.
	kernel (frontier.isvalidserialnumber)}
<<bundle //test code
	<<op.go (right, 1)
	<<loop
		<<if not isValidSerialNumber (op.getlinetext ())
			<<scripterror ("Not a valid serial number.")
		<<if not op.go (down, 1)
			<<op.go (left, 1)
			<<break
	<<dialog.alert (isValidSerialNumber ("no way"))

---

This listing is for code that runs in the OPML Editor environment. I created these listings because I wanted the search engines to index it, so that when I want to look up something in my codebase I don't have to use the much slower search functionality in my object database. Dave Winer.