Вывод на экран текущий каталог в графическом режиме (со скролингом)

Министерство образования Российской Федерации

Институт переподготовки кадров

Уральского государственного технического университета

Кафедра микропроцессорной техники

Курсовая
работа

На тему:   Вывод на
экран текущий каталог в графическом режиме (со скролингом)

Руководитель                                            
В.П. Кулюкин

Студент гр.СП-923                               

г.Нягань

2001г.

СОДЕРЖАНИЕ

 

1.    ВВЕДЕНИЕ                                                                    3

2.    ОСНОВНАЯ ЧАСТЬ                                                   4

3.    ЗАКЛЮЧЕНИЕ                                                                        17

4.    БИБЛИОГРАФИЧЕСКИЙ СПИСОК                     18

Введение.

 

Ассемблер- один из самых
старых из существующих сегодня языков программирования.Когда-то это был самый
основной язык, без которого нельзя было заставить компьютер сделать что-либо
полезное.

Постепенно ситуация менялась.
Появились более удобные средства общения с компьютером. Но в отличии от других
языков ассемблер не умирал, более того он немог этого сделать в принципе.

Если коротко, то ассемблер- это
символическое представление машинного языка. Все процессы в машине на самом
низком, аппаратном уровне приводятся в действие только командами машинногшо
языка.

Отсюда понятно, что несмотря на общее
название, язык Ассемблера для каждого типа компьютера свой. Это касается и
внешнего вида программ, написанных на Ассемблере, и идей, отражением которых
этот язык является.

Описание программы.

Windows-приложение на
ассемблере содержит один сегмент данных .data и один сегмент кода .code. В
программе использовано 28 функций API. Параметры этим функциям передаются через
стек, результат возвращается в регистре ЕАХ.

Регистр mode1 задает модуль
сегментации (flat) и стиль генерации кода при входе в процедуры программы и
выходе из них (stdcall). Модель памяти flat обозначает плоскую модель памяти. В
соответствии с этой моделью компилятор создает программу, которая содержит
32-битовый сегмент для данных и кода программы. Указание этой модели памяти
заставляет компоновщик создать исполняемый файл с расширением .exe. Параметр
stdcall определяет порядок передачи параметров через стек справа налево.

Директива include включае в программу
файл win32.inc.

Функции Win32 API, используемые в
программе должны быть объявлены с помощью директивы extrn для того, чтобы
компилятор мог сгенерировать правильный код.

Строки 35-68 содержат описание
сегмента данных, в котором определяются переменные и экземпляры структур,
используемые в программе. Для запуска приложения под управлением Windows
необходимо выполнить ряд шагов, содержание которых заключается в вызове ряда
функций Win32.API:

* Выполнение стартового кода;

* Выполнение главной функции, которая
выполняет следующие действия;

·   
Регистрирует
класс окна;

·   
Создает окно;

·   
Отображает окно;

·   
Запускает цикл
обработки сообщений;

·   
Завершает цикл
обработки сообщения;

* Организация обработки сообщений в
оконной процедуре.

Оконная процедура определяет то, что
выводится в рабочую область окна, и то, как окну реагировать на
пользовательский ввод.Создание окна выполняется функцией Win32 API
CreateWindowEx. Для этого ей нужно передать множество параметров. Для создания
окна необходимы 2 шага: сначала определение класса окна, а лишь затем
непосредственно его создание.

После выполнения функции
CreateWindowExA создается окно, но это пока произойдет только лишь внутри самой
Windows, - на экране это новое окно пока еще не отобразится. Для того чтобы
созданное окно появилось на экране, применяем функцию ShowWindowA. В качестве
параметров этой функции передается дескриптор hWnd окна, которое необходимо
отобразить на экране, и константа, задающая начальный вид окна.

Приложение может иметь несколько
оконных функций. Их количество определяется количеством классов окон,
зарегестрированных в системе функцией Register Class(Ex).

Windows  требует, чтобы оконная
функция сохраняла значения регистров ebi, edi и esi ,т.к. оконная функция
должна быть рекурсивной.По завершении работы оконная функция формирует значения
в регистре EAX. Если сообщение обрабатывалось в оконной функции, то в eax
необходимо поместить нулевое значение.

