home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
basic
/
library
/
pb
/
library1
/
pb091890
< prev
next >
Wrap
Text File
|
1990-09-18
|
8KB
|
222 lines
all
H#: 66146 S12/SPECTRA Publishing
17-Sep-90 22:41:40
Sb: #65978-Strange Error!
Fm: Howard Ballinger 71121,776
To: Mike Burns 71551,1353 (X)
Mike --
That's it! There was an error in the 6th line of the second $INCLUDE file in my
main program -- and what the cursor was pointing to was the 6th line of the
second $INCLUDE file in the last PBU that was linked to that main file !!
Thanks a g a i n.
-- Howard
Press <CR> for next or type CHOICES !
H#: 66014 S12/SPECTRA Publishing
17-Sep-90 11:30:25
Sb: #PowerBASIC #2.1 Features
Fm: Bob Zale: PowerBASIC R&D 76304,1303
To: ALL
1. Performance
a. Capacity to COMPILE LARGER PROGRAMS: 10% to 40% larger!
b. Faster execution: better code generation and optimization
c. Smaller EXE's: some testers report up to 20% smaller!
d. Compression of empty string segments
e. MAP file recognized by many external debuggers: Now use TD
or Periscope for source-level debugging of PowerBASIC programs!
2. Network support
a. LOCK and UNLOCK statements for file and record locking
b. OPEN statement extensions
1. file access: READ, WRITE, or READ WRITE
2. lock type: SHARED, LOCK READ, LOCK WRITE, or LOCK READ WRITE
3. File access extensions
a. DOS character devices supported
b. PowerBASIC character devices
1. CONS: console device added
2. CONS: and KYBD: support command-line redirection
4. Serial communications
a. COM3: and COM4: supported (from IRQ4 and IRQ3 only)
b. added baud rates: 19200, 38400, 57600, 115200
c. DT option keeps DTR high after file close
5. User interface
a. program output remains visible until keypress
b. enhanced debugger minimizes screen "flash"
c. background sound controlled during debugging
d. automatic breakpoint at program error handler and RESUME
6. New/enhanced operations
a. DIR$: reads file, directory, and volume names.
b. CHDRIVE: alters the default disk drive
c. CURDIR$: returns the current directory
d. ATTRIB: sets or returns file attributes
e. SEEK: sets or returns file position for any file type
f. OPTION BINARY BASE: allows binary files to be referenced indexed
to zero or one
g. INPUT & LINE INPUT: read strings up to 32750 characters
h. $LINK:
1. explicit error messages with ID names for invalid $LINK files
2. OBJ files with emulated 8087 op-codes
3. public code and data may be shared between OBJ files
i. $IF 0/$ENDIF: allows any text for comment blocks
There is 1 Reply.
Press <CR> for next or type CHOICES !
H#: 66113 S12/SPECTRA Publishing
17-Sep-90 20:02:09
Sb: #66014-#PowerBASIC #2.1 Features
Fm: John Watts 73760,751
To: Bob Zale: PowerBASIC R&D 76304,1303 (X)
Bob,
That's good news! Got a couple of questions.
FILES displays files & subdirectories, but you have no control over the
information(filenames). It just prints it to the screen. Will DIR$ give me a
string that includes this information that I can then use as I choose? Will it
provide file size, file date and time?
SEEK: Does this mean that if I, OPEN FOR INPUT "FOO.BAR" AS #1, that I will
be able to randomly through the file?
$IF 0
Is this the syntax for the comment blocks? $ENDIF
I hope the answer is YES! YES! YES! & YES!
John
There are 2 Replies.
Press <CR> for next or type CHOICES !
H#: 66190 S12/SPECTRA Publishing
18-Sep-90 07:45:21
Sb: #66113-PowerBASIC #2.1 Features
Fm: Bob Zale: PowerBASIC R&D 76304,1303
To: John Watts 73760,751
DIR$ will just retrieve the file name, but it may also optionally return
sub-directory and volume names, too. You can then use ATTRIB and LOF to find
the type/attributes and the file size. SEEK statement and function will now
work with sequential files, also, so you can position the file pointer anywhere
you wish. Yes, $IF 0/$ENDIF will delimit comment blocks with any text within.
Bob Zale (PowerBASIC R&D)
Press <CR> for next or type CHOICES !
H#: 66202 S12/SPECTRA Publishing
18-Sep-90 08:28:36
Sb: #66113-PowerBASIC #2.1 Features
Fm: AL MUSELLA 76114,637
To: John Watts 73760,751
John,
If the new version of PB doesn't return the file date and time stamp, there
is a function in the Compuserve library that will do this for you. I uploaded
it a few days ago, in a file called "MAKE.ZIP"
Al
Press <CR> for next or type CHOICES !
H#: 66015 S12/SPECTRA Publishing
17-Sep-90 11:32:31
Sb: PowerBASIC #2.1 Upgrade
Fm: Bob Zale: PowerBASIC R&D 76304,1303
To: ALL
My previous message was full of propaganda for PowerBASIC #2.10. As you can
see, many improvements . . . lots of new features . . . all at a pretty
affordable upgrade fee. Be the first on your block with PowerBASIC #2.10!
Seriously though, we believe that PowerBASIC #2.10 offers a substantial
improvement over the existing product. In fact, I guarantee you'll agree, so
there's no reason to delay. Registered users of PowerBASIC #2.00 can upgrade
for $19.00 (+$7 s&h). Until October 31, 1990, registered users of Borland's
Turbo Basic can upgrade for $59.00 (+$7 s&h). To order it today, just call
Spectra "toll-free" at 1-800-245-6717.
Bob Zale (PowerBASIC R&D)
Press <CR> for next or type CHOICES !
H#: 66134 S12/SPECTRA Publishing
17-Sep-90 21:21:19
Sb: #Will this work?
Fm: John Watts 73760,751
To: Barry Erick f/ Spectra 75300,214 (X)
Barry,
I'm not sure about the following code. Take a look at it and see if
you think it's ok. Do I need to check CF after close? - John -
function fExist%(filespec$) 'ZDDDDDDDDDDDDDDDDDDDDDDDDDDDD?
f$ = filespec$+chr$(0) '3 Put filespec$ in f$+null 3
segment& = strseg(f$) '3 Find segment of f$ 3
def seg = segment& '3 Define segment of f$ 3
reg 8, segment& '3 Load segment of f$ in DS 3
reg 4, strptr(f$) '3 Load offset of f$ in DX 3
reg 1, &h3d00 '3 Fuction 3Dh - Open file 3
call interrupt &h21 '3 Call DOS 3
if (reg(0) and 1) = 1 then '3 If CF set - file not
found 3
fExist% = 0 '3 fExist = False 3
exit function 3 3
else '3 Else file open / found 3
fExist% = -1 '3 fExist = True 3
end if 3 3
reg 2, reg(1) '3 MOV AX,BX - file handle 3
reg 1, &h3e00 '3 Function 3Eh - Close file 3
call interrupt &h21 '3 Call DOS 3
end function '@DDDDDDDDDDDDDDDDDDDDDDDDDDDDY
There are 2 Replies.
Press <CR> for next or type CHOICES !
H#: 66135 S12/SPECTRA Publishing
17-Sep-90 21:28:40
Sb: #66134-Will this work?
Fm: John Watts 73760,751
To: John Watts 73760,751
Sorry about that - Tapcis will let you enter graphic characters - CIS just
doesn't like them. LIVE & LEARN!
John
Press <CR> for next or type CHOICES !
H#: 66168 S12/SPECTRA Publishing
18-Sep-90 04:30:18
Sb: #66134-Will this work?
Fm: Barry Erick for Spectra 75300,214
To: John Watts 73760,751
Except you do not need the DEF SEG with PB. Also with 2.10, you
if Dir$(filespect$) <>"" then FileExists
(this is the same as findfirst)
-- Barry
Press <CR> for next or type CHOICES !
HPC Vendor B ForumHSections Menu
Section names (#subjs/# msgs)
1 Quarterdeck (44/65)
2 Primavera Systems (1/1)
3 Korenthal Assocs. (1/3)
4 Personics Corp. (15/32)
6 TurboPower Software (25/55)
7 ChipSoft, Inc. (2/3)
8 DacEasy (5/7)
10 J.P. Software (11/28)
11 PDC Prolog (3/5)
12 SPECTRA Publishing (4/9)
HEnter choice(s) or ALL !