This utility, by Paul Marfia, demonstrates printing a 3 of 9 barcode on a
laserjet, with enhancements to assure readability; great piece of code.
This utility will check a file for a LOT of things: do the parts of the ID
add up to less than or equal to the length shown in @ID and/or ID? Is
@ID a MASTER FIELD? Are all BTREE and RELATIONAL indexes also MASTER
FIELDS? Do the CASE SENSITIVE flags match the justifications of the
indexed columns? (i.e. It's only a best guess, but Right justification should
have a 0 for CASE SENSITIVE (numbers shouldn't care) and Left justified should
have a 1 for CASE SENSITIVE as Left justified fields are usually text.
Then the file is scanned for IDs with control characters in them, and the
items are check for characters 0-31 and 129-146. You are given the
option of having the system clean the file up for you if it finds bad IDs or
records, and then it will rebuild all indexes that you had on the file.
If you want it to, it clears SYSTEMP (should be on a local drive, right?),
then copies the good records over, deletes the indexes, then clears the file,
then copies the good records back, then rebuilds the indexes.
(Whew!) I'm so tired doing all of this, that I can't even give you
compiled code; I'll just have to give you a ZIP with just the source, darn it.
<g> Coming soon. I'm just adding the index rebuilder (that
will be compiled, but what the heck).
This is an update to CLIB.NLM and fixes the FS461, FS466, etc.
problems. This file was just released privately by Novell and is not yet
available on their site. It has been installed and tested by a large
AREV site and works fine.
This is a user conversion that will take multiple parameters to display
text in various colors, with various backgrounds, in a prompt window, with or
without doing another OCONV (such as MD2,) first. You specify the colors
with names, so it makes reading your code easy. You will need $SSPEEK
This is a function by Blair James written in 1991 that calculates the CRC
of an item passed to it. You can use it on AREV items or on DOS
files. You can use it on DOS files larger than 64K by reading chunks LT
64K in and continuing the CRC on each chunk.
This is source for a subroutine that pops a window to let you tag,
depending on the options you send to the subroutine, fixed and/or symbolic,
single and/or multi-valued fields, sorted by name or AMC and return them to
the calling routine. It also pops the DICT window if you hit [F3] at the
highlighted dictionary item so that you can take a look at it.
This routine returns a delimited list of all valid DOS non-floppy drives
active on the computer. Object only. OKDRIVES
is a quick sample program to popup a list of those drives and let the user
pick one. This is a utility from Steve
Smith, who tells me there is a variant in util15.zip on his website.
I got tired of writing a different DOS read utility, so I wrote one that
handles any size DOS file, with any type or length delimiter. This
routine allows you to specify the number of 'lines' to import on each read and
returns to you the actual number of lines read. This routine also sets
the STATUS() flag in accordance with the OSBREAD status flags in case there is
an error. Source only in this file.
Great R/Basic source code for a copy of the Microsoft Minesweeper
game. I believe Curt Putnam was the author.
I wrote this routine to simply changing prompt attributes, such as (un)hiding,
changing the label, (un)setting the prompt length, setting the row limit for
MV fields (really handy!) and changing the entry type (O, P, VP, RP,
etc.). You can call it using the prompt number or the DICT ID! You
can change multiple prompts at once, and entering prompt names that don't
exist doesn't blow the system up. This can be used in collectors or
This routine returns you a DIMed array that is the same as @FILES in the
debugger; rename it to RTIFILES. Object only.
Last updated: May 08, 2000.
This zip file includes source for 2 screen savers; one is one called
'WORMS' (ok) and the other is 'SNOWFALL' (great). Author is unknown.
These are two INCLUDEs written by Larry Wilson that BLANK and UNBLANK the
screen - to and from total black; great to use if you're going to perform DOS
functions (PC or SUSPEND).
This is source for a subroutine first submitted by Chris Leenhouts and
modified by Larry Wilson so that it runs under AREV 3.x also. When
attached to any softkey of a screen, this subroutine will popup a lot of
information about that screen at runtime. It will show, and allow you to
edit, fixed and symbolic dictionary items; it will show Softkeys, Related
Windows, active tables, processes (handy if you modify processes at runtime)
and much more. You might wonder how you ever got along without it.
This ZIP file has 3 files in it; here are the DOS names followed by their
AREV name: SHOWC - SHOW_COLORS; $VIDRD - $VIDEO_READ; $VIDWR - $VIDEO_WRITE.
What SHOW_COLORS does is print to your screen ALL of the possible
foreground/background color combinations possible. It prints columns
that show the SEQ number (i.e. 176) and that SEQ number is shown in the
foreground/background color combination that it creates. Pretty handy
for figuring out what color combination you want and what the SEQ number is
Please note that $VIDEO_READ and $VIDEO_WRITE were created by Sprezzatura
and are contained within one of their issues of SENL.
This is a subroutine that is used to determine if your program is running
within a window. Look below to see the correct usage.
This archive contains two DOS programs to convert Revelation files to DOS
format and visa-versa. I do not remember where I got them, but I did not
write them. However, they are incredibly useful and fast. Use both as
program-name input-file output-file.
There are two text files in the zip; EPSON and HP4PCL. These contain
EQUATES for the basic functions and fonts for the respective printers.
Utilities (remote site)
I can't say enough about the utilities that Steve has. They are
concise, bulletproof and always useful.
Ryengoth's PickBasic Snippits this
link is currently broken
Here are some handy string routines: Binary-to-ASCII, ASCII-to-Binary,
ANDing, ORing, and XORing; all in one zip - source only. These are from
a remote site - when I find it again I'll put a link in.
$insert, tinclude, InWin$ is comprised of:
declare function SSPEEK
InWin$ = (SSPEEK(1160) = 135)
$insert tinclude, PrintConstants (printc.zip)
$insert tinclude, wconst.zip
This routine is from David Tod Sigafoos
This routine is used on the DClick of a Table
control. Its purpose