r.h.bh=7; /*7表示深青莲*/

内容:

1.显示屏出现打字演习菜单(格式自定,字体、字号、颜色)

2.菜单项目为4项:照打,覆盖打,排名,退出

     dec cl

mov di,0037h ; Read pointer

int86(0x10,&r,&r);

代码落成

“`

data segment

menu  db 0ah,0dh,’ Input number to chose your function’

db 0ah,0dh,’       1.Follow Typing’

db 0ah,0dh,’       2.Cover Typing’

; db 0ah,0dh,’       3.Ranking’

db 0ah,0dh,’       3.Exit’

db 0ah,0dh,’Please input your select:$’

mess1 db 0ah,0dh,’ This is the Follow Typing page.’

db 0ah,0dh,’     Please input accordance with those word!$’

mess2 db 0ah,0dh,’ This is the Cover Typing page.’

db 0ah,0dh,’     Please input accordance with those word!’

db 0ah,0dh,’ (Yellow is right, Red is wrong!)$’

mess3 db 0ah,0dh,’This is third select$’

mess4 db 0ah,0dh,’ Thank you for your use!$’

mess5 db 0ah,0dh,’Your right number is:$’

endline db 0ah,0dh,’$’

mess  db 255,?,255 dup(?)

text  db ‘New strides have been taken in strengthening national defense
and army building.$’

right db ‘0$’

sum  db ‘/80$’

num  db 0

data ends

code segment

assume cs:code,ds:data

start:

mov ax,data

mov ds,ax

let0:

mov ax,0

mov dx,offset menu ;突显菜单

mov ah,9

int 21h

mov ah,1 ;输入选用

int 21h

cmp al,’1′ ;输入为1,跳转到照打分界面

jz prog1

cmp al,’2′ ;输入为2,跳转到覆盖打分界面

jz prog2

cmp al,’3′ ;输入为3,跳转到排行分界面

jz prog3

jmp prog4 ;输入不为1或2或3,退出程序

prog1:

jmp real_prog1

prog2:

jmp real_prog2

prog3:

jmp real_prog3

prog4:

jmp real_prog4

real_prog1: ;照打分界面

mov ax,0003h ;清屏

int 10h

mov dx,offset mess1 ;显示提醒消息

mov ah,9

int 21h

mov dx,offset endline ;换行

int 21h

mov dx,offset endline ;换行

int 21h

mov dx,offset text ;展现小说

mov ah,9

int 21h

mov dx,offset endline ;换行

int 21h

mov dx,offset mess ;输入串

mov ah,10

int 21h

;输入达成,初阶开展巡回比较

mov ax,0

mov di,0 ;存款和储蓄正确个数

mov cl,mess+1 ;输入的假名个数,即循环的次数

mov bx,2 ;第三个字符的单元地方

let1:

mov dl,text[bx-2]

cmp mess[bx],dl ;推断是不是输入正确

jz let2 ;输入准确 跳到let2

jmp out1 ;跳到国有出口 out1

let2: ;正确数+1

add ax,1

add di,1

out1:

dec cl ;循环次数-1

inc bx

cmp cl,0

jnz let1

jz out2

out2: ;检查实现,输出结果

mov dx,offset mess5

mov ah,9

int 21h

;输出准确个数

mov ax,di

mov bl,10

div bl

add ah,’0′

mov right,ah

add al,’0′

mov dl,al

mov ah,2

int 21h

mov dl,right

mov ah,2

int 21h

mov right,0 ;重置right为0

mov di,0

mov dx,offset sum

mov ah,9

int 21h

jmp let0 ;重返接纳菜单

real_prog2: ;覆盖打分界面

mov dx,offset mess2

mov ah,9

int 21h

mov ax,0003h ;清屏

int 10h

;置突显光标

mov ah,2

mov dh,4

mov dl,0

mov bh,0

int 10h

;显示串

mov dx,offset mess2

mov ah,9

int 21h

mov dx,offset endline ;换行

int 21h

mov dx,offset endline ;换行

int 21h

mov dx,offset text

mov ah,9

int 21h

;置输入光标

mov ah,2

mov dh,9

mov dl,0

int 10h

mov si,80 ;循环次数

mov bx,0 ;第多个字符的单元地点

mov di,0 ;正确个数

mov num,0 ;展现列的地点

prog2_let1:

;输入字符

mov ah,1

int 21h

mov dl,text[bx]

cmp al,0DH ;剖断是或不是输入回车

jz prog2_out2

cmp al,dl ;推断是还是不是输入精确

jz prog2_let2 ;输入准确 跳到let2

cmp al,dl

jnz prog2_let3 ;输入错误,跳到let3

jmp prog2_out1 ;跳到公共出口out1

prog2_let2:

add di,1 ;正确数+1

;输入正确,改动为铁锈色

mov ah,06h

mov al,0

mov bh,0eh

mov ch,8

mov cl,num

mov dh,9

mov dl,num

int 10h

;置显示光标

mov ah,2

mov dh,9

mov dl,num

mov bh,0

int 10h

mov dl,text[bx]

mov ah,2

int 21h

jmp prog2_out1 ;跳到公共出口out1

prog2_let3:

;输入错误,响铃

mov ah,2

mov dl,7

int 21h

;输入错误,退换为浅莲红

mov ah,06h

mov al,0

mov bh,04h

mov ch,8

mov cl,num

mov dh,9

mov dl,num

int 10h

;置显示光标

mov ah,2

mov dh,9

mov dl,num

mov bh,0

int 10h

mov dl,text[bx]

mov ah,2

int 21h

jmp prog2_out1 ;跳到国有出口out1

prog2_out1:

dec si ;循环次数-1

inc bx

inc num

cmp si,0

jnz jump_prog2_let1 ;si≠0,继续循环

jz prog2_out2

jump_prog2_let1:

jmp prog2_let1

prog2_out2: ;循环甘休,输出结果

mov dx,offset mess5

mov ah,9

int 21h

;输出精确个数

mov ax,di

mov bl,10

div bl

add ah,’0′

mov right,ah

;add al,74

add al,’0′

mov dl,al

mov ah,2

int 21h

mov dl,right

mov ah,2

int 21h

mov right,0 ;重新恢复设置正确个数为0

mov di,0

mov dx,offset sum

mov ah,9

int 21h

jmp let0

real_prog3: ;排行分界面

mov dx,offset mess3

mov ah,9

int 21h

jmp let0 ;再次回到选取菜单

real_prog4: ;退出

mov dx,offset mess4

mov ah,9

int 21h

mov ah,4ch

int 21h

code ends

end start

“`

code ends

    
加多显示屏——页调节的一条门路是改造路线,使之饱含一个当下荧屏页号以及安装

  r.h.dh=x; /*定位点坐标*/

目的:

编排菲律宾语打字演习软件,综合复习字符输入和出示,置光标、开窗口、颜色设置等显示屏成效;精晓分支程序中字符相比较及计算的前后相继设计,循环及排序程序设计格局;参预中断调用的计时功能。通过上述综合性磨炼,进一步加剧对汇编语言的明白和巩固程序设计本事。

     cmp ax,0

          }

┃ 179

程序框图:

威澳门尼斯人36366com 1

程序框图

     mov dx,0000h

in al , dx

  r.h.ah=6; /*子功用号*/

   mov ds,ax