Полосы прокрутки - этоэлементы
управления, предназначенные для регулирования вертикального и горизонтального
положения на экране ассоциированных с ними объектов. Разница между полосами
прокрутки, являющимися частью окна и полосами прокрутки - дочерними окнами,
состоит в том, что дочерние окна имеют встроенный клавиатурный интерфейс,
позволяющий воздействовать на полосу прокрутки с помощью клавиатуры. Сообщение
SB_LINEUP генерируется обеими полосами при щелчке на верхней или левой стрелке,
а сообщение SB_LINEDOWN - в случае нажатия нижней или правой стрелки. Чтобы
полоса прокрутки функционировала корректно необходимо определить для нее
диапозон прокрутки и задать позицию бегунка.

Встроенная полоса прокрутки, к
сожалению, досталась только управлению с помощью курсора мыши. По умолчанию для
полос прокрутки, являющимися частью окна, этот диапозон(число шагов мужду
крайними позициями бегунка) определен от 0 до 100. Для того, чтобы изменить
диапозон прокрутки необходимо вызвать функцию SetScrollRange

В Windows не смотря на то, что
операции ввода осуществляемые приложением, ограничены рабочей областью его
окна, программа должна быть готова обновить информацию в этой области по 
требованию системы.

В программе использован ряд функций
Windows API, которые как бы являются основными, когда речь идет об оконных
процедурах (CreateWindow, ShowWindow и др.).

 Рассмотрим подробнее процедуры,
которые организованы на основе стиля окна.

Краткое описание процедур:

InvalidateRect - эта функция
добавляет прямоугольник к области модификации указанных окон.  Область
модификации является частью области клиентского окна, которая должна быть
повторно перересована.

Параметры:

hWnd определяет окно, чья область
изменилась, если этот параметр равен 0, то Windows изменяет все окна и посылает
оконной процедуре сообщение *WM_ERASEBKGND and WM_NCPAINT*;

lpRect  указатель на структуру RECT,
которая содержит координаты клиентского прямоугольника, который будет добавлен
к области модификациибласти. Если этот параметр равен ноль, то вся область
клиента добавляется к области модификации.

BErase определяет должен ли быть
стерт фон в пределах области модификации. Если этот параметр true, фон
стирается при вызове BeginPaint

GetClientRect - отыскивает координаты
области клиента окна. Клиентские координаты определяют координаты верхнего
левого и правого нижнего углов. Координаты верхнего левого угла равны (0,0).

Параметры:

hWnd : определяет окно, координаты
которого надо найти.

lpRect: указатель на структуру,
которая получит кооридинаты.

При правильном завершении функции
возвращается значение, отличное от 0.

SetScrollRange - функция
устанавливает минимальное и максимальное значения позиций для указанной полосы
прокрутки. Может также использоваться для скрытия стандартной полосы прокрутки.

     Параметры :

hWnd : определяет, что это
стандартное окно с полосой прокрутки или просто полоса прокрутки, в зависимости
от значения параметра nBar.

nBar: определяет полосу прокрутки.
Этот параметр может принимать разные значения. Он устанавливает диапазон
управления, если полоса окно. Устанавливает диапазон стандартной вертикальной
или горизонтальной полосы прокрутки. Определяет минимальную прокручиваемую
позицию. Определяет, должна ли быть полоса прокрутки повторно оттянута. Если
истина, то да, должна быть.

ScrollWindow - функция, которая
прокручивает содержание области клиента указанного окна.

hWnd : определяет дескриптор окна,
где клиентская область должна быть прокручена.

XAmount: определяет состав модуля для
горизонтальной прокрутки.

YAmount: определяет состав модуля для
вертикальной прокрутки.

lpRect: указатель на структуру RECT ,
определяющую часть области клиента для прокрутки. Если этот параметр равен 0,
то прокручивается вся клиентская область

lpClipRect: указатель на структуру
RECT , содержащую координаты прямоугольника отсечения.

