TIP: Click on subject to list as thread! ANSI
echo: power_bas
to: ABELARDO GARCES
from: BOB SEWELL
date: 1996-04-24 21:24:00
subject: How to detect Desqview and others multit21:24:0204/24/96

 In a deposition submitted under oath, Abelardo Garces said:
 AG> I search a method for detect DesqView and others populars multitask if
 AG> present.
 AG> I use POWER BASIC and QUICK BASIC 4.5
    Implementing the following in QB would need changes, but
 will work "as is" in PowerBASIC 3.x.  Here's the code:
'Check for Multi-tasker presence
mtask$ = ""                         'default to no multi-tasker
reg 1, &h3000                       'first, use DOS call for DOS version
call interrupt &h21
ax = reg( 1 )
al = ax mod 256
ah = ax \ 256
major = val( ltrim$( str$( al )))   'DOS returns major version
                                    'number of 7 or less.
                                    'OS/2 gives major DOS
if major > 19 then                  'version of 20 or higher
   mtask$ = "OS/2"                  'OS/2 is loaded
end if
                                    'PowerBASIC has a built-in
                                    'variable that indicates
                                    'Windows and Desqview
if bit( pbvHost, 8 ) = 1 then       
   mtask$ = "Windows"               'Windows 3.1 or greater is loaded
end if
if bit( pbvHost, 7 ) = 1 then
   mtask$ = "Desqview"              'Deskview is loaded
end if
... Is fearr go mall n  go br ch!
--- PPoint 1.96
---------------
* Origin: Seven Wells On-Line * Nashville, TN (1:116/3000.12)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.