{

{ union REGS r;

     jmp l3

并未有改造;客户只是看到有几分钟全体的东西都维持静态,然后就回来下一个移动。不过

r.h.bl=attr

   int 21h

   
要提供牢固的图像,显示屏将要以每秒六十二遍的进程更新(即电子束对全体荧屏进行一

r.x.cx=1;

     add dx,0030h

      push es             ;save the register

2、在显示屏的制订区域内画框,在框内突显字符串。(升高题)

     inc cl

call Hercules_detect ; See if it’s a Hercules board

{ union REGS r;

   mov ah,01h

mov PrimarySystem,ax

1、熟稔操作系统的种类机能调用。

(4)各子程序通过存放器传递参数;

mov al , 0AAh

定位子程序:

   mov ah,4ch

je CGA_primary

  int86(0x10,&r,&r); /*系统机能调用*/

   mov ah,0

Cmp ax , UNKNOWN_ADAPTER

  r.h.al=ch;

     ret

读回来,就足以若是CRTC状态端口已经找到并且CGA或MDA已经定位。

  r.h.dh=24; /*右下角坐标*/

班级:  计算机14-1  姓名:  许恺    学号:  2014011329日期: 2016.4.29          

miv  es , ax

int86(0x10,&r,&r);

   mov ah,09h

db EGA OR MDA_MONITOR

━ 196

 s1 db ‘please input an integer between 0 to 8:$’

jne not_everex_bios

┓ 191

(1)输入数据在主程序中完成;

cmp al , 0AAh

┏ 218

     push dx

ret

void writech(int x , int y, char ch ,int attr)

   mov ax,data

1100           12           淡红色

}

     mov cl,al

有滋有味文本格局位的意义。

┛ 217

   lea dx,s2

or word ptr [si] ,HGC

2、通晓用C语言完毕系统功用调用的不二等秘书籍和步骤。

 main proc far

          /* Function: cls()*/

}

   fac proc near

pop bx ; Restore bx

1、在显示器的内定区域内呈现字符串。(必做题)

l2:  pop dx

cmp ax , MCGA

  locate(x ,y);

   mov dl,0dh

dec dx

制表符   ASCII码

   int 21h

                int86(VIDEO,&regs,&regs);

  r.h.bh=0;

     int 21h

swap_systems :

清屏子程序:

     loop l2

push bx

r.h.dl=y;

l3:  mov bx,000ah

#include<stdio.h>

  r.h.ah=9;

   output proc near

            void rch(ch,attr)

一、实验指标

(2)运维结果(截图):

          putwin()      把数量放进有个别窗口

void cls(void)

   mov ah,02h

 and ax ,ADAPTER_SYSTEM_MASK ; What did we find?

{ union REGS r;

     mov ah,02h

 

  r.h.ah=2; /*子成效号*/

 

          Listing 5.8 of DOS Programmer’S Reference*/

在内定地点写参数:

 assume cs:code,ds:data,ss:stack

 

  r.h.cl=0;

实在认为货仓段不用编写,因为事先不写也行,开头已经写好了,后来掌握要有提示语句,又加输出字符串时就出错了,在压栈的时候出现了死循环,是用dx输出字符串的时候出了难点,最后是再次把dx赋0才缓和,这一次尤其透亮了仓库的使用,以往会用的一发的随手和频仍。

      彰显监视器的档案的次序

3、通晓使用10H号成效调用(BIOS的彰显I/O作用调用)来完毕对显示屏的操作与操纵。

   sub al,30h

        /* Testpage.C

二、实验内容

1.从键盘输入两个不当先8的个位数,总计该数的阶乘,并以十进制制式输出。

push dx

3、在显示屏上点名区域内画框并以动画情势展现字符串。(选做题)

   mov bx,ax

jne not_ahead_bios

  r.h.dl=79;

stack segment stack

     
MDA只辅助四个显示器展现形式(情势7),CGA援救7个,EGA帮忙十一个。最复杂的

┗ 192

   mov ax,bx

out dx,al

  r.h.al=0;   

end start

都检查Ctrl-C,所以它相当慢。

void locate(int x, int y)

一、编写程序

cmp al, ‘1’ ; Which Chipset?

r.h.bh=0;

data segment

gotoxy(lr, rc); wch(UPPERRIGHT, 7);

显示屏画框能够用制表符来画。其利害攸关方法是延绵不断调用writech函数,在钦点区域周围展现制表符,进而勾勒出二个窗口的大致。

(2)总计阶乘的法力用子程序达成,子程序的名称叫:fac;

 

r.h.ch=0; /*左上角坐标*/

   call fac

A000h               变化                变化

 }

   mov ah,02h

   
MuranoGB监视器选择独立的电子束(三枪)来分别显示每一种原色(红,绿和蓝),进而在文

 

or word ptr [bx] ,SVGA OR PARADISE

要求:

SVGA_detect proc

(3)以十进制形式出口结果的遵守用子程序实现,子程序的名称叫:output;

in al , dx

   mov dh,al

          gotoxy(24,0);

   int 21h

      分辨率一栏中的数目代表文本方式的行和列,代表图形情势的象素。

   mov ah,09h

; Return to caller

   mov dx,0

    PARADISE                 equ 008h SHL 6

   call output

and word ptr [bX] , NOT ADAPTER_SYSTEM_MASK

 dw 30 dup(?)

0·······         不奇怪字符

stack ends

0101         5              品红色

l1:  mul cx

    };

   int 21h

    当顾客与杰出的IBM CGA或CGA电路的任何复制口一块干活时,这些难点比较重

   mov dl,0ah

          #inClUde<Stdio.h>

 main endp

          upwin()       将窗口往上滚动

   int 21h

·····000            月光蓝前景(正常)

     loop l1

如果地址正确,那么就试着向光标地点低贮存器写入值。在短短的拖延后,借使数值能被

data ends

in al , dx

start:

db (8 – 6) dup (EGA OR UNKNOWN_MONITOR)

   mov al,dh

    下列显示屏类型也能辨识:

 威澳门尼斯人36366com 2

的未公开的作用雷同)。

(1)程序清单:

    page 55,132

   output endp

   
当客户愿意获得给CRT的最快的、恐怕的出口何况想防止使用BIOS以保全与日常

     mov cx,0000h

; Change the model size to match the program in which

     jbe l2

05h         图形        4           320*200                   X    
X         X           X         X

(5)输出格式要赏心悦目,要有适合的量的唤起。

   
在这一节,读者能够协会一些粗略的窗口功能,以便看看BIOS和DOS功用的利用

   fac endp

B000h                     4K                      1

code segment

常那是显明叁个适配卡是VGA或是SVGA的正规化),但达到此指标却是以独家区别的、

二、编制程序体会

那么些大概用于显示帮忙音讯的窗口。因为它从不行使比BIOS功用更低的东西,所以它与

     ret

   
对于持有的函数,当前来得页的利用远未有未展现页的干活那么令人难忘。将体现页

     div bx

                  文本

   lea dx,s1

/* Function: putwin() */

 s2 db ‘its factorial=$’

       
展现适配卡常常有4至256K的内部存款和储蓄器,VGA适配卡一般都提供512K或1M内部存储器。因

   int 21h

扫间隔(H途达I)。类似地,电子束完毕三个周期后,它要从右下部移到左上部起始贰个新的

      pop es              ; restore saved segment register

坏了包容性,但却使速度(并使生产率)达到了最大值。

Try Headland

CRTC_Delay :

xor cx,cx ; Loop a while

}

mov ah,al   ; Save what we read

cet

mov cx, 4

jne current_color

jmp short not_circus_chip

jne not_HGCPlus

   
是多么地轻松。本章的指标并不是想构建七个完全的窗口系统—这种努力超过了本书的

not_ati_bios:

;—–Program Code – – – – –

          putwin(5,5,12,40);

mov ax,SecondarySystem ; Is secondary system MDA?

CTI82c452 equ 002h SHL 10

mov al,ch ; Get unlock password

 

push cx

    GENOA                   equ 005h SHL 6

; video chip types

int 10h

缓冲区段地址             缓冲村长度            显示页数

    EGA                   equ 003h

93页

and word ptr [bx] , NOT ADAPTER_SYSTEM_MASK

pop cx

    Struct     charpos{

      列表5.5

mov dx,003C4h , Address of sequencer .

   
借使只有单色监视器系统,那么怎么着也看不到。当推行setpage()函数时,事实上荧屏

职能去垄断(monopoly)摄像,但一时是必需将法规手册和次序置之于脑后。比方,使用BIOS摄像

0Ch         —        保留        —

int86(VIDEO,&regS,&regS);

指令HCRUISERI是还是不是留存;3位则反应有关VSportageI的千篇一律的音信。当回扫间隔初阶时,相应的位就

              /* Sleep.C

102页

regS.h.dl=C;

jmp $+2

 

   
彰显适配卡对摄像数据的表明决定于展现方式,该方式调整了数据在显示屏上冒出的

                  regs.h.cl=lC;

jmp test_vesa

iS_HGC:

regs.h.dh=rr;

not_cirrus_510:

    ;—–Equates—–

          void cls()

jne not_cirrus_610

    and al,0DFh         ;clear blink control bit

卡时,他们制作而成的适配卡确实不可能与原先的IBM适配卡区分开来。可是开采商以他们自

gotoxy(i,lc); wch(VERTLINE, 7);

not_genoa_bios:

je clarify_MDA ; If it iS, identify further

#include<dos.h>

        位

CGA               文本

      下边的实例汇编语言程序同意明亮的CGA背景:

static int cpage=0; /* Current display page*/

        使用的图纸和别的荧屏效果。

or word ptr [bx] ,SVGA OR CIRRUS

        CRTC detect              endp

10h         图形        16           640*350                        
X                     X

and ax , 7

        for(i=lr;I<=rr;i++)

 

push ax

                regs.h.ah=0x09;

/* Function: upwin() */

ASCII码07),cLacrosse(ASCII码13)和LF(ASCII码10)字符;全体其余的“调节”字符就能够显

Cmp ax , 0004Fh

regS.h.bh=cpage;

xor al,al