Если функция выполнилась правильно,
то она возвращает значение, отличное от ноля.

SetScrollPos - функция, которая
устанавливает позицию бегунка в указанной полосе прокрутки и изменяет эту
позицию.

     Параметры:

hWnd : идентифицирует полосу прокрутки
или окно со стандартной полосой прокрутки, в зависимости от значения  параметра
nBar.

nBar: определяет полосу прокрутки.

Этот параметр может принимать одно из
следующих значений:

-    SB_CTL - устанавливает позицию
бегунка в управлении полосы прокрутки, hWnd - дискриптор полосы прокрутки.

-    SB_GORS - устанавливает позицию
бегунка в стандартной горизонтальной полосе прокрутки.

-    SB_VERT - устанавливает позицию
бегунка в стандартной вертикальной полосе прокрутки.

nPos: параметр, определяющий новую
позицию бегунка. Она должна быть в пределах прокручиваемого диапазона.

bRedraw: параметр, определяющий
оттянута ли повторно полоса прокрутки, для того чтобы отобразить новую позицию
бегунка. Если этот параметр истина, то полоса прокрутки повторно оттянута.

     Если функция неправильно
завершена, то возвращается ноль.

1.   
p486 ; эта директива разрешает
транслятору

; обрабатывать команды процессора i486

2.
jumps  ; транслятор автоматически преобразует

; команду условной передачи управления в комбинацию

; условной и безусловной команд, если условная команда
в

; cилу ограниченности области своего действия не

; обеспечивает передачу управления по нужному адресу

3. model flat,STDCALL   ; выбирается
модель памяти для 32-

; разрядного программирования и правила

;передачи параметров функциям STDCALL,

; далее действующие по умолчанию

4. include win32.inc    ; файл,
содержащий  описания структур

; данных и констант

5. L equ <LARGE>        ;
последовательности символов LARGE,

; являющейся именем операции,  

; объявляющей следующий за ней операнд ; 32-разрядным,
присваивается имя L

6.   extrn         ginPaint:PROC ;
описание импортируемых из

;Windows функций

7.   extrn       CreateWindowExA:PROC 

8.   extrn       DefWindowProcA:PROC

9.   extrn       DispatchMessageA:PROC

10. extrn         EndPaint:PROC

11. extrn         ExitProcess:PROC

12. extrn         GetMessageA:PROC

13. extrn         GetModuleHandleA:PROC

14. extrn         LoadCursorA:PROC

15. extrn         LoadIconA:PROC

16. extrn         PostQuitMessage:PROC

17. extrn         RegisterClassA:PROC

18. extrn         ShowWindow:PROC

19. extrn         TextOutA:PROC

20. extrn         UpdateWindow:PROC

21. extrn     GetTextMetricsA:PROC

22. extrn SetCurrentDirectoryA:PROC

23. extrn FindFirstFileA:PROC

24. extrn FindNextFileA:PROC

25. extrn FindClose:PROC

26. extrn SetScrollPos:PROC

27. extrn InvalidateRect:PROC

28. extrn GetClientRect:PROC

29. extrn ScrollWindow:PROC

30. extrn GetDC:PROC

31. extrn ReleaseDC:PROC

32. extrn SetScrollRange:PROC

33. extrn TranslateMessage:PROC

34. .data               ;предопределенное
имя,

;означающее начало сегмента данных

35. hFindFile dd   0                 

36. newhwnd        dd   0

37. wc        WNDCLASS  <?>

38. qq1       db   '@@@@'

39. lppaint        PAINTSTRUCT <?>

40. qq2       db   '@@@@'

41. msg       MSGSTRUCT  <?>

42. tm        TEXTMETRIC <?>

43. rc        RECT      <?>

44. charht         dd   0

45. hInst            dd 0

46. fl        dw   0

47.
szTitleName    db 'Это курсовой',0

48. szClassName    db 'ASMCLASS32',0

49.
Buffer         db 'Помни о порядке передачи параметров функции!',0

50. buf_v     db 260 dup (0)

51. num       dd   0

