home *** CD-ROM | disk | FTP | other *** search
- Welcome to this little utility. First of all, a few words of legal things:
-
- This program and all related files are copyrighted by the author, Frédéric
- Delacroix, and cannot be sold for profit. They are released as FreeWare,
- meaning everyone is allowed to use and copy the program free of charge as long
- as all files are spread together and remain unchanged. A small fee for copy and
- mail is allowed.
-
- The reason for this program to be is that I recently had trouble in finding
- which of the programs launched in my user-startup was sometimes crashing the
- system. I wrote a special version of the user-startup that asked before running
- all programs, and thought it would be great to have a program allowing to switch
- the files automatically when a key was hit.
-
- The best candidates for those keys were of course the qualifiers, since they do
- not interfere with the output window. Moreover, there is a new (V36) function
- in the input.device that would make it easy to test: PeekQualifier(). So here
- is this program, which does not even require a window to be opened to work. The
- program fits in one disk block, and is pure, meaning it can be made resident.
-
- To use PeekQual, you must have kickstart 2.04 or higher. It will only work from
- CLI, the template is as follows:
-
- PeekQual ONQUAL,OFFQUAL
-
- Each of the arguments, ONQUAL and OFFQUAL, should be a word made of the
- following letters (I've tried to respect this rule: lower case for left keys,
- and upper case for right ones):
-
- s: left Shift
- S: right Shift
- c: Control
- C: Caps lock
- a: left Alt
- A: right Alt
- g: left amiGa
- G: right amiGa
- b: left mouse Button
- B: right mouse Button
- m: Middle mouse button
-
- The program does the following: it PeekQualifier()s and then tests the
- result: if all keys given in the ONQUAL argument are pressed and all keys given
- in the OFFQUAL argument are NOT be pressed, then the program returns WARN (5),
- else it returns OK (0). The result can then be tested with the IF WARN command
- in a script file. All qualifiers given neither in ONQUAL nor in OFFQUAL are
- ignored.
-
- Example, in your startup-sequence:
-
- PeekQual CSs
- IF WARN
- Execute S:User-Startup.Debug
- ELSE
- Execute S:User-Startup
- ENDIF
-
- will execute the normal user-startup file, unless you are pressing caps
- lock and both shift keys at the time PeekQual is run, in which case it is
- user-startup.debug that is run.
-
- Another example, at the end of your startup-sequence:
-
- execute S:User-Startup
- LoadWB -DEBUG
- PeekQual OFFQUAL=G
- IF WARN
- EndCLI
- ENDIF
-
- This will end normally the startup-sequence (and close the window if
- open), unless you are pressing the right amiga key, in which case the window
- remains open for you to use as a normal Shell.
-
- The source is provided in this archive, and is copyrighted as are the
- other files, but you can use it for whatever you want, as long as you mention my
- name. By the way, you can send me whatever you want: Bug reports, postcards,
- nice letters, money, PD programs, Amigas 4000, CD-Rom drives, etc... All will
- receive an answer (especially for a 4000 :-), except swapper letters which fall
- from the left of my desk down to the trashcan.
-
- Frédéric Delacroix
- 5 rue d'Artres
- 59269 Quérénaing
- FRANCE (maybe on Internet by oct 94)
-
- And, above all, continue to support the amiga, especially now !
-