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.