win32api i want call some functions from kernel32.dll?

I need  help,:

 i want call some functions from  standard DLL  without ARX module...

I want call  from visual-lisp functions (like vlax-create-object...)

The standard DLL are : "kernel32.dll", "User32.dll",  "gdi32.dll",

:smileyindifferent:

Question1: Can you translate the "sourceCLisp" bellow to "visual-lisp" (without ARX interface)?

The "sourceCLisp " sourceCLisp (click here) , clickl here

:smileyembarrassed:

Question2: Can you translate the "DrawText"   to "visual-lisp" (without ARX interface)?

[source]

(defwinapi DrawText
	((hDC HDC)
	 (lpString LPCTSTR)
	 (nCount int)
	 (lpRect LPRECT)
	 (uFormat UINT))
	:return-type int
	:library-name "User32.dll"
	:entry-name "DrawTextA"
	:linkage-type :pascal)

[/source[]

:smileylol:

Original Source

1998 Roger Corman/Contents:    Corman Lisp DOCUMENTATION function.

;;;;    All rights reserved.

Thanks:

Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.Image may be NSFW.
Clik here to view.

Image may be NSFW.
Clik here to view.