旼컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� � � � 靈爐� � � 爐커 � � � 픔캑 픔 � � � � � 懃켸 � � � � 靈커 � � 爐커 靈커 � � 爐커 爐커 � � � 픔캑 픔 � 픔좆 픔 픔쬔 � � 聃켸 � � 懃켸 聃켸 � � 懃켸 � � � � � 쳐컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� � � � From FiRe Productions Ltd. � � Copyright (c) 1993 FiRe Productions Ltd. � � Designed as the Main Body to Checker.PPE � � � 읕컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴컴� *:::::::::::::::::::::::::::[ DISCLAIMER ]:::::::::::::::::::::::::::::::::* CHECKER.PPE is provided AS IS without any warranty, expressed or implied. This includes without limitation the fitfulness to a particular purpose or application and any warranties of merchantability. While I tried to be as through as possible while debugging CHECKER.PPE, I shall not be liable for any damages, whether direct, indirect, special, or consequential arising from a failure of CHECKER.PPE to operate in a manner desired by the user. I shall not be liable for any damage to data or property which may by caused directly or indirectly by use of CHECKER.PPE. In no event will I be liable to you for any damages, including any lost profits, lost savings or other incidental or consequential damages arising out of your use or inability to use the program, or for any claim by any other party. *::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::* The Checker one of a package of utilities to create and check registration codes. It is one of the first, and safest registration code generators that is available. For the price, I believe that you are getting quite a deal. Many hours of thought and research were invested into this package. I would appreciate the registration of this package before you distribute this in any of your applications. Installation and use of this program is simple. You need to add this sequence of code to any .PPE application that you would liek to include in this. ;Defining Variables BOOLEAN X ;This variable can be any that you want INTEGER REG_CODE(3), MY_REG(3), REG_MULT(3) STRING NAME(1), MY_NAME(2) ;Opening Config file FOPEN 1, PPEPATH() + "", O_RW, S_DB ; is your ;config file name FGET 1, NAME(1) ;First name of sysop using application FGET 1, NAME(2) ;Last name of sysop using application FGET 1, REG_CODE(1) ;First line of reg code FGET 1, REG_CODE(2) ;Second line of reg code FGET 1, REG_CODE(3) ;Third line of reg code FCLOSE 1 MY_NAME(1) = "" MY_NAME(2) = "" MY_REG(1) = ;Reg code you recieve from me - 0 if unreged MY_REG(2) = ;Reg code you recieve from me - 0 if unreged MY_REG(3) = ;Reg code you recieve from me - 0 if unreged REG_MULT(1) = ;Same as that you will use to create codes REG_MULT(2) = ;Same as that you will use to create codes REG_MULT(3) = ;Same as that you will use to create codes FCREATE 1, PPEPATH() + "\INFO.FIL", O_RW, S_DB FPUT 1, MY_NAME(1) FPUT 1, MY_NAME(2) FPUT 1, MY_REG(1) FPUT 1, MY_REG(2) FPUT 1, MY_REG(3) FPUT 1, NAME(1) FPUT 1, NAME(2) FPUT 1, REG_CODE(1) FPUT 1, REG_CODE(2) FPUT 1, REG_CODE(3) FPUT 1, REG_MULT(1) FPUT 1, REG_MULT(2) FPUT 1, REG_MULT(3) FCLOSE 1 ;Calling Checker.PPE CALL PPEPATH() + "CHECK.PPE" ;Checking to see if reged or not FOPEN 1, PPEPATH() + "\RETURN.FIL", O_RW, S_DB FGET 1, X ;Tells if reged or not : 1 = Registered : 2 = Unregistered FCLOSE 1 This program is freely distributed under these limitations (1) - Unless you are using this as part of an application, it must be accompanied by all files which are included with it now, including all documentation, config files, ect. (2) - All parts are unmodified. This includes, but is not limited to Hacking, and recompiling Changing the documentation Thank you for picking The Checker from FiRe Productions Ltd. If you have any questions or comments, please either call the support BBS, or send a letter with a self-addressed stamped envelope for your answer to : Mike Church c/o The Checker - Questions 520 West Boulevard South Elkhart, Indiana 46514-2016 Support BBS: The Loonie Bin Home of FiReNeT Node #1 - (219)294-1084 Node #2 - Private