52. ;##########################

53. lpPathName dd   0

54. szP   db   0

55. w32fd WIN32_FIND_DATA    <?>

56. lpFileName dd   0

57. fn    db   "*.*",0

58. ;##########################

59. nVertDifference dd   0

60. nVertPosition  dd   0

61. cyStep         dd   0

62. nFirst         dd   0   

63. nLast     dd   0   

64. cyMax     dd   0

65. cyPos     dd   0

66. cory      dd   5   

67. count     dd   0

68. py        dd   0

69. .code               ;предопределенное
имя, означающее

;начало сегмента кода

70.
start:

71.
push  L 0

72. call  GetModuleHandleA   ;возвращает
базовый адрес модуля,

;указывающий, куда был отображен в
адресном

; пространстве процесса EXE- или DLL
файла

73.
mov   [hInst], eax       ; результат выполнения функции сохраняется в качестве
переменной hInst

74.
reg_class:

75.
;************************************************

;инициализация структуры WNDCLASS

76.
mov   [wc.clsStyle], CS_HREDRAW + CS_VREDRAW    ; стиль класса

77. mov   [wc.clsLpfnWndProc], offset WndProc ;адрес оконной процедуры

78. mov   wc.clsCbClsExtra], 0    ;определяет
дополнительное число

; байтов для структуры класса окна,

; которые система резервирует

;в служебной памяти для всех окон

; этого класса

79.
mov     [wc.clsCbWndExtra], 0 ; задает в байтах объем памяти,

; резервируемой системой в конце

; каждой такой структуры каждого окна

; данного класса

80.
mov     eax, [hInst]         

81.
mov     [wc.clsHInstance], eax    ; содержит базовый адрес данного

;EXE- файла,
полученный с помощью

;функции
GetModuleHandle

82. call    LoadIconA, 0, IDI_APPLICATION  ; заданная по умолчанию

; пиктограмма

83. mov     [wc.clsHIcon], eax

84. call    LoadCursorA, 0 ,IDC_ARROW ; стандартная стрелка курсора

85. mov     [wc.clsHCursor], eax

86. mov   [wc.clsHbrBackground],COLOR_WINDOW +1

87. mov     dword ptr [wc.clsLpszMenuName], 0

88. mov     dword ptr [wc.clsLpszClassName], offset
szClassName

89. call    RegisterClassA, offset wc ; регистрирует класс окна,

; атрибуты которого определены ;в структуре WNDCLASS

90. call    CreateWindowExA, 0,offset
szClassName,offset szTitleName, \

; создает окно, имеющее указанный тип

; и принадлежащее указанному классу

91. WS_OVERLAPPEDWINDOW OR WS_VSCROLL,CW_USEDEFAULT, \

92. CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,0,0, \

93. [hInst], 0

94. mov     [newhwnd], eax

95. call    ShowWindow, [newhwnd], SW_SHOWNORMAL  ; показывает каким

  ;
образом должно быть

  ; показано окно

96.
call    UpdateWindow, [newhwnd]                  ; обновляет изображение

; окна, посылая

;сообщение WM_PAINT

; оконной процедуре, если

; область модификации

; окна не пуста

97.
msg_loop:

98.
call    GetMessageA, offset msg, 0, 0, 0    ;считывает сообщение

; очереди сообщений

; прикладной задачи

99..if    
eax!= 0

100. call    DispatchMessageA, offset msg ; передает сообщение

; оконной процедуре

101. call TranslateMessage, offset msg

102. jmp     msg_loop

103. ;        .endif

104. call    ExitProcess, [msg.msWPARAM]   ;

105.
;*************************************************  

106. ;Оконная процедура

107. ;**************************************************

108. WndProc proc uses ebx edi esi, hwnd:DWORD,
wmsg:DWORD,\

109. wparam:DWORD, lparam:DWORD

110. LOCAL   hDC:DWORD

111. cmp     [wmsg], WM_DESTROY   ; посылается оконной процедуре сразу

; же после закрытия окна

112.
je      wmdestroy