{

CIRRUS_610_620 equ 002h SHL 10

and al , 00Fh

   
在。比如,翻卷函数的变量中一贯不页赋值变量。于是就不可能动用那一个函数来给展现内容编

      {

换突显页就能够便捷找到显示内容。
testpage.c样本程序能让顾客尝试一下新的setpage()

          border()      围绕窗口设置三个境界

1·······         闪烁字符

and ax , ADAPTER_SYSTEM_MASK

mov al,020h ; Get enable value

中,要将它们拷贝给RAM并确认保障它们一向从未改换,那不是三个平日的职分;而只退换

mov Si , Offset GENOA_BIOS_Sig

; Attempt to detect CGA card

cmp al,01Ah ; Successful call?

inc dx

低价颜色和内部存款和储蓄器必要量之间的涉嫌。

; on entry, DX is the alleged CRTC port

CIRRUS_510_520 equ e01h SHL 10

    #define VIDEO  0x10

je ati_2

          }

一致的话,那么他的显示器就能够是徒有其表的。

jmp test_vesa

     
IBM也关系了图情势方法显示格局,称它是APA,或称为全数一些能够牢固的方法,在

          void cls(void);

                int86(vIDEO,&regs,&regs);

    ;Adapter types

Out dx,al ; Write it out

     
在多客商或职责系统中也是不合营的。它的优点以及被频仍利用的缘由都来源于

 in al , dx

                  pop dX

13h         图形        256          320*200                          
X                   X

    CGA_MONITOR         equ 002h SHL 3

5.2.3.识别录制显示适配卡

or word ptr [bx] , VESA_SVGA

            void wch(Ch,attr)

或XENIX一同坐班,有程序代码(它在种种操作系统之下可不加修改地张开成功的编

db VGA OR VGA_COLOR

db MCGA OR EGA_MONITOR

mov ax,SecondarySystem , Get current mode

显示器展现的便是Computer内部存储器中的内容(见图5.1)。内部存款和储蓄器缓冲区存款和储蓄显示器显示的音信。内部存储器

   
合成单色监视器是一箭双雕的单色(平常是油红或黄绿)监视器,能被CGA输出所驱

的(纵然为啥应该中断阅读并非那么显明,但经验却展现它实在是在非常多CGA卡

{

82页

B800h               变化                变化

HGCPLUS equ 002h SHL 10

                regs.h.dl=C;

          /* screen.c

push si

call MDA_detect , Else look for MDA

jb not_headland

union REGS regs;

    借助DOS功效调用。那是一种最匹配,但却是最慢的存取方式。在DOS2.0和更

and word ptr [ bx ] ,NOT ADAPTER_SYSTEM_MASK

103页

            {

些适配卡,能够效仿CGA(段地址为B800h)和它们自身的伊始段地址A000h。

              /*Chario.c

译)能使程序开采和维护职业轻便化。那一个程序是超人的简单实用程序或交互功能程序。

拉长其速度和长短不一程序,使其尽可能地神速和紧凑。使一个正常的主次加火速度要比使一

06h         图形        2           640*200                   X    
X         X           X         X

            }

        }

105页

都选拔像BASIC原型之类的言语作为支出的源点(如Visicalc,它是原始的钟表格程

   
BIOS服务对于不直接存取录像内存的重要编制程序,它们通常是被挑选的功效。它们不

int 10h

in al , dx

计算机刚刚要安装录像内部存款和储蓄器地址到贰个非双重端口适配卡中,且此时CRTC正在此位点

cmp al , 030h

cmp al ,2

jne not_cti82C452

and ax , MONITOR_MASK

pop cx

in al,dx ; Read unlock password

jne not_headland

mov ah , 012h

wch(HORIZLINE, 7);

ati_1 :

mov dx,003BAh ; Get status port

db (16 – 13) dup (0)

个高速的前后相继变健康更便于。

Or word ptr [bx] ,CTI82C451 OR SVGA OR CTI_BASED

或V奔驰M级I,因为适配印第安纳波利斯用突显内部存款和储蓄器的方式各区别样。在少数字显示示适配卡中央银行使的内部存款和储蓄器是特

            /*FunctiOn:rch()*/

or word ptr [bx] ,TRIDENT_8800CS OR SVGA

   
假设要求开展超过规范库函数的编制程序,那么必须小心地权衡也许的得失。从标准库函

          #include<dos.h>

mov di,6

      二、图格局方法展现格局

mov Si , offset VESA_BIOS_Sig

   
大大多处理器书籍都将救助设备(哈弗S-232端口)看作字符输出设备,并在与本章类似

   
读者或然会问为于睿级VGA(SVGA)未有当做PC机上的图片标准而被波及。那

表5.2点数的情势0Eh的分辨率为640*200,即宽6四十个象素,深200个扫描行(象素)。

cmp ax , MCGA

je seek_CGA ; Then look for a CGA

mov si , OffSet PARADISE_BIOS_Sig

85页

not_trident:

0Ah         图形        4           640* 200                         
                               X

                              表5.1出示适配卡的内部存款和储蓄器配置

户正等待的间隔时间。

0Fh         图形        单色      640* 350                        
X                     X

gotoxy(rr,rc); wch(LOWERRIGHT, 7);

      ·探测光笔功率信号

            }

一些系统操作十三分。

regS.h.Ch=0;

; It’s a Cirrus BIOS- -now identify the chip

100页

   
在C语言中,已经有丰硕的劳动能与显示屏和打字与印刷机一同坐班,以成就规范的编制程序

00h        文本        16          40*25                     X    
X         X           X

if(i==rr) {

ret

要。那一个品种的系统中“雪花”是那般倒霉,以至于用户用那样一个非同小可的词来说述它:色

     
将字符的ASCII码值保存在字符内存地方,并在性质字节中设置其性格后,适配卡

A000h                     64K                      1

            void pgprint(char*str);

    录像显示器能以下列三种路子中之一来举行存取:

mov al,cl ; Get switch settings

mov bx,offset SecondarySystem

in al,dx ; Read register

殊的再度端口内部存款和储蓄器,Computer能在该内部存款和储蓄器中书写数值,同不平日间CRTC能够翻阅它们。因为这类

    ···· XXXX       前景(见表5.5)

cmp ax , MDA_MONITOR

12h         图形        16          
640*480                                               X

的章节中张开描述。但在那本书中,将对CR-VS-232端口单独介绍,因为它们持有无比

or word ptr [bx] ,CTI82C452 OR SVGA OR CTI_BASED

    MONITOR_MASK             equ 007h SHL 3

{

; Seems to be a CTI chip. Which version?

int86(VIDEO, &regs, &regs);

jae vid_exit

ret

            void setpage(int n, int clrflg);

jnz not_cirrus_chip

              void sleep(n)

          void gotoxy(int i,int j);

void savewin(lr,lc,rr,rc)

MDA_primary:

AHEAD_BIOS_Sig db “AHEAD”

   
直接的单色监视器,能显得高分辨率文本和字符水平的图片。MDA能使得这几个监视

94页

mov ax , seg video_ident

/*Function:gotoxy()*/

                  timeval=time(NULL);

or word ptr [bx] ,AHEAD_VERSION_A

 

56页

    第4章DOS和BIOS接口

    本章介绍了用户程序访问DOS内核和BIOS所提供的各种服务的方法。为了访问这

些服务,我们可以从任何编程语言中调用各个软件中断,这些中断便是我们在本书中要重

点地讨论的内容。用户当然不必了解访问系统资源的所有细节,但要入门,确实要学习相

当多的这方面知识。

      本书重点介绍的是四种编程语言:汇编语言、C(极c++)、Pascal和BASIC。所讨论

的实现程序分别有Microsoft Macro Assembler(宏汇编)、Microsoft C/C++、Borland C/

C++、Turbo Pascal 7.1版(以及对早期版本的少量说明)和Microsoft Quick BASIC。所

有四种语言都带有允许直接访问DOS和BIOS功能的特性。但是,因为不是每一个功能

都是由语言内带特性所能提供的,因此,有些操作读者不得不自己去编程实现。在本章中,

我们将了解到哪些是由所学语言本身所具备的,哪些是读者必须自己去实现的,以及如何

去实现它。

                4.1从程序中访问DOS和BIOS

      要访问DOS和BIOS资源,只需按照下述简单的步骤来操作:

      1.以相应的值装入CPU的寄存器。

      2.产生一个软件中断来调用所需的硬件中断。

      3.通过CPU的寄存器来返回中断结果(如果有)。

      正常情况下,寄存器中的值都是8位或16位的数值参数或大型数据结构的地址。在

本书中所讨论的所有语言,都有一种约定的方式来装入CPU的寄存器,产生中断,并读取

返口值。有关CPU寄存器及其它们的用途,可参见第2章“DOS系统的结构”。

      图4.1以图解方式列出了在一个系统调用之前或之后的寄存器中的内容。

      根据所要调用的资源,在装入寄存器和产生中断之前,可能需要做一些额外的工作。

例如,许多面向文件的服务,都要求在中断产生之前,在寄存器中装入一个串或其它数据

结构的段:偏移值地址。(如果不熟悉表示地址的段:偏移值形式,可参阅第2章中的内存

分段与8086)。

      首先,用户程序必须得到数据项的地址。得到一个项的地址是一个相对简单的过程:

而如果有什么复杂之处的话,恐怕是与用户所使用的编程语言有关。对本书所涉及的每一

种语言,本章后面都有一个节来专门介绍如何得到数据项地址的方法。

 

57页

            图4.1一个典型的系统调用之前和之后,寄存器中的内容

    数据串或其它的项必须以某种相应的固定形式组织起来。许多DOS功能都要求所使

用的带参数采用ASCIIZ(ASCII加零)格式:各个字符以ASCII代码格式设置,而该串的

最后一个字符则是ASCII字符零(在C语言中为\0,在BASIC中是CHR$(0),而在Pas- 

cal里是chr(0)。图4.2显示了一个ASCIIZ的结构。

                                图4.2一个ASCIIZ串的结构

    如果用户程序是用C来写成的,读者也许会知道ASCIIZ在C语言中是如何精确地

存放它的格式的。在BASIC或Pascal里,要创建一个ASCIIZ,还额外需要一个步骤。在本

章后面的一些例子则显示了是如何完成这些工作的。

    因为汇编语言能提供对CPU和系统资源的最直接访问,因此,在后面各节中的介绍

性例子都用汇编语言来写成。有关访问DOS和BIOS资源基本原则的简介,可阅读下面

的各个小节;这些例子都非常清楚,哪怕是读者对汇编语言并不十分熟悉。

    在本章后面,将介绍如何通过高级语言来访问操作系统。首先,让我们先看看一些简

单的汇编语言例子,来探讨一下DOS和BIOS接口。

4.1.1一个对DOS的简单调用

    在本书中所介绍的每种编程语言,都有几个服务能提供对基本的DOS和BIOS中断

的访问。在这些语言中,最简单的语言是汇编语言,因为汇编语言允许程序直接访问Int

(中断)指令,而Int指令能直接地产生对BIOS或DOS功能的访问。

 

58页

      下面的代码片断,使用Int 21h的功能02h,将字符X输出到控制台,这是一个典型的

对DOS的访问:

      mov ah,2        ;字符输出功能

      mov dl'X'       ;字符X

      int 21h         ;执行DOS功能中断

      使用Int 21h功能02h确实很简单:

    1.以相应的值装入所需的寄存器:将值2装入AH来选择DoS功能2(控制台字符

输出)。字符X装入到DL中。

    2.产生中断:汇编语言中的助记符Int后面所跟的值21h,是通用的DOS中断号。因

为Microsoft的Macro Assembler(宏汇编程序,MASM)是一种衡量汇编语言兼容性的标

准,因此,用户所选择的任何汇编语言中都应该可以使用Int指令。

      因为Int 21h的功能2不返回任何值,因此这里就少了DOS调用模型的第三部分。下

面的例子则演示了第三步,并介绍了如何得到和传递比16位“宽”的数据项的地址给

DOS的基本技巧。

4.1.2传递字符串地址给DOS

      前面已提到过,当数据项的内容比16位多时,就需要将数据项的段和偏移值地址放

入到cpu的寄存器中。下面的代码片断演示了传递字符串地址的一种方法:

        ;Path_name含有将要打开的文件的名字

        mov ax, seg Path_Namee  ;路径的段地址

        mov ds,ax              ;放入Ds

        mov dx,offset Path_Name ;路径的偏移值 

        mov al, c2h            ;打开文件的模式

        mov ah,3dh             ;打开文件

        int 21h                   ;DOS中断

        jc error                   ;如果出错,置进位位

        mov file_Handle,ax      ;保存文件句柄

      此代码片断使用Int 21h,功能3Dh来打开一个文件。该功能要求DS和DX相应地包

含文件路径名的段地址和偏移值。该代码段的前三行按要求装入寄存器。接下来的一行

将C2h放入AL;AL中的值说明该文件被打开的模式(有关此值的模式编码将在本书的

“DOS参考手册”部分里详细描述)。将各寄存器正确地装入后,便随后产生DOS中断。

      像大多数DOS服务一样,如果服务失败,就会设置进位位(此处表示文件不能打开);

如果已设置了进位位,程序于是便跳转到一个处理错误的例程(jc Error)。但是,如果进位

位清除,则表明打开文件成功,文件句柄(由AX返回)放入内存中的一个位置处,以备将

来使用。

      注意最初的DOS服务(即由DOS1.0版提供的)并不使进位标志来指示出错。就像

cp/M中的服务(DOS的祖先是CP/M)一样,它们在AL寄存器中返回它们的信息。自

DOS1.0以来,一致性并不总是保持得那么坚定,因为,自1.0版以后,也并不是所有的随

 

59页

后服务都用进位标志来指示出错。某些服务(如3.0版中可用的Get PID服务)是不可能

出错的,因为它只不过返回由DOS保存在内存中的内容给调用者。这些调用有时会清除

标志位,但是有些DOS版本则直接从服务中返回,而将进位标志仍保持为调用DOS前的

状态。

      因此有必要指出的是,标志位是否指示出错,要看调用的功能在文档中是否是这么说

明的。如果此功能并没有正式公开,那么可参看本书后面参考手册中的那一部分,看看此

标志位是否指示出错,如果是,再看看它指示的什么错误。

                    4.2高级语言资源

    高级语言提供了许多不同的方法来调用DOS和BiOS例程。每种语言都有一种独特

的方法,在其它的语言中往往不能重复这一方法。甚至是在同一种语言内,不同的实现厂

家及不同的版本,也可能采用了不同的方法。 Turbo Pascal 3.0就提供了一种非内带的方

太式来访问所有的文件(满足通配符文件)(如C:\QTRLY\QTR?1993.DAT)。为了访问这

样一组文件,编程者不得不多写两个过程:一个是调用DOS Int 21h的功能4Eh来找出满

足匹配文件名说明的第一个文件,另一个则用于调用功能4Fh来找出满足匹配文件名说

明的余下文件。当Turbo Pascal 4.0推出后,它不仅允许用户自己去生成这样的例程,并

将它们保存到一个运行时刻库中,而且还提供了两个过程一FindFirst和FindNext来完

成这项工作(与其它一些过程一起,放在一个名为“unit”的运行时刻库中)。而到了Turbo

Pascal 5.0的问世,连这些例程的源代码也都可以得到了(尽管需要额外付费)。

    在以下各小节中,每一节都给出了两个实例程序。对每种语言,第一个实例程序是一

个较简单的程序,用于说明访问操作系统资源的基本方法,它使用BIOS Int 17h功能2来

检查打印机的状态。第二个例子则相对地较复杂一些,它解释了从系统调用中返回的结

果。

    较复杂的例子在不同的语言中差别很大。所遵循的原则是,用户不必再做无谓的工

作,给出的编程例子,在所选择的语言中不能提供这样的服务。BASIC例子显示了如何使

用DOS Int 21h的功能4Eh和4Fh来获取满足带有匹配符的文件,并将那些文件名赋值

给BASIC变量。因为类似的功能已由Turbo Pascal及C中内带,所以在这两种语言中给

出的例子就会执行不同的任务。Turbo Pascal的例子使用DOS Int 21h功能57h来获取一

个给定文件的日期和时间。C语言的例子则使用DOS的Int 21h功能43h来获得与设置

文件属性(归档、隐藏、系统及只读属性)。这两个例子根据需要使用了不同的功能来完成

必需的设置及清除工作。这些辅助的功能调用分别在程序文本和注释中作了说明。

避免做无谓的工作

    许多高级语言都有预定义的函数、过程或变量来提供方便地访问系统资源的方式。在

大多数情形下,这些语言成份所访问的DOS和BIOS功能与用户自己在需要时直接编程

所调用的系统资源是相同的;只不过提供该编程语言环境的厂家已为使用者编好了这些

代码。如果认为在此语言中使用系统资源,对你来说是件新鲜事——或者它是你所熟悉语

                                               

60页

言的一种新的实现版本,那么必须注意的一点就是,不要做事复的工作。在本书中反复强

调的一个原则是,仅在必要时才去访问系统。因此,作为编程者,应该尽量使用语言中内带

    的功能,除非有某些特别的要求,而所使用的语言资源满足不了这种要求。

      应该总是仔仔细细地阅读用户手册。下述基本建议值得反复强调:去查手册!许多程

序员,特别是那些新接触某个语言或操作系统的人,常常将大量的时间花费在一些无谓的

工作上。如果他们更仔细地阅读过所使用的语言手册,就不会浪费时间去编制一些业已存

    在的资源上。

    4.2.1C语言

      对与操作系统打交道来说,C是最合适的语言。如果读者读完了在其它节里介绍的其

它语言,就会发现,Pascal和BASIC中的高级特性都会导致使用者按照自己的想法去实

现,如果要深入地想看个究竟的话。因为这些语言在需要方便地访问DOS和BIOS资源

时,都禁止或限制用户访问系统级的数据结构和其它信息。

      由于C语言在访问高级和低级资源时都很方便,因此曾有人将它称为“高级汇编语

言”。当需要在字符或位级进行详细地设置或操作时,C能让使用者“像一个微处理器那样

    去考虑问题”。

      C与操作系统有着一些类似的组成:许多C函数都是“穿着C语言外衣的DOS”。这

些函数通常都与DOS采用相同的参数,并返回相同的结果;确实,这些C函数作为输入的

数据结构和返回的输出值,都与在DOS中所用的参数相同。

      接下来,在本节中要给出一个更复杂的实例程序,我们给出了两个版本:chmd.C直接

调用DOS,而chmc.c则调用等价的C函数。而只有一个版本的较为简单的例子名为

_Pronok.c;该例子所提供的功能,在Borland C++库中是不能直接得到的。

      本节所给出的C程序都是由Borland C/C++编译器开发的,有关Borland c++与

Microsoft C之间的不同之处,可阅读例子代码片断中给出的注释。

      访问寄存器和产生中断

      在C和DOS接口中所使用的数据结构,是由REGS联合及SREGS与REGPACK结

构定义的。这些对象都是在头文件DOS.H中声明的。它们的声明在下面的代码片段中列

    了出来:

    struct WORDREGS{ 

        unsigned int ax, bx, cx, dx, si, di, cflag, flags;

    };

    /* Microsoft C lacks flags element*/

    struct BYTEREGS{ 

        unsigned char al, ah, bl,bh, Cl, ch, dl, dh;

    };

    union REGS{ 

        struct WORDREGS x; 

        struct BYTEREGS h; 

    };

 

61页

          struCt SREGS{

            unSigned int es;

            unSigned int cs;

            unSigned int ss;

            unsigned int ds;

        };

        struct REGPACK{         /*Not defined in Microsoft c*/

            unSigned r_aX,r_bX,r_cx,r_dx;

            unSigned r_bp,r_Si,r_di,r_dS,r_es,r_flags;

        };                         。

    此外,在BorlandC++中CPU各个寄存器的内容也呵以通过伪变量AX、_AL、AH

等得到。每个8086的通用寄存器、偏移值及段寄存器(除了IP)都有相对应地伪变量。也

可使用对应于16位或8位的寄存器的变量(但却未声明),把它门当作相应的unsigned

int和unsigned char类型:

      unsigned int _AX;

      unsigned char _AL;

    在前面介绍的伪变量是不能在Microsoft C中使用的。因为缺少这些伪变量会给程

序带来少许变化,因此必须仔细地阅读厂述程序片断,如果想要让它们通过Microsoft C

编译器的话。

    DOS.H头文件中包含有下列C函数的原型,用于产生软件中断:

      int int86(int intno,union REGS*inregs, 

                        union REGS*outregs);

      int int86x(int intno,union REGS*inregs,

                        union REGS*intregs,

                              struct SREGS*segregs);

      int intdos(union REGS*inreg,

                union REGS*outregs);

      int intdosx(union REGS*inregs,

                union REGS*outregs);

                struct SREGS*segregs);

    void intr(int int_type,struct REGPACKOpreg);

    intdos()函数能产生Int 21h——最基本的DOS中断;int86()*intr()则产生由该函

数的第一个参数(intno或int_type)所指定的中断。每一个intdos和int86都有一个x版

本,它除了使用通用寄存器及偏移值寄存器外,还将使用段寄存器,在Microsoft C里是不

能使用intr()函数的。

    列表4.1中所给出的PRNOK.C显示了如何使用int86()函数来验证LPT1是否联机

的技术。

62页

    列表4.1

          /*prnok.c 

              Listing 4.1 of DOS Programmer'S ReferenCe*/

          #include<cOnio.h>

          #include<dOS.h> 

          #define PRN_INT 0x17/*Printer·serviCes interrupt */

          #define STAT_RQ 0x02/*Status·request Service number*/

          int prnok(void)

          {

              union REGS regs;

              regS.h.ah=STAT_RQ;   /*AH=02 for printer status*/

              regs.x.dX=0;          /*DX=00 for LPT1*/

              int86(PRN_INT,&regs, &regs);

              return (((regs.h.ah&0x80)==0x80)?1:0);

          } 

          main()

          { 

              if(prnok())

                    cputs("Ready to print!\n");

              else

                  Cputs("Please cheCk the printer!\n");

          }

    有关BIOs打印机状态请求的说明

      每种语言的第一个实例程序都使用BIOS Int 17h功能2来验证LPT1是否已联机。

对于这一功能,将2放入AH,而将打印机号(0为LPT1,1为LPT2,依此类推)放入DX。

此功能在返回后,AH内存有打印机的状态,放在AH中的各位含义如下:

     位                               意义(如果置上,即为1时)

     0                                time-out(超时)

     1                                unused(未用)

     2                                 unused(未用)

     3                                 I/Oerror(I/O错) 

     4                                printer is selected(打印机已选)

     5                                out of paper(无纸)

     6                                Acknowledge(确认)

     7                                printer not busy(打印机不忙) 

    只有位0和位3至位7的意义已定义好,但是在两个已配置好的硬件上进行测试,在

相同的环境下,会返回不同的结果。在每个测试情况下,当打印机已加电并已联机的情况

下,AH的高位都已置上。但是,当一台Toshiba(东芝)P351打印机与一台IBM Personal

System/2 Model 50(PS/2 50型)计算机相连接时,当打印机已连接但没有加电时,程序会

报告出“Ready to print(已准备打印)”的信息。而将一台Epson的RX-O打印机与一台

COMPAQ便携式计算机相连时,程序则以“please check the printert”的信息作为响应(如

果打印机已连接但却没有加电时)。这只是一个演示性的例程;一个真正起作用的状态程

序则需要更复杂的逻辑。

63页

      获取和设置文件属性

    本节给出了两个C的实例程序,用于改变一个指定文件的属性。这两个程序类似于

Norton Utilities中的很有用的FA(文件属性)程序;不同的是,它们都只接收一个确定的

文件名,而不是包含有通配符的文件说明。为了保证程序尽可能地简单,程序也不包括查

询文件属性的选项或一次改变多于一个属性的选项。这两个程序在运行时,要求在命令行

上指定一个要设置或清除的属性来作为参数,如果给了一个不正确的参数,程序就会给出

一条出错信息,并终止运行。

    如果读者已精于C编程,则不难增加更进一步的选项(如“查询”),以扩展此程序的

功能。本书中已提供了足够的信息,因而也很容易加进处理带有通配符文件名的功能。

    这两个程序的不同之处在于:一个直接地调用了DOS中断,而另一个则使用了相应

的C函数来调用此中断。第一个例子在列表4.2中给出,它直接调用了DOS的Int 21h功

能43h。

    列表4.2

          /*Chmod.c

          Listing 4.2 of DOS programmer'S Reference */

        #include <coniO.h>

        #inClude<Stdio.h>

        #include<ctype.h>

        #inClude<process.h>

        #include<dOS.h>

      #include"attrmask.h"        /*omit for Turbo c 2.0 */

        #define GS_FATTR        0x43

        #define GET_FATTR     0x00

        #define SET_FATTR       0x01

        /*For Turbo C 2.0,add these #define statements:

                define ARCHIvE_BIT FA_ARCH

                define HIDDEN_BIT       FA_HIDDEN

                define RDONLY_BIT     FA_RDONLY

          define sYsTEM_BIT FA_sYSTEM

          */

      typedef enum{clr,set} clrorset;

      void showattr(int attr);

    int parsearg(char*thearg,clPorset*actiOn,char*selection);

      main(int argc,char*argv[])

        { 

          extern char*sys_errlist[];/*provided by Turbo

          eXtern int errnO;             /*Ditto*/

          union REGS regs;

          struct SREGS sregs;

        clrorSet action;

        char SelectiOn;

        unsigned attPib,setting; 

        int goahead;

    if(argc==3)goahead=parsearg(argv[2],&action,&selection);

                                                                                             

64页

if(!goahead)

{

if(argc=3)

{

 CPUtS("Can't parse");

cputs(argv[2]);

}

else

cputS("No input");

exit(1);

}

switch(selection){

caSe 'A':setting=ARCHIVE_BIT;break;

caSe 'H':Setting=HIDDEN_BIT;break;

Case 'R':Setting=RDONLY_BIT;break;

caSe 'B':Setting=SYSTEM_BIT;break;

default:

cputS("Bad input:");cputS(argv[2];cputS("\n\r");

exit(1);

}

regS.h.ah=GS_FATTR;

regS.h.al=GET_FATTR;

regS.x.dx=(unsigned)argv[1];/* offset of first argument*/

sregS.dS=_DS;

/* - - - - - - - - - - - - - - - - - - - - -

For Microsoft C,use the following in place of the preceding line:

segread(&sregs);

*/

intdosx(&regs,&regs,&sregs);/*Get the current attribute wOrd*/

if(!regs.x.cflag){/*If carry is clear,success*/

 attrib=regS.x.Cx;

cputs("- - - - - - - - - - - - Initial - - - - - - - - - - - - \n\r");

showattr(attrib);

if(action==clr){

setting=((-setting)&attrib);

}else{

setting=lsetting|attrib);

}

regs.h.ah=GS_FATTR;

cegs.h.al=SET_FATTR;

regs.x.cx=setting;

regs.x.dx=(unsigned)argv[1];

SregS.ds=_DS;

/* - - - - - - - - - - - - - - - - - - - - - -

For Microsoft C, use the following in place of the preceding line:

segread(&sregs);

*/

intdosx(&regs,&regs,&sregs);/*Set the attribute*/

attrib=regs.x.cx;

cputs(" - - - - - - - -  - - - - Final - - - - - - - - - - - - - \n\r");

showattr(attrib);

}else{/*That is,if carry is not set*/

char*msg;

cputs("function 0x43 failed:");

65页

               switch(regs.x.ax){ 

                case 1: msg="Bad function code\n";break;

                case 2: msg="Bad file name\n";break;

                case 3: msg="Bad path\n";break;

                case 5: msg="can't change attribute\n";break;

                default: msg="Unknown cauSe\n";

                }

                cputs(msg);

            } 

      }/*End main*/

    Int 21h功能43h需要下列输入值:

      寄存器                          值

        AH                       43h

      AL                          0表示获取文件属性,1表示设置文件属性

      DS:DX                      段:文件路径名偏

该程序使用了#define处理指示符来“命名"DOs功能以及所需的操作(获敢或设

置)。文件名是由命令行参数提供的。

    对于一个在Turbo C下以小内存模式编译的程序,应使用下列语句来将路径名的段

和偏移值放入DS和DX:

      regs.x.dx=(unsigned)argv(1);

      sregs.ds=_DS;

    在其它的内存模式下儒要用到其它的赋值方法。因为MicrosoftC缺少寄器伪变量,

因此应使用下列语句来取而代之:

      segread(&sregs);

    如果操作成功,就会清除进位标志,并且在cx中包含有文件的属性字。下面的表描

述了属性字中的每一位以及所对应的属性含义:

        位                    含义(如果置位,为1时)

        0                               Read Only(只读)

        1                               Hidden(隐藏)

        2                               System(系统)

        5                               Archive(归档)

                   

    如果某位已设置,则此文件就具备所对应的属性(设置归档位表示此文件自从被创建

成上次修改后还未备份)。

    为了使用方便和便于阅读,我们使用了#有define指示符来创建属性字中各个含义位

的位屏蔽字(这些定义包含在ATTRMASK.H文件中;参见以下的代码片断)。我们在程

序中使用位屏蔽字来读取和修改文件的属性字。

      /*attmask.h-from chapter 4 of DOS Programmer's Reference*/

                                                                

66页

#define ARCHIVE_BIT 0x20 /*Bit 5 of CX is the archive bit*/

#define SYSTEM_BIT 0x04 /*Bit 2 of CX is the system bit*/

#define HIDDEN_BIT 0x02 /*Bit 1 of CX is the hidden bit*/

#define RDONLY_BIT 0x01 /*Bit 0 of CX is the red-only bit*/

列表4.3及列表4.4则给出了第二个实例程序版本所使用的一些杂用功能。

列表4.3

/*parsarg.c

Listing 4.3 of DOS Programmer's Reference*/

#include<conio.h>

#include<ctype.h>

typedef enum{clr,set}clrorset;

int parsearg(char*thearg,clrorset*action,char*selection)

{

if(*(thearg)=='/'){

switch(*(thearg+2)){

case '+':

*action=set;break;

case '-':

 *action=clr;break;

default:

CPUtS("USe '+' tO Set Or '-' tO Clear\n\r");

return (0);

}

*selection=toupper(*(thearg+1));

return (1);

} else{

 cputs("Usage:chmd filename/xy\n\r"

"where x=A(acchive) or H(hidden) or\n\r"

"R(read-only) or S(system),\n\r"

"and y=+(set) or -(clear)\n\r");

return (0);

}

}

列表4.4

/*showatr1.c

Listing 4.4 of DOS Programmer's Reference*/

#include<conio.h> 

#include"attrmaSk.h"

#define CLEAR 0

#define isclear(x,y) ((x&y)==CLEAR)/*Parens around x,y?*/

#define putStat(x,y) CPUtS(iSClear(x,y)?"clear":"set")

void showattr(int attr) 

{

CputS("Archive System Hidden Read-only\n\r");

putStat(attr,ARCHIVE_BIT);

putStat(attr,SYSTEM_BIT);

putStat(attr,HIDDEN_BIT);

putStat(attr,RDONLY_BIT);

cputS("\n\r");

}

 

67页

    如果把列表4.2(此程序的第一版)与列表4.5(第二版)相比,读者就会发现,在使用

中断的程序中,进行出错检查的工作要比使用C库函数更复杂一些。因为不同的C在库

函数上有一些不同之处,所以本程序只能在Turbo C下编译如果使用Microsoft C则需

要作些修改,因为它缺少_chmod函数。

列表4.5

/*chmod2.c.

Listing 4.5 of DOS Programmer's Reference*/

#include <conio.h>

#include <stdio.h>

#include <io.h>

#include <ctype.h>

#include <process.h>

#include "attrmaSk.h"

#define GET_FATTR 0X00

#define SET_FATTR 0X01

typedef enum {clr,set}clrorset;

void showattr(int attr); /*Show file attribute*/

int parsearglchar*thearg,/*Parse command-line argument*/

clrorset*action,/*Clear or set attribute*/

char*selection);/*Selected attribute*/

  main(int argc,char*argv[])

{

extern char*sys_errlist[];/*PrOvided by Turbo C*/

extern int errno;/*Ditto*/

clrorset action;

char selection;

 unsigned attrib, setting;

int goahead;

if(argc==3)goahead=parsearg(argv[2],&action,&selection);

if(!goahead)

{

if(argc==3)

{

cputs("Can't parSe");

 cputs(argv[2]);

}

else

cputs("NO input");

exit(1);

}

switch(selection){

caSe 'A': Setting=ARCHIVE_BIT;break;

caSe 'H': Setting=HIDDEN_BIT;break;

caSe 'R': Setting=RDONLY_BIT;break;

CaSe 'S': Setting=SYSTEM_BIT;break;

default:

cputS("Bad inpUt:"); cputS(argv[2]);cputS("\n\r");

exit(1);

}

 

68页

            attrib=Chmod(argv[1],GET_FATTR);

            if(attrib!=0xFFFF){ 

                Cputs("··········Initial········\n\r");

                shOwattr(attrib);

                  if(actiOn==clr){

                      setting=((-setting)&attrib);

                  }else{ 

                      setting=(setting|attrib);

                  }

                attrib = chmod(argv[1],SET_FATTR,setting);

                cputs("··········Final············\n\r");

                  showattr(attrib);

            }else{ 

                  cputs("funCtion_chmodfailed: \n\r");

                cputs(SyS_errlist[errnOn]);cputs("\n\r");

            }

        }/*end main*/

      注意chmod()C库函数返回文件属性字作为一个函数的返回值(-1表示有一个错

误出现),而Int 21h功能43h则在寄存器CX中返回文件属性字,并通过设置进位标志来

表示出错(象大多数DOS功能那样)。因为由C库函数所返回的结果与DOS功能在CX

中返回的结果是相同的,因此可在两个程序中都使用showattr()函数来解释属性字的含

义。

4.2.2Turbo Pascal 

      Turbo Pascal 4.0版在3.0版的基础上作了改进。新的版本都提供了对调用DOS和

BIOs功能的极好的支持。随后在升级到5.0版时,又恢复了几个在由3.0版到4.0版升

级时所丢掉的几个很有用的特性,并且又第一次内带了一个内带的调试器,这对于复杂程

序是一个非常有帮助的工具。在Turbo Pascal 5.5版中。加进了面向对象编程的功能,并

且还支持多种数学协处理器。Turbo Pascal 6.0版中加进了Turbo Vision,这是一个用于

DOS程序的面向对象的应用程序框架,此外还增加了一个增强的开发环境。 Turbo Pascal

7.0版则继续地增加了一些功能,以添加支持Windows的功能。

      该编程语言中已含有大量的内带设施,来访问系统资源,并最大限度地减少了程序员

自己去编写他们自己的系统级代码的可能性。

      文件和控制台输入/输出功能满足了几乎所有程序员的要求,大多数文件和目录操作

(获取文件大小、获取当前目录、改变目录、创建目录等等)都得到了完全的支持。我们在本

章前面曾提到过,4.0版和5.0版简化了编写需要选择一组含有通配符文件说明的程序

的过程。

      这类资源支持是如此地齐备,因此,很难找出需要直接从程序中调用DOS或BIOS

服务的地方。当Turbo Pascal已具备了对控制台输入和输出操作的完备支持的函数和过

程时,还有什么必要非得自己去调用相应的DOS或BIOS呢?

      但是,毕竟还是有需要直接访问DOS和BIOS的时候,那就是当用户程序需要某些

功能,而Turbo Pascal语言不能提供此类功能时,本节给出的实例程序,只是出于指导性

    

69页

目的;此程序重复的是在高级语言Turbo Pascal里可以得到的操作。

    在这些程序中,第一个使用了BIOS的Int 17功能2来检验打印机是否已联机(类似

的结果—以及相同的复杂错误检查功能,都可通过Turbo Pascal语言的内带过程和函

数来实现)。第二个实例程序,同样也是重复了Turbo Pascal 4.0所内带的函数,来得到一

个文件创建或最近修改时的日期和时间。

    访问寄存器和产生中断

    在Turbo Pascal中,用于访问各个寄存器的数据结构位于Registers记录中。此记录中

的这一结构,是在Turbo Pascal 4.0的DOS联合中定义的,下面给出了它的代码;在3.0

版中,此记录则必须由用户来定义:

      Type

      { Registers record used by Intr and MsDos } 

        Registers = Record

              Case Integer of

              0: (AX,BX,CX,DX,BP,SI,DI,DS,ES,Flags : Word) ;

              1 : (AL,AH,BL,BH,CL,CH,DL,DH : Byte)

              End:<Rs>

    Turbo Pascal带有下列两个过程,用于产生中断:

    MsDos(vars Regs: Registers)

    Intr(IntNo :Byte; vars Regs :Registers)

    MsDos产生的是Int 21h中断,即“通用的”DOS中断。Intr则可以产生任何软件中

断,包括21h(在 3.0版中,Intr的第一个参数是一个整数)。

    Turbo Pascal程序的第一个例子—列表4.6 演示了一个简单的对BIOS的调用。

Printer Online函数调用BIOS的Int 17h功能2(打印机状态请求)以检查打印机是否已联

机。功能2在AH中返回一个字节,以指示打印机是否是忙、已选择、缺纸等等(必须保证已

读过本章前面的“高级语言资源”一节中对这个BIOS中断的说明)。但是,这个程序仅检

查了AH中的位7;如果此位已置上,表示打印机已选择上。

列表4.6

{ PRTRDEMO.PAS                } 

{ Listing 4.6 in DOS Programmer's Reference  } 

{ = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = } 

Program PrinterDemo;

Uses Dos ;

      Function PrinterOnline : Boolean ;

                Const

                PrnStatuSInt :Byte: $17;

                StatusRequest : Byte: $02 ;

                PrinterNum : Word:0;{ 0for LPT1,1for LPT2, etc.} 

              Var

            Regs : Registers;       {  Type is defihed in Dos unit.} 

        Begin

        Regs.AH := StatusRequest;

        Regs. DX := printerNum;

70页

        Intr( PrnStatusInt,Regs); 

            Printeronline := ( Regs.AH and $80) : $80

            End; 

      Begin      {  Program} 

      If Printeronline  Then

          WriteLn( '  Ready to print !' ) 

      ElSe

          Writeln(' please check the printer! ' ) 

      End

    读取一个文件的日期及时间标记

    通过DOS的Int 21h,可以获得一个文件在创建成最近修改时的日期或时间。名为

GeteDateAndTime Pascal过程演示了DOS功能的使用方法(参见列表4.7)。

列表 4.7

    { GETDTTM.PAS } 

    { Listing 4.7 in DOS Programmer's Reference       } 

    {Designed to be called from FILEDTTM.PAS              } 

    { = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = } 

    Procedure GetDateAndTime( Pathname:PathStr ;

                                  Var DateWord , TimeWord : Word) ;

        const

              GetDate AndTime:Byte=$57;

              CloseFile:Byte=$3E;

            var

              Regs;Registers ;

              Handle : Word ;

        Function CarryClear (Regs : Registers) : Boolean ;

        Begin CarnyClear :=( ( Regs. Flags and  1=0)End ;

        { = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = } 

        Function GetFileHandle( Pathname : PathStr): Word; 

              Const GetHandle : Byte = $3D; ReadAccess : Byte = 0;

              Var PathSeg , PathOfs : Word ;

        Begin

        Pathname: = pathname+Chr( 0) ;

        PathSeg : = Seg(Pathname[1]) ; Pathofs := ofs(Pathname[1] );

        Regs. AH: =  GetHandle ;  Regs. AL : = ReadAccess ;

        Regs,DS : = pathSeg ; Regs. DX : = pathofs;

        MSDos (Regs);

        If CarcyClear(Regs) Then

              GetFileHandle : =  Regs.AX{ No semicolon before ElSe !} 

        Else

              Begin

              WriteLn('Handle function failed!' ) ;

                  EXit

              End;{If carry is clear} 

        End ;                        {  Function GetFileHandle} 

    { = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = }

    Begin          {  Procedure GetDateAndTime} 

    Handle := GetFileHandle(Pathname) ;

    Regs.AH : = GetDateAndTime ;  Regs. AL :=0;Regs. BX : = Handle;

    MSDos( Regs) ;

    If CarryClear(Regs ) Then

        Begin DateWord: = Regs.DX;TimeWord : = Regs.CX End

    Else

 

71页

      Begin

            DateWord: = 0, TimeWord: = 0, { Error flag for Cailer}  

            End; 

      Regs.AH := CloseFile;       Regs. BX := Handle; 

      MSDOS (Regs);

        If NOT CarryClear(Regs ) Then

            WriteLn( 

                ' Warning: Procedure GetDateAndTime did not close' ,                    ·

                pathname)

      End ;              { Procedure GetDateAndTime}  

    功能57h要求的正确输入项是一个文件句柄。Turbo Pascal具备完整的面向文件的过

程和函数,但是,如果要进行更细致的系统级文件管理,还得靠程序员自己去努力。为了使

用功能57h,GetDateAndTime过程,必须“翻遍”Turbo的正常文件管理例程。因此,我们不

使用Pascal的文件打开过程(即名为Assign和Reset或Rewrite),而调用DOS的Int 21h

功能3Dh。此系统调用是由GetFileHandle函数执行的,它被嵌套在GetDateAndTime过程

内。

    功能3Dh要求得到一个ASCIIZ串的地址,此串中包含有文件的路径名。因为Turbo

Pascal串不是由一个零字节来结尾的,所以该函数必须自己附加Chr(0)到串Pathname

上。因为在Turbo Pascal串中,第一个字节位置存放的是串的长度,但却不能包含在DOS

功能3Dh的串参数中,因此,我们将Pathname[ 1] 的地址传递给了此函数。有了Seg和Ofs

函数,就可以直截了当地访问串地址的两个组成部分。

    在获得了文件句柄后,GetDateAndTime将它传递给了DOS功能57h。AL寄存器设

置为0,指定DOS功能应该获取(而不是设置)文件的日期和时间。如果功能57h成功(由

进位标志清除来指明),它在CX和DX寄存器中相应地返回文件的时间和日期。

    列表4.8显示了程序FILEDTTM.PAS,则显示了如何使用Turbo Pascal的GetDate- ·

AndTime函数的。

列表4.8

{ FILEDTTM.PAS  

{Listing 4.8 in DOS Programmer's Reference         }

{= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = }

Program FileDateAndTime ;

      Uses Dos;

      Type

            PathName Type = String[64];

            String5 = String[5] ;

            { Max DOS path is 63 ; add 1 for the null.}

      Var

            Pathname : PathNameType;

          DateWord , TimeWord : Word ;     { Use Integer in 3.0} 

          Hours, Mins, Secs, Year, Month, Day : Integer,

          Ch : Char;

{ $i GETDTTM.PAS} 

{ = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = } 

Begin         {  Program}

Write( ' pathname? >' );ReadLn(Pathname);

GetDateAndTime ( Pathname , DateWord , TimeWord);

If( DateWord<> 0) Then

72页

              Begin

              { Decode date} 

              Year     :=( ( DateWord AND $FE00)  SHR 9) +1980;

            Month:=(DateWord AND $01E0)SHR 5 ;

              Day      :=(DateWord AND $001 F);

              { Decode time} 

              Hours:=( TimeWord AND $F800)SHR 11 ;

              Mins    :=( TimeWord AND $07E0)  SHR 5 ;

              Secs     :=(TimeWord AND $001 F) SHL 1 ; {  Shift left to double} 

              WriteLn(' File Time:'  , Hours : 2,' :'  , Mins :02,':',Secs:2);

            Writeln(' File Date:' , Year:4,' /' , Month:02,'/'  ,  Day:2);

  End                      {  No semicolon before EIse} 

        Else

              Writeln(' GetDate And Time has failed!');

        End

4.2.3QuickBASIC

      QuickBASIC已包含了在BASIC及GW_BASIC中就已带有的,我们大家都很熟悉

的处理文件语句。如KILL FileName$语句删除文件,CHDIR用于改变当前目录,等等。

输入输出的例程也很灵活。

      但是,BASIC的文件处理功能在某些方面有些欠缺。例如,它处理包含有文件名通配

符(使用* 或?)的过程就非常地麻烦。我们不得不弯弯绕绕地,先将一个DOS命令传递给

SHELL,引导命令的输出到一个文件,然后从输出文件中将内容读进程序中,每次读一

行,分析出文件名(并要跳过一些干扰行)。磁盘驱动器为空、盘上贴有写保护标签,以及磁

盘已满,都有可能导致程序中止。并且,我们又怎么能知道所使用的SHELL的输出文件,

不会与某个已有的文件重名呢?

      而通过在DOS层上的编程,便可以避免所有这些麻烦。本节中给出的第二个实例程

序,便显示了如何去调用DOS的int 21h功能4Eh及4Fh,来找出匹配文件说明的所有文

件的名字,其说明中可以包含一个或多个通配字符(在DOS级上所进行的其它编程工作

的最佳应用,不仅可以使得编程更方便,而且也极大地方便了运行应用程序的各个用户)。

      首先,让我们来看一个简单的例子,它介绍了从BASIC中调用DOS的一些基础知

识。第一个QuickBASIC程序(就象其它语言中的第一个例子一样),使用BIOS的Int 17h

功能2来检查打印机是否已联机。

      访问寄存器和产生中断

      在QuickBASIC中,用于DOS及BIOS接口的基本数据结构是Register记录:

      TYPE Registers

            AX AS INTEGER

                BX AS INTEGER

                CX AS INTEGER

                DX AS INTEGER

                BP AS INTEGER

73页         SI AS INTEGER

              DI AS INTEGER

              SI AS INTEGER

              FLAGS AS INTEGER

              DS AS INTEGER

              ES AS INTEGER

      END TYPE

    我们通过DIM语句来声明寄器类型变量:

      DIM InRegs AS Registers,OutRegs AS Registers

因为这些变量遵守正常的作用范围规则,所以它们声明为过程内的局部变量。

    Quick BASIC内部带有下述两个过程,用于产生中断:

      CALL INTERRUPT(Int Number,InRegs,OutRegs)

      CALL INTERRUPTX(Int Number,InRegs,OutRegs)

    CALL INTERRUPT忽略DS和ES寄存器(或Registers记录参数中的DS和ES

域),而CALL INTERRUPTX则使用这些寄存器或域。如果想要在调用INTERRUPTX

时保持DS和ES不改变,则应给记录中的DS和ES域赋值-1。

    列表4.9显示了使用BIOS打印机状态请求的过程。因为此结果在各种硬件配置情况

下并不能保持完全的一致性,因此必须阅读"对BIOS打印机请求"一节中的注释(在本章

中有关C语言的小节内),这样才能在你的程序中使用此功能,并知道所起的作用。

列表4.9

"PRNOK.BAS-Listing 4.9 in DOS Programmer' s Reference

CONST PRN.Status.rq%=&H200            '2 in AH

CONST BIOS.PRN.INT%=&H17

TYPE Registers

        AX AS INTEGER

        BX AS INTEGER

        CX AS INTEGER

        DX AS INTEGER

        BP AS INTEGER

        SI AS INTEGER

        DI AS INTEGER

        FLAGS AS INTEGER

        DS AS INTEGER

        ES AS INTEGER

ENDTYPE

DIM InRegs AS Registers,outRegs AS Registers

InRegs.AX =  PRN. Status.rq% 

CALL INTERRUPT(BIOS.PRN.INT%, InRegs , OutRegs) 

IF((OutRegs. AX AND &H8000) = &H8000) THEN

        PRINT" Printer OK" 

ELSE

        PRINT" Please check the printer"

74页

        END IF

            END           ' PROGRAM

      找到匹配文件说明的文件

      通常,复杂而又细致的程序必须处理由带有通配符说明的一组文件。QuickBASIC并

未提供一个内带的设施,来找出匹配用户提供的文件名说明的一组文件。只有构造出这样

一个程序,才能使QuickBASIC语言发挥出更大的作用。

      DOS资源中,用于文件说明的是Int 21h的功能4Eh(FindFirst)和4Fh(FindNext)。这

些函数相应地找出第一个匹配的文件名以及任何剩下匹配的文件名。它们输出中的两个

地方——文件名和其它的信息,都位于DTA(磁盘传送区域)内。缺省时,DTA是一个128

字节的缓冲区,位于程序段前缀的偏移值80h处。但是,在本节中给出的样本程序,使用了

DOS功能1Ah来设置不同的DTA地址,来避免任何可能的对其它DOS功能的干扰。

      大多数BASIC的实现,也包括QuickBASIC在内,都没有将串保存在一个固定的位

置处。有一个4字节的串描述,保持着对每个串位置的跟踪。此描述符包含了一个16位的指

向该串的指针;这个指针中包含有进入该缺省数据区域的串的偏移值。我们不用担心去定

位此描述符并获取此地址,因为下面的QuickBASIC函数:

      SADD(TheString$)

    将返回作为参数的串的偏移值(如果需宴访问该串描述符,就可以通过VARSEG和

VARPTR函数来获取它的段值和偏移值)。SADD应该在用户程序访问此串之前立即被

调用,因为一个串可以在程序执行期间,在内存中“任意挪动”,特别是如果程序中改变了

串的长度。

      在列表4.10里列出的程序演示了使用功能4Eh和4Fh来获取匹配文件说明的文件名

的过程。

    列表4.10

    ' FILEDEMO.BAS- Listing  4.10 from DOS Programmer's Reference

    DECLARE SUB SetDTA(TheDTA$) 

    DECLARE SUB FindFirst(FileSpec$,FileName$) 

    DECLARE SUB FindNext ( FileName$) 

    DECLARE SUB BuildName (TheName$)

    TYPE Registers

        AX AS INTEGER

        BX AS INTEGER

        CX AS INTEGER

        DX AS INTEGER

        bP AS INTEGER

        SI AS INTEGER

        DI AS INTEGER

        FLAGS AS INTEGER

        DS AS INTEGER

        ES AS INTEGER

    END TYPE

    DTA$=SPACE$(43) 

75页

LINE INPUT "FileSpec? >" , FileSpec$

  CALL SetDTA( DTA$ )

 Get the first matching file name

CALL FindFirst ( ( FileSpec$) , FileName$)

IF FileName$ <> " " THEN

PRINT "First match: " ; FileName$

DO

CALL FindNext ( FileName$ )

IF FileName$ <> " "THEN

PRINT " Next match: " ; FileName$

END IF

LOOP UNTIL FileName$ = " "

ELSE

 PRINT "NO files match " ; FileSpec$

END IF

END  PROGRAM

 =====Subroutines =====

SUB BuildName (TheName$)

SHARED DTA$

EndofStr% = INSTR(31 , DTA$ , CHR$(0))

TheName$ = MID$(DTA$, 31 , Endofstr% - 31 )

END SUB

SUB FindFirst (FileSpec$, FileName$)

FileSpec$ = FileSpec$ + CHR$(0)  make ASCIIZ

DIM InRegs AS Registers, outRegs AS Registers

InRegs.AX = &H4E00  'find first matching file

InRegs . DX = SADD(FileSpec$) ' offset of FileSpec$

InRegs .DS = VARSEG(FileSpec$) ' seg of FileSpec$

InRegs.CX = 0 'normal files only- -no dirs, etc.

CALL INTERRUPT(&H21 , InRegs, OutRegs)

GOt a match? Yes, if CARRY FLAG(bit 0 of FLAGS) is Clear.



IF (OutRegs.FLAGS AND 1 ) = 0 THEN

CALL BuildName ( FileName$ ) :

ELSE 

FileName$ = "  "

END IF

END SUB

SUB FindNext (FileName$)

DIM InRegs AS Registers, outRegs AS Registers

InRegs.AX = &H4F00 'find next matching file

CALL INTERRUPT(&H21 , InRegs, outRegs)

IF (OutRegs.FLAGS AND 1 ) = 0 THEN

CALL BuildName ( FileName$ ) : 

ELSE

FileName$ =" "

END IF

END SUB

SUB SetDTA (DTA$)

DIM InRegs AS Registers, outRegs AS Registers

 Set the Disk Transfer Area address

InRegs.DX = SADD(DTA$) ' OffSet Of DTA

InRegs .DS = VARSEG(DTA$) ' segment Of DTA

InRegs.AX = &H1A00 'DOS function fon setting OTA addr

CALL INTERRUPT(&H21 , InRegs , outRegs)

76页

             no return value for function &H1A

          END SUB

      下面的过程:

        SetDTA(TheDTA$)

      将设置磁盘传送区的地址为它的串参数的地址:

      下面的过程:

        FindFirst(FileSpec$,FileName$)及FindNext (FileName$)

      将定位到所匹配的文件名。如果找到了匹配的文件名,这两个过程都把匹配的文件名

赋值给FileName$;如果未找到匹配的文件名,它们就会赋上空串(" " )。尽管此实例程序

只是简单地显示出文件名,但我们可以在自己的程序中利用所返回的结果来完成任何工

作。

                        4.3小    结

      我们在本章中介绍了在汇编语言、C、Pascal及BASIC内进行系统级编程的基础。用

于访问DOS和BIOS资源的过程有三个主要的组成部分:

      ·以相应的值装入寄存器

      ·产生一个软件中断

      ·在寄存器内返回中断的结果

      有时还需要一些额外的工作,如当应用程序需要将串或其它数据项的地址传送给系

统。每种编程语言都提供了各种资源,用于获取各个项的地址;使用各个地址的简单程度

依使用的各种的语言而有所变化。

      如果在已读完了本章各节中对每种语言(不仅仅是所选择的语言)的技术介绍后,读

者可能已注意到,在提供对DOS和BIOS资源的支持上,各种语言有很大的不同。在以后

进行的编程项目中选择语言时,应考虑到这些不同之处的。

 

        void main()

}

·111····           白背景(逆向)

/* PrototypeS*/

crosoft
Word会受此措施的牵制。选择此措施来写这一个项目标次第是不行承受的,除非在

0000         0            黑色

cmp ax , MDA_MONITOR

          /*   Scroll the inside of the window up one line every 

gotoxy(i, rc); wch(VERTLINE, 7);

cmp dx,06780h

}

90页

出乎了本书的限制。

除总内存数的结果。再组成每行七十八个文本字符,那么正是2*80*25,等于4000字节,或

02h         文本        16          80*25                     X    
X         X           X

示在荧屏上。字符放置在最终一行的最后一列时,或然光标在最终一行的轻易地点,此时

inc dX , Get I/O address Of data

; Identify the chip itself

mov cl,4

cmp  ch,0EAh ; Video seven?

in al , dx

or word ptp [ bx ] , CIRRUS_510_520

}

sti ; Reenable interrupts

里的新闻为根基来更新摄像体现。实际的荧屏展现由电子束来暴发,该电子束能在对显示屏

UNKNOWN_CHIP equ 000h SHL 10

{

cmp al,010h ; HGCPlus?

      探测并识别SVGA是多少个幽默的题目。开垦商们在开首仿制IBM的EGA和VGA

VSYNC :

                regs.h.dh=r;

5.2.1存款和储蓄和展现摄像数据

首要的设施,因为它们在程序和程序员之间负责着相互成效点的剧中人物。

PARADISE_BIOS_Sig db”VGA=”

      out dx,al           ; send to CGA mode control port

          }

                rch(&screen[i][j].ch,&screen[i][j].att);

   
记住:DOS和BIOS只是为爆发显示屏提供了构件块。程序猿的想象力和能力是使程序

mov si,offset SecondarySystem

mov al,006h , Extension control reg

        ·分明硬件光标的轻重缓急和地方

regs.h.bh=7;

    CTI BASED                equ 004h SKL 6

 

Author

发表评论

电子邮件地址不会被公开。 必填项已用*标注