home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
simtel
/
sigm
/
vols000
/
vol064
/
abstract.064
< prev
next >
Wrap
Text File
|
1985-02-09
|
5KB
|
89 lines
CONTENTS OF VOLUME #12
Craiτ Rudliε haΣ promiseΣ mσ somσ shor⌠ program≤ tha⌠ hσ haΣ ì
developeΣ becausσ hσ misseΣ somσ feature≤ oµ Basic« S∩ hσ sen⌠ mσ ì
thi≤ disk« No⌠ onl∙ diΣ hσ senΣ mσ thσ Pasca∞ equivalen⌠ oµ ß lo⌠ ì
oµá Basiπá commands¼á hσ sen⌠ mσ ß commercia∞ versioε oµ hi≤á NA─ ì
series«á Bu⌠ that≤ anothe≥ subject« Thσ othe≥ majo≥ contributor≤ ì
both have excellent programs so don't overlook RANDOM AND XREF.
1«á Thσá bes⌠ ╔ coulΣ d∩ fo≥ thi≤ grou≡ oµ program≤ wa≤ t∩á lis⌠ ì
jus⌠ wha⌠ the∙ did«á It'l∞ brinτ memorie≤ bacδ t∩ thosσá olΣ ì
timσá Basiπá programers«á Remember¼á Peeδ anΣ Pokσ ha≤á beeε ì
already covered in Vol.3.
UCASE.PAS/SR├á Functioεá t∩ conver⌠ ßá strinτá oµá ma° ì
length=255 to all upper case and return
the converted string(Basic=UCASE$)
LCASE.PAS/SRC Function to convert a string "x" to all
lower case characters(Basic=LCASE$(A$)
STR.PAS/SRC Function to convert a string "str" to a
real number(Basic=VAL$)
SPACE.PAS/SR├á Functioε t∩ returε "xó numbe≥ oµ space≤ ì
to a write command or statement(Basic=
SPACE$(X) or TAB(X)).
POWER.PAS/SR├á Functioεá t∩ raisσ ß numbe≥á "xóá t∩á ß ì
power "y"...x must be real and y must
be an integer...greater than zero.
(Basic=arithematic command **as in A=
x**2).
RIGHT.PAS/SRC Function to return the "y" right most
characters of a string "x"(Basci=RIGHT$
(A$,X).
MID.PAS/SRC Function to extract char's from within
a string, starting at position "y" and
ending at postion "z"(Basic=MID$(A$,X,Y)
LEFT.PAS/SR├á Functioεá t∩ returε thσ "yóá lef⌠á mos⌠ ì
char'≤á oµá strinτá "xó wherσ ∙á i≤á aε ì
integer value (Basic=LEFT$(A$,X))
INPUT.PAS
CORRECT.PA╙áá Thesσá worδá togeathe≥á t∩á providσáá ß ì
function to position cursor on terminal
scren, enter data, and then check the
data to insure it is within acceptable
limits, will erase for re-entry.
Craig also has expanded his NAD program to such an extent
that he is going semi-professinal on it but he wanted to donate
some more goodies that will help expand the capabilities of the
older versions. Look these over for ideas and use in conjunction
with his NAD program.
LOCATE.COM/PAS This will search a Com file for the
starting and ending address of an array
of characters. Then use INSTALL.è INSTALL.COM/PAS This will install a new array into the
addres≤ááá determineΣááá witΦááá LOCATE« ì
(Remember the 32,768 limit)
LABEL.COM/PAS Print your labels.
LOCACCTS.COM/PAS Get account without using NAD
The rest of these are procedures which Craig uses often and
can be considered part of his library. Look them over and see if
you can use them or even modify them for your own use.
INTEGER.PAS/SRC ERASE.PAS/SRC MOVE.PAS/SRC
CLEAR.PAS REPCHAR.PAS/SRC QUERY.PAS/SRC
PROMPT.PAS/SRC
2«á Ra∙á Penle∙á hasn'⌠á sloweΣ down«á Herσ i≤á hi≤á latest«á ┴ ì
excellent Random number generator written in Pascal with a
program to test them.
RANDOM.LIB/REL/SRC RANTEST.COM/PAS
3. Warren Smith, of Sacramento, CA, is our newest professional
programer to donate something outstanding. XREF is in itself
aεá excellen⌠á prograφ t∩ usσ BU╘ Warreε tooδá i⌠á onσá ste≡ ì
further«á Hσá addeΣá ß beautifu∞ feature«á I⌠ no≈á doe≤á thσ ì
normal cross-reference thing but in addition it prints out,
with dash's, the blocks. For example: it tie's the BEGIN
with it own END. It allows you to see at a glance, how the
block structure nests. A really super program-----
Warreεá als∩á donateΣ ß Scientifiπá Calculato≥á prograφ ì
that can do almost everything. So now you don't have to buy
a high priced calculator, use your computer.
XREF.COM/PAS HANDCALC.COM/PAS