; SILIB.ACT››; Super-IRG Library for Action!››; by Bill Kendrick›; kendrick@zippy.sonoma.edu›; http://zippy.sonoma.edu/kendrick/››; November 27, 1997 - November 27, 1997››MODULE››Card OLDVBI›Byte CHBAS=756,RTCLOCK=20›Byte FLIP,CHPage››Proc SIVBI()› FLIP=4-FLIP› CHBAS=CHPage+FLIP›[$6C OLDVBI]››Proc SIOn(Card CHAddr)› Card Pointer Temp› Card VVBLKD=$224› Byte V›› OLDVBI=VVBLKD› CHPage=CHAddr/256› FLIP=0›› Temp=548› V=RTCLOCK+1› While V<>RTCLOCK Do oD› Temp^=SIVBI›Return››Proc SIOff()› Card Pointer Temp› Byte V›› Temp=548› V=RTCLOCK+1› While V<>RTCLOCK Do oD› Temp^=OLDVBI›Return››Proc SIMain()› PrintE("I'm an included library!")›Return››MODULE››