在 DOS 程序執(zhí)行時，要確定當前目錄是很容易的，有現(xiàn)成的 DOS 中斷，但當程序是在 PAHT 指定的目錄中執(zhí)行時，有時要用到相同目錄下的數(shù)據(jù)文件，這樣就需要獲得執(zhí)行程序所在的目錄。
DOS 程序執(zhí)行時，系統(tǒng)要建立一個用于進程的環(huán)境塊，文件剛開始執(zhí)行時，DS 和 ES 指向 PSP 地址，而 PSP 段的偏移 002CH 處的一個字的內(nèi)容就是環(huán)境塊的段地址。環(huán)境塊里面是用 SET 命令可以看到的環(huán)境字符串，包括 PATH，PROMPT 串等等，每個串以 00 結尾，整個環(huán)境塊以 00 00 結束，在環(huán)境串以后為字節(jié) 01 00，再接下去就是包括全路徑的執(zhí)行文件名，對這個字符串進行處理，截去最后的文件名，得到的就是當前文件所在的目錄。

C:\> debug
-d 002c
1577:002C D6 0E 4E 01 ..N.
(0ED6:0000 即環(huán)境塊段地址）
-d 0ed6:0
0ED6:0000 43 4F 4E 46 49 47 3D 4E-6F 72 00 54 4D 50 3D 43 CONFIG=Nor.TMP=C
0ED6:0010 3A 5C 57 49 4E 44 4F 57-53 5C 54 45 4D 50 00 54 :\WINDOWS\TEMP.T
0ED6:0020 45 4D 50 3D 43 3A 5C 57-49 4E 44 4F 57 53 5C 54 EMP=C:\WINDOWS\T
0ED6:0030 45 4D 50 00 77 69 6E 62-6F 6F 74 64 69 72 3D 43 EMP.winbootdir=C
0ED6:0040 3A 5C 57 49 4E 44 4F 57-53 00 43 4F 4D 53 50 45 :\WINDOWS.COMSPE
0ED6:0050 43 3D 43 3A 5C 57 49 4E-44 4F 57 53 5C 43 4F 4D C=C:\WINDOWS\COM
0ED6:0060 4D 41 4E 44 2E 43 4F 4D-00 50 41 54 48 3D 45 3A MAND.COM.PATH=E:
0ED6:0070 5C 42 4F 52 4C 41 4E 44-5C 42 49 4E 3B 44 3A 5C \BORLAND\BIN;D:\
0ED6:0080 41 44 56 53 43 48 3B 43-3A 5C 57 49 4E 44 4F 57 ADVSCH;C:\WINDOW
0ED6:0090 53 3B 43 3A 5C 57 49 4E-44 4F 57 53 5C 43 4F 4D S;C:\WINDOWS\COM
0ED6:00A0 4D 41 4E 44 3B 43 3A 5C-54 4F 4F 4C 53 3B 43 3A MAND;C:\TOOLS;C:
0ED6:00B0 5C 44 4F 53 3B 43 3A 5C-4E 4F 52 54 4F 4E 3B 44 \DOS;C:\NORTON;D
0ED6:00C0 3A 5C 50 52 4F 54 45 4C-3B 44 3A 5C 50 46 57 3B :\PROTEL;D:\PFW;
0ED6:00D0 44 3A 5C 50 46 57 00 50-52 4F 4D 50 54 3D 24 70 D:/PFW.PROMPT=$P
0ED6:00E0 24 67 20 00 77 69 6E 64-69 72 3D 43 3A 5C 57 49 $g .windir=C:\WI
0ED6:00F0 4E 44 4F 57 53 00 42 4C-41 53 54 45 52 3D 41 32 NDOWS.BLASTER=A2
0ED6:0100 32 30 20 49 35 20 44 31-20 54 36 20 50 33 31 30 20 I5 D1 T6 P310
0ED6:0110 00 43 4D 44 4C 49 4E 45-3D 64 65 62 75 67 00 00 .CMDLINE=debug..
0ED6:0120 01 00 43 3A 5C 57 49 4E-44 4F 57 53 5C 43 4F 4D ..C:\WINDOWS\COM
0ED6:0130 4D 41 4E 44 5C 44 45 42-55 47 2E 45 58 45 00 CD MAND\DEBUG.EXE..
0ED6:0140 5A EB 0E 15 91 C0 CD 21-44 45 42 55 47 00 21 C3 Z......!DEBUG.!.
0ED6:0150 CD 20 00 A0 00 9A F0 FE-1D F0 14 03 16 0D 6D 01 . ............m.
(紅字 00 00 即環(huán)境塊結束，藍字為當前執(zhí)行文件名）

匯編編程示例：

...
mov es,ds:[002ch] ;DS指向PSP段地址，DS的002C為環(huán)境塊段地址
mov cx,0ffffh ;取環(huán)境塊段地址
xor di,di
xor al,al
cld
re_scan:
repnz scasb ;查找 00
scasb ;判斷 下一個字節(jié)是否為 00
jnz re_scan ;不是則繼續(xù)查找
inc di ;找到 00 00 則加 2 字節(jié)地址就是文件名
inc di ;現(xiàn)在ES:DI所指的就是執(zhí)行的文件名
...