Загрузка програм в ОЗП. Защищенный режим

.data
proc      TestFunc
          nop
          mov    eax,1
          mov    ecx,16
@@:       inc    eax
          loop   @b
          ret
endp
;--------------
.code
start:    xor    edx,edx
          call   TestFunc

format   pe console
include 'win32ax.inc'
entry    start
 
.data
desc    db  8 dup 0      ; под дескриптор
hndl    dd  0
szCS    db  13,10,' CS desc: %08X%08X',0
szDS    db  13,10,' DS desc: %08X%08X',0
szSS    db  13,10,' SS desc: %08X%08X',0
szFS    db  13,10,' FS desc: %08X%08X',0
szGS    db  13,10,' GS desc: %08X%08X',0
buff    db  0
 
.code
start:
        invoke  GetCurrentThread        ; хэндл потока
        mov     [hndl],eax
 
        xor     eax,eax
        mov     ax,cs                   ; чей дескриптор хотим получить
        invoke  GetThreadSelectorEntry,[hndl],eax,desc
        mov     eax,dword[desc+4]
        mov     ebx,dword[desc]
       cinvoke  printf,szCS,eax,ebx
 
        xor     eax,eax
        mov     ax,ds
        invoke  GetThreadSelectorEntry,[hndl],eax,desc
        mov     eax,dword[desc+4]
        mov     ebx,dword[desc]
       cinvoke  printf,szDS,eax,ebx
 
        xor     eax,eax
        mov     ax,ss
        invoke  GetThreadSelectorEntry,[hndl],eax,desc
        mov     eax,dword[desc+4]
        mov     ebx,dword[desc]
       cinvoke  printf,szSS,eax,ebx
 
        xor     eax,eax
        mov     ax,fs
        invoke  GetThreadSelectorEntry,[hndl],eax,desc
        mov     eax,dword[desc+4]
        mov     ebx,dword[desc]
       cinvoke  printf,szFS,eax,ebx
 
        xor     eax,eax
        mov     ax,gs
        invoke  GetThreadSelectorEntry,[hndl],eax,desc
        mov     eax,dword[desc+4]
        mov     ebx,dword[desc]
       cinvoke  printf,szGS,eax,ebx
 
       cinvoke  gets,buff
       cinvoke  exit,0
;---------------
section '.idata' import data readable
library  msvcrt,'msvcrt.dll',kernel32,'kernel32.dll'
import   msvcrt, printf,'printf',exit,'exit',gets,'gets'
include 'api\kernel32.inc'

section '.text' code readable executable ;writable
start:  mov     al,0x90     ; nop
        mov     edi,@f
        stosb
@@:     ret
 
        invoke  GetCurrentThread
        mov     [hndl],eax
;...

.data
oldGdt  dq  0
 
.code
start:  mov     ebx,oldGdt
        sgdt    fword[ebx]

push cs
push offset @F ;
push cs
push offset proc
retf
@@:
...

push cs
push offset @F ;
push ds
push offset proc
retf
@@:
...

format  PE Console 4.0
entry   start
 
include 'win32axp.inc'
 
;-- CODE SECTION -------------------------------------------------------------------------------------------------------
 
.code
 
start:
 
                cinvoke printf, <'starting...',10>
                push    cs
                push    continue1
                retf
        continue1:
                cinvoke printf, <'continue1...',10>
                push    ds
                push    continue2
                retf
        continue3:
                cinvoke printf, <'continue3...',10>
                invoke  ExitProcess, 0
 
;-- DATA SECTION -------------------------------------------------------------------------------------------------------
 
.data
 
        continue2:
                cinvoke printf, <'continue2...',10>
                push    cs
                push    continue3
                retf
 
;-- IMPORT SECTION -----------------------------------------------------------------------------------------------------
 
section '.idata' import data readable
 
library kernel32, 'kernel32.dll',\
        msvcrt, 'msvcrt.dll'
 
        import_kernel32
        all_api
 
import  msvcrt,\
        printf, 'printf'