113.
cmp     [wmsg], WM_SIZE ; посылается оконной процедуре после того,

; как изменился размер окна

114.
je      wmsize

115.
cmp     [wmsg], WM_CREATE    ; передача оконной процедуре нового

; окна после того, как окно создано,

; но прежде чем окно стало видимым

116.
je      wmcreate

117.
cmp     [wmsg],WM_PAINT ; обеспечивают перерисовку окна, когда

; часть или вся рабочая область окна

; становится недействительной

118.
je      wmpaint

119. cmp  [wmsg],WM_VSCROLL  ;

120. je   wmscroll

121. jmp     defwndproc

122.
wmcreate:

123.
call GetDC,[hwnd]  ;дескриптор контекстного устройства

124. mov  [hDC],eax

125. call GetTextMetricsA,[hDC],offset tm

126. mov  ebx,0

127. mov  bx,[tm.tmExtLeading]    ; межстрочное расстояние

128.
add  bx,[tm.tmHeight]        ;высота (добавка к координате строки)

129. mov  [charht],ebx 

130.
call ReleaseDC,[hwnd],[hDC]  ; отказ от контекстного устройства

131. mov     eax, 0

132. jmp     finish

133. defwndproc:

134. call   
DefWindowProcA,[hwnd],[wmsg],[wparam],[lparam]

135. jmp     finish

136. wmscroll:

137.
call GetClientRect,[hwnd],offset rc    ;определение клиентской

; области окна

138.
movzx    eax,[word ptr wparam]   ;преобразование
содержимого wparam в

; двойное слово

139.
cmp  eax,SB_LINEDOWN         ; щелчок мыши на стрелке вниз,

; приводит к прокрутке на одну строку

; вниз   

140. je   sblinedown   

141. cmp  eax,SB_LINEUP      ; щелчок мыши на стрелке вверх,

; приводит к прокрутке на одну строку

; вверх

142.
je   sblineup

143.
cmp  eax,SB_ENDSCROLL        ;отпускание любого органа управления

; отпущена клавиша мыши после

; удерживания ее на полосе прокрутки

144. je   bp3

145. sblinedown:

146.
mov  [cyStep],1              ; прибавить шаг

147. jmp endvscroll_1

148. sblineup:

149. mov  [cyStep],-1

150. jmp endvscroll

151. endvscroll:

152. cmp  [cyPos],0

153. je   bp3

154. endvscroll_1: mov eax,[cyPos]    ;посылаем позицию бегунка в

; регистр

155. add  eax,[cyStep]

156. mov  [cyPos],eax

157. mov  eax,0

158.
sbb  eax,[charht]      ;расчет межстрочного расстояния

159. mov  ecx,[cyStep]

160. mov  edx,0

161. mul  ecx

162. mov  ecx,eax

163. call ScrollWindow,[hwnd],0,ecx,0,0 ; определяем дескриптор окна,

; где клиентская область должна

; быть прокручена

164.
call InvalidateRect,[hwnd],offset rc,TRUE  ;
определяем окно с

; изменившейся

; областью

165.
call     SetScrollPos,[hwnd],SB_VERT,[cyPos],TRUE   ;установление

;позиции бегунка в

; стандартной

;вертикальной

;полосе  прокрутки

166.
call UpdateWindow,[hwnd]     ;обновление изображения окна,

; если область не пуста

167. bp3: mov  eax,0

168. jmp  finish

169. wmdestroy:

170. call    PostQuitMessage,0

171. mov     eax, 0

172.
jmp     finish

173.
wmsize:       ;для перерисовки нового размера окна

;значение старшего слова означает высоту

; клиентской части

174.
mov  eax,[lparam] 

175. mov  cl,16         

176. rcr  eax,cl

177. and  eax,0ffffh

178. mov  dx,0

179. mov  cx,word ptr [charht]   

180. div  cx                   

181. movzx    ecx,ax               

182. mov  eax,101

183. sbb  eax,ecx

184. cmp  eax,0

185. ja   www1

186. mov  eax,0

187. www1:    mov  [cyMax],ecx  

