Tlink hello, hello, , import.lib, hello

Tasm hello.asm

This program must be run under Microsoft Windows.

Используя данную директиву вы можете написать программу которая будет прекрасно работать как под Dos так и под Windows.

После написания файлов hello.asm и hello.def вы должны компилировать и компоновать программу, используя такие параметры для Turbo Assembler:

После компиляции вы должны получить.OBJ файл.

После компоновки вы получите готовый к исполнению файл Windows:)

Если вы используете импорт функций API или импорт функций из других DLL, вы обязательно должны включить в компоновку библиотеку import.lib для 16-битных приложений, или библиотеку import32.lib для 32-битных приложений.

Исходный текст программы

.model large, WINDOWS PASCAL

; Подключаем файл где описаны константы (типа "MB_OK", "MB_ICONEXCLAMATION")

include windows.inc

; Говорим что будем использовать функции Windows API

extrn MESSAGEBOX:proc

extrn INITAPP:PROC

extrn INITTASK:PROC

; Сегмент данных

.data

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

freespace db 16 dup(0)

; заголовок диалогового окна

lpszTitle db 'Generic Sample Assembly Application', 0

; текст диалогового окна

lpszText db 'Hello World!', 0

; идентификатор приложения

hInstance dw 0

;Сегмент кода

.code

; точка входа в приложение (На самом деле WinMain)

start:

; Инициализируем задачу и получаем входные параметры

call INITTASK

or ax, ax

; Если инициализация прошла успешно

jnz @@OK

; Если ошибка

jmp @@Fail

@@OK:

; Сохраняем HINSTANCE

mov [hInstance], di

; Инициализируем приложение

call INITAPP, hInstance

or ax, ax

jnz @@InitOK

@@Fail:

; Если инициализация завершилась неудачно

mov ax, 4CFFh

int 21h; terminate program

@@InitOK:

; Выводим на экран диалоговое окно

call MESSAGEBOX, 0, ds offset lpszText, ds offset lpszTitle, MB_OK+MB_ICONEXCLAMATION

;завершение приложения

mov ax, 4c00h

int 21h

end start

Текст MAKEFILE:

# Make file for Turbo Assembler WAP example.

# Copyright (c) 1996 by Borland International, Inc.

# make -B Will build wap.exe

# make -B -DDEBUG Will build the debug version of wap.exe

NAME = HELLO

OBJS = $(NAME).obj

DEF = $(NAME).def

!if $d(DEBUG)

TASMDEBUG=/zi

LINKDEBUG=/v

!else

TASMDEBUG=

LINKDEBUG=

!endif

!if $d(MAKEDIR)

IMPORT=$(MAKEDIR)\..\lib\import

THEINCLUDE=/i$(MAKEDIR)\..\include

!else

IMPORT=import

THEINCLUDE=

!endif

$(NAME).EXE: $(OBJS) $(DEF)

D:\TASM\BIN\tlink /Twe $(LINKDEBUG) $(OBJS), $(NAME),, $(IMPORT), $(DEF)

.asm.obj:

D:\TASM\BIN\tasm $(TASMDEBUG) /ml $(THEINCLUDE) $&.asm

Текст файла hello.def

NAME HELLO

EXETYPE WINDOWS

CODE MOVABLE DISCARDABLE

DATA MOVABLE MULTIPLE DISCARDABLE

STACKSIZE 5120

HEAPSIZE 4096

Результат работы исходной программы

Дата добавления: 2014-01-06