home *** CD-ROM | disk | FTP | other *** search
/ Boston 2 / boston-2.iso / DOS / PROGRAM / BASIC / POWBASIC / LIBRARY1 / EXAMP2.ZIP / PB091890 < prev    next >
Text File  |  1990-09-18  |  8KB  |  222 lines
  1. all
  2. H#: 66146 S12/SPECTRA Publishing
  3.     17-Sep-90  22:41:40
  4. Sb: #65978-Strange Error!
  5. Fm: Howard Ballinger 71121,776
  6. To: Mike Burns 71551,1353 (X)
  7.  
  8.  
  9. Mike --
  10.  
  11. That's it! There was an error in the 6th line of the second $INCLUDE file in my
  12. main program -- and what the cursor was pointing to was the 6th line of the
  13. second $INCLUDE file in the last PBU that was linked to that main file !!
  14.  
  15. Thanks  a g a i n.
  16.  
  17.   -- Howard
  18.  
  19.  
  20.  
  21. Press <CR> for next or type CHOICES !
  22. H#: 66014 S12/SPECTRA Publishing
  23.     17-Sep-90  11:30:25
  24. Sb: #PowerBASIC #2.1 Features
  25. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  26. To: ALL
  27.  
  28.   1. Performance
  29.      a. Capacity to COMPILE LARGER PROGRAMS: 10% to 40% larger!
  30.      b. Faster execution: better code generation and optimization
  31.      c. Smaller EXE's: some testers report up to 20% smaller!
  32.      d. Compression of empty string segments
  33.      e. MAP file recognized by many external debuggers:  Now use TD
  34.         or Periscope for source-level debugging of PowerBASIC programs!
  35.   2. Network support
  36.      a. LOCK and UNLOCK statements for file and record locking
  37.      b. OPEN statement extensions
  38.         1. file access: READ, WRITE, or READ WRITE
  39.         2. lock type: SHARED, LOCK READ, LOCK WRITE, or LOCK READ WRITE
  40.   3. File access extensions
  41.      a. DOS character devices supported
  42.      b. PowerBASIC character devices
  43.         1. CONS: console device added
  44.         2. CONS: and KYBD: support command-line redirection
  45.   4. Serial communications
  46.      a. COM3: and COM4: supported (from IRQ4 and IRQ3 only)
  47.      b. added baud rates: 19200, 38400, 57600, 115200
  48.      c. DT option keeps DTR high after file close
  49.   5. User interface
  50.      a. program output remains visible until keypress
  51.      b. enhanced debugger minimizes screen "flash"
  52.      c. background sound controlled during debugging
  53.      d. automatic breakpoint at program error handler and RESUME
  54.   6. New/enhanced operations
  55.      a. DIR$: reads file, directory, and volume names.
  56.      b. CHDRIVE: alters the default disk drive
  57.      c. CURDIR$: returns the current directory
  58.      d. ATTRIB: sets or returns file attributes
  59.      e. SEEK: sets or returns file position for any file type
  60.      f. OPTION BINARY BASE: allows binary files to be referenced indexed
  61.         to zero or one
  62.      g. INPUT & LINE INPUT: read strings up to 32750 characters
  63.      h. $LINK:
  64.         1. explicit error messages with ID names for invalid $LINK files
  65.         2. OBJ files with emulated 8087 op-codes
  66.         3. public code and data may be shared between OBJ files
  67.      i. $IF 0/$ENDIF: allows any text for comment blocks
  68.  
  69. There is 1 Reply.
  70.  
  71. Press <CR> for next or type CHOICES !
  72. H#: 66113 S12/SPECTRA Publishing
  73.     17-Sep-90  20:02:09
  74. Sb: #66014-#PowerBASIC #2.1 Features
  75. Fm: John Watts 73760,751
  76. To: Bob Zale: PowerBASIC R&D 76304,1303 (X)
  77.  
  78. Bob,
  79.        That's good news!  Got a couple of questions.
  80.  
  81. FILES displays files & subdirectories, but you have no control over the
  82. information(filenames). It just prints it to the screen. Will DIR$ give me a
  83. string that includes this information that I can then use as I choose? Will it
  84. provide file size, file date and time?
  85.  
  86. SEEK: Does this mean that if I, OPEN FOR INPUT "FOO.BAR" AS #1, that I will
  87.       be able to randomly through the file?
  88.  
  89. $IF 0
  90.        Is this the syntax for the comment blocks? $ENDIF
  91.  
  92. I hope the answer is YES! YES! YES! & YES!
  93.                                                John
  94.  
  95.  
  96.  
  97. There are 2 Replies.
  98.  
  99. Press <CR> for next or type CHOICES !
  100. H#: 66190 S12/SPECTRA Publishing
  101.     18-Sep-90  07:45:21
  102. Sb: #66113-PowerBASIC #2.1 Features
  103. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  104. To: John Watts 73760,751
  105.  
  106. DIR$ will just retrieve the file name, but it may also optionally return
  107. sub-directory and volume names, too.  You can then use ATTRIB and LOF to find
  108. the type/attributes and the file size.  SEEK statement and function will now
  109. work with sequential files, also, so you can position the file pointer anywhere
  110. you wish.  Yes, $IF 0/$ENDIF will delimit comment blocks with any text within.
  111.   Bob Zale (PowerBASIC R&D)
  112.  
  113. Press <CR> for next or type CHOICES !
  114. H#: 66202 S12/SPECTRA Publishing
  115.     18-Sep-90  08:28:36
  116. Sb: #66113-PowerBASIC #2.1 Features
  117. Fm: AL MUSELLA 76114,637
  118. To: John Watts 73760,751
  119.  
  120. John,
  121.    If the new version of PB doesn't return the file date and time stamp,  there
  122. is a function in the Compuserve library that will do this for you.  I uploaded
  123. it a few days ago, in a file called "MAKE.ZIP"
  124.                                                                 Al 
  125.  
  126. Press <CR> for next or type CHOICES !
  127. H#: 66015 S12/SPECTRA Publishing
  128.     17-Sep-90  11:32:31
  129. Sb: PowerBASIC #2.1 Upgrade
  130. Fm: Bob Zale: PowerBASIC R&D 76304,1303
  131. To: ALL
  132.  
  133. My previous message was full of propaganda for PowerBASIC #2.10.  As you can
  134. see, many improvements . . . lots of new features . . . all at a pretty
  135. affordable upgrade fee.  Be the first on your block with PowerBASIC #2.10!
  136.  
  137. Seriously though, we believe that PowerBASIC #2.10 offers a substantial
  138. improvement over the existing product.  In fact, I guarantee you'll agree, so
  139. there's no reason to delay.  Registered users of PowerBASIC #2.00 can upgrade
  140. for $19.00 (+$7 s&h).  Until October 31, 1990, registered users of Borland's
  141. Turbo Basic can upgrade for $59.00 (+$7 s&h).  To order it today, just call
  142. Spectra "toll-free" at 1-800-245-6717.
  143.   Bob Zale (PowerBASIC R&D)
  144.  
  145.  
  146.  
  147. Press <CR> for next or type CHOICES !
  148. H#: 66134 S12/SPECTRA Publishing
  149.     17-Sep-90  21:21:19
  150. Sb: #Will this work?
  151. Fm: John Watts 73760,751
  152. To: Barry Erick f/ Spectra 75300,214 (X)
  153.  
  154.  Barry,
  155.        I'm not sure about the following code.  Take a look at it and see if
  156.  you think it's ok. Do I need to check CF after close?   - John -
  157.  function fExist%(filespec$)           'ZDDDDDDDDDDDDDDDDDDDDDDDDDDDD?
  158.        f$ = filespec$+chr$(0)          '3 Put filespec$ in f$+null   3
  159.        segment& = strseg(f$)           '3 Find segment of f$         3
  160.        def seg = segment&              '3 Define segment of f$       3
  161.        reg 8, segment&                 '3 Load segment of f$ in DS   3
  162.        reg 4, strptr(f$)               '3 Load offset of f$ in DX    3
  163.        reg 1, &h3d00                   '3 Fuction 3Dh - Open file    3
  164.        call interrupt &h21             '3 Call DOS                   3
  165.        if (reg(0) and 1) = 1 then                   '3 If CF set - file not
  166. found 3
  167.        fExist% = 0                     '3 fExist = False             3
  168.                exit function            3                            3
  169.        else                            '3 Else file open / found     3
  170.                fExist% = -1            '3 fExist = True              3
  171.        end if                           3                            3
  172.        reg 2, reg(1)                   '3 MOV AX,BX - file handle    3
  173.        reg 1, &h3e00                   '3 Function 3Eh - Close file  3
  174.        call interrupt &h21             '3 Call DOS                   3
  175.  end function                          '@DDDDDDDDDDDDDDDDDDDDDDDDDDDDY
  176.  
  177. There are 2 Replies.
  178.  
  179. Press <CR> for next or type CHOICES !
  180. H#: 66135 S12/SPECTRA Publishing
  181.     17-Sep-90  21:28:40
  182. Sb: #66134-Will this work?
  183. Fm: John Watts 73760,751
  184. To: John Watts 73760,751
  185.  
  186. Sorry about that - Tapcis will let you enter graphic characters - CIS just
  187. doesn't like them. LIVE & LEARN!
  188.                                        John
  189.  
  190.  
  191.  
  192. Press <CR> for next or type CHOICES !
  193. H#: 66168 S12/SPECTRA Publishing
  194.     18-Sep-90  04:30:18
  195. Sb: #66134-Will this work?
  196. Fm: Barry Erick for Spectra 75300,214
  197. To: John Watts 73760,751
  198.  
  199. Except you do not need the DEF SEG with PB. Also with 2.10, you
  200.    if Dir$(filespect$) <>"" then FileExists
  201.  
  202.  (this is the same as findfirst)
  203.       -- Barry
  204.  
  205.  
  206.  
  207.  
  208. Press <CR> for next or type CHOICES !
  209. HPC Vendor B ForumHSections Menu
  210.  
  211. Section names (#subjs/# msgs)
  212.  1 Quarterdeck  (44/65)
  213.  2 Primavera Systems  (1/1)
  214.  3 Korenthal Assocs.  (1/3)
  215.  4 Personics Corp.  (15/32)
  216.  6 TurboPower Software  (25/55)
  217.  7 ChipSoft, Inc.  (2/3)
  218.  8 DacEasy  (5/7)
  219. 10 J.P. Software  (11/28)
  220. 11 PDC Prolog  (3/5)
  221. 12 SPECTRA Publishing  (4/9)
  222. HEnter choice(s) or ALL !