188. call FindFirstFileA,offset fn,offset w32fd

189. mov  [hFindFile],eax

190. mov  esi,1

191. s_m4:   

192. call FindNextFileA,[hFindFile],offset w32fd

193. cmp  eax,0

194. je   s_m5

195. inc  esi

196. jmp  s_m4

197. s_m5:         mov  [nLast],esi  

198. mov  eax,[cyMax]

199. cmp  eax,[cyPos]

200. ja   www2         

201. mov  [cyPos],eax            

202. www2:           push    FALSE

203. push esi      

204. push L 0

205. push SB_VERT

206. push [hwnd]

207. call SetScrollRange

208. push TRUE

209. push [cyPos]

210. push SB_VERT

211. push [hwnd]

212. call SetScrollPos

213. mov     eax, 0

214. jmp     finish

215. wmpaint:

216. call    BeginPaint,[hwnd],offset  lppaint  ;получили контекст

; устройства

217.
mov     [hDC],eax

218.
mov  eax,[cyPos]        ; начальная позиция бегунка

219.
mov  ecx,[charht]  ;получили координату вывода в пикселях

220. mov  dx,0

221. mul  cx

222.
movzx    ecx,ax         

223.
mov  [cory],5      ; занесли по у -5

224.
mov  ecx,1         ; занесли по x -1

225. call FindFirstFileA,offset
fn,offset w32fd ;отыскиваем

;первый

; файл

226. mov  [hFindFile],eax

227. cmp  ecx,[cyPos]    

228. jne  qqq1

229. mov  esi,0

230.
m3:  mov  dl,w32fd.cFileName[esi] ;отрисовка первой строки

231. cmp  dl,0

232. je   m2

233. mov  buf_v[esi],dl

234. inc  esi

235. jmp  m3

236.
cmp  [cyPos],0          ; если не ноль, то переход на метку

; qqql

237.
jne  qqq1         

238. m2:     

239. mov  [num],esi

240. call TextOutA,[hDC],5,[cory],offset buf_v,[num] ;
вывод

;первого

;найденного

; файла

241.
qqq1:    mov  ebx,1

242. m6: 

243. call FindNextFileA,[hFindFile],offset w32fd ; следующий файл

244.
cmp  eax,0                                 ; проверка для

; последнего файла

245.
je   kon

246. mov  esi,0

247. mov  edi,0

248. m4:  mov  dl,w32fd.cFileName[edi]           ; получили имя

;файла

249. cmp  dl,0

250. je   m5

251. mov  buf_v[esi],dl

252. inc  edi

253. inc  esi

254. jmp  m4  

255. m5:  cmp  ebx,[cyPos]

256. jb   qqq2

257. mov  eax,[charht]      

258. add  [cory],eax

259. call TextOutA,[hDC],5,[cory],offset buf_v,esi   ;вывод

;новой строки

260.
qqq2:    inc  ebx                          ;счетчик строк

261. jmp  m6

262. kon:    call    EndPaint,[hwnd],offset lppaint  ;отдали

;контекст

; устройства и

;перешли в цикл

;обработки сообщений

263.
mov  eax,0

264. jmp  finish

265. finish:

266. ret

267. WndProc          endp

268. public WndProc

269.
end start                    ; конец программы.

Заключение.

Моя задача состояла в
создании учебной программы, демонстрирующей вывод на экран в графическом режиме
заданный каталог со скролингом. С полосами прокрутки связан единственный
недостаток, который заключается в том, что приложениями невозможно управлять
без мыши. Но так как большинство приложений Windows поддерживают работу с мышью, это вряд ли стоит
считать серьезным недостатком. Необходимо было выполнить целый ряд действий,
прежде чем приложение смогло адекватно реагировать на сообщения, посылаемые
полосами прокрутки.

Библиографический список.

1.  
Windows 98: руководство разработчика: Пер.с англ. – К.:
Издательская группа BHV, 1999. – T.1. –672 c.

2.  
Зубков С.В. Asstmbler. Для DOC, Windows
Unix. M.: ДМК, 1999. 640
с.

3.