Курсовая работа: Програма для анімації музичних творів

ACS db "robby.acs",0 ; Варiант агента

FORMAT1 db "Кiлькiсть дiй: %ld",0

NAME1 db "Play",0.data?

OFSTRUCT db 8 dup(?)

FullName db 260 dup(?)

BUF2 dw 500 dup(?)

TEXT1 db 1000 dup(?)

_esp dd ?

FETCHED dd ?

MAS1 db 20000 dup(?);

--------------------------------------------------------------------------------------------

code

Start:

Call CoInitialize,0 ; Initializes the COM library on the current thread

Call CoCreateInstance, offset CLSID_AgentServer, 0, 5, offset IID_IAgentEx, offset hAgentObject

test eax, eax

js STOP

call OpenFile,offset ACS,offset OFSTRUCT,OF_EXIST

cmp eax,-1

jz NOT_ACS

call MessageBoxA,0,offset FullName,offset ACS,0

Call MultiByteToWideChar,0,0,offset FullName,-1,offset BUF2,500

Call SysAllocString,offset BUF2

mov ADR1,eax

mov TYPE_AGENT,VT_BSTR NOT_ACS:

;----------------------------------------------------------------

mov edx,hAgentObject

mov edx,[edx] ; Load Agent:

call [edx+Load],hAgentObject,TYPE_AGENT,0,ADR1,0,offset IChrID,offset IReqID