;***************V86
;***************V86
V86_CODE         GDT_DESC <0FFFFH,V86CODESEG,0,0fAH,0,0> 
V86_CODE_SEL     = (V86_CODE - GDT)  
V86_DATA_GDT     GDT_DESC <0FFFFH,V86_DATASEG,0,92H,0,0> 
V86_DATA_GDT_SEL = (V86_DATA_GDT - GDT)  
V86TSS         GDT_DESC <V86TSSLEN,V86TSSSEG,0,89H,0,0> ;89H=386TSS DPL=0
V86TSS_SEL     =V86TSS - GDT 
V86TSS_ASDATA  GDT_DESC <V86TSSLEN,V86TSSSEG,0,92H,0,0> ;89H=386TSS DPL=0
V86TSS_ASDATA_SEL     =V86TSS_ASDATA - GDT 
V86LDTS        GDT_DESC <V86LDTLEN,V86LDTSEG,0,82H,0,0> ;82H=LDT DPL=0
V86LDT_SEL     =V86LDTS - GDT 
;***************V86
;***************V86
GDT_INIT_COUNT  = ($ - GDT_INIT_BEGIN)/(SIZE GDT_DESC)
V86_VRAM      GDT_DESC <0FFFFH,8000H,0BH,092H,0,0>   ;92H=P ,DPL=0,TYPE=2
V86_VRAM_SEL   =  V86_VRAM - GDT  ;60h
;;;;;;;;file system
V_SFT         GDT_DESC <0FFFFH,0,0FFH,92H,0,0FFH> ;92H=P ,DPL=0,TYPE=2 ,base=FFFF0000H
V_SFT_SEL     = V_SFT - GDT
V_FILE_BUF    GDT_DESC <0FFFFH,0,0FEH,92H,0,0FFH> ;92H=P ,DPL=0,TYPE=2 ,base=FFFE0000H
V_FILE_BUF_SEL = V_FILE_BUF - GDT
;;;;;;;;file system

;***********prepare page_memory
G_PDT       GDT_DESC <0FFFH,2000H,21H,92H,0,0>;92H=P ,DPL=0,TYPE=2 ,base=2M+68k
G_PDT_SEL    = G_PDT - GDT
G_PT0       GDT_DESC <0FFFFH,3000H,21H,92H,0,0>;92H=P ,DPL=0,TYPE=2 ,base=2M+72k ;16 PAGES
G_PT0_SEL    = G_PT0 - GDT
G_MOVSEG     GDT_DESC <0FFFFH,0,20H,92H,0FFH,0> ;92H=P ,DPL=0,TYPE=2 ,base=2M
G_MOV_SEL    = G_MOVSEG - GDT                  ;LIMIT=1M

;***********next for page_memory
V_DOS_CODE  GDT_DESC <0FFFFH,0,0,9AH,0FH,0> ;9AH=exec/read ,DPL=0
V_DOS_CODE_SEL = V_DOS_CODE - GDT
G_VRAM      GDT_DESC <0FFFFH,0,0,92H,0,0C0H>   ;92H=P ,DPL=0,TYPE=2
G_VRAM_SEL   =  G_VRAM - GDT  ;60h
G_BUF         GDT_DESC <0FFFFH,0,G_BUF_BASE,92H,0,0> ;92H=P ,DPL=0,TYPE=2 ,base=4M
G_BUF_SEL     = G_BUF - GDT
V_G_PT0       GDT_DESC <0FFFFH,3000H,41H,92H,0,0C0H>
V_G_PT0_SEL    = V_G_PT0 - GDT
V_TOS_TSS     GDT_DESC <TOS_TSSLEN,1000H,40H,089H,0,0C0H> ;89H=386TSS DPL=0
V_TOS_TSS_SEL  = V_TOS_TSS - GDT
V_TOS_CODE    GDT_DESC <0FFFFH,3000H,42H,9AH,0,0C0H> ;9AH=exec/read ,DPL=0
            ;limit must be 0ffffh for returnning to real_mode
V_TOS_CODE_SEL = V_TOS_CODE - GDT
V_TOS_STACK   GDT_DESC <45056,0,0,93H,0,0>   ;96H=R/W ,DOWN
V_TOS_STACK_SEL = V_TOS_STACK - GDT
V_TOS_DATA    GDT_DESC <DATA_TOSLEN,0,0,92H,0,0> ;92H=P ,DPL=0,TYPE=2
V_TOS_DATA_SEL = V_TOS_DATA - GDT
V_USER_PsTSS     GDT_DESC <USER_PsTSSLEN,USER_PsTSSSEG,0,089H,0,0> ;9AH=exec/read ,DPL=0
V_USER_PsTSS_SEL  = V_USER_PsTSS - GDT
V_USER_PsLDTT     GDT_DESC <USER_PsLDTLEN,USER_PsLDTSEG,0,82H,0> ;82H=LDT
V_USER_PsLDT_SEL = V_USER_PsLDTT - GDT
USER_PsTSS_D     GDT_DESC <USER_PsTSSLEN,USER_PsTSSSEG,0,92H,0,0> ;9AH=exec/read ,DPL=0
USER_PsTSS_D_SEL  = USER_PsTSS_D - GDT
USER_PsLDTT_ASDATA     GDT_DESC <USER_PsLDTLEN,USER_PsLDTSEG,0,92H,0> ;82H=LDT
USER_PsLDTT_ASDATA_SEL = USER_PsLDTT_ASDATA - GDT

ps_to_tos_sel  =$

GDTLEN      = $ - GDT
GDTSEGLEN   = $
GDTSEG      ENDS

DATA_TOS    SEGMENT PARA USE16              ;全局描述符表
IDT_M       SEGMAP_DESC <>
TOS_TSS_M   SEGMAP_DESC <>
GDT_M       SEGMAP_DESC <>
GPDT_M      SEGMAP_DESC <>
GPT0_M      SEGMAP_DESC <>
TOS_CODE_M  SEGMAP_DESC <>
TOS_STACK_M SEGMAP_DESC <>
DATA_TOS_M  SEGMAP_DESC <>
USER_PSTSS_M SEGMAP_DESC <>
USER_PSLDT_M SEGMAP_DESC <>
OTHER_SEG_M DB 256 DUP(?)                  ;4*64
user_p_run  DB 'Sample of changing task : User_p process is running! $'
TEST_MSG    DB 'This is a protect_mode program! $'
TEST1_MSG   DB 'LDT of Dos program: $'
HEAD_DOS    DB 'Head of DOS program: $' 
TEST_CS     DB 'CS: $'
TEST_IP     DB 'IP: $'
COS_FLAG    DB 'C:\>',0
G_WORK      DB 512 DUP(?),0
G_BUF_SUM   DD 0
IDTSIZE     DW 272                         ;中斷表
IDTLOAD     DW 0,0
;********** for v86
V86_IDTSIZE DW 272                         ;中斷表
V86_IDTLOAD DW 0,0
V86_ESP     DW 0        
V86_10H02   DB "V86_DEMO: 10H02H(setup cursor:4 row 0 col.) & 21H09H(display this string)",24H
V86_10H09   DB "V86_DEMO: 10H09H:display :",24H
;********** for v86
;********** for FILE
COS_HEAD    DB "Welcome to Use 3G-COS Command Interface ",24H,0H
PRIBOOT     DB 512 DUP(20) ; main boot sector
DOSBOOTA    DB 1024 DUP(20) ; DOS boot sector  (A OR B:)
DOSBOOT     DB 1024 DUP(20) ; DOS boot sector  (C: AND D:...) 24*512=12288
WORKBOOT    DB 512 DUP(20),0 ; 
OPT         DW 1024 DUP(0)
FILE_INFO   DB 32 DUP(?),0
DAT         DB 112 DUP(?),0
FILE_NAME0  DB "D:\CHIS\TTT\LLL2.TXT",0,103 DUP(?),0,0  ;total is 128 bytes
CURRENT_DIR DB 81 DUP(?)
SYS_CURRENT_DIR   DB 81 DUP(?)
ROOTDIR_FS_NO DD ?
ROOTDIR_LS_NO DD ?
TTSECTOR_NO DD ?
HIDDEN_SECTOR DD ?
TTSECTOR    DB 512 DUP(20),0
TTSECTOR2   DB 512 DUP(20),0
TTSFT       DB 40 DUP(?),0
STR1        DB 1024 DUP(0)
STR2        DB 128 DUP(0)
STR3        DB 128 DUP(0)
TTDB        DB ?
TTDB1       DB ?
TTDB2       DB ?
TTDB3       DB ?
TTDBX       DB 10 DUP(?)
TTDW1       DW ?
TTDW2       DW ?
TTDW3       DW ?
TTDW4       DW ?
TTDW5       DW ?
TTDW6       DW ?
TTDW7       DW ?
TTDD1       DD ?
TTDD2       DD ?
TTDD3       DD ?
TTDD4       DD ?
CMD_WORDS   DB ",EXIT,DIR,TYPE,",0,0H
CMD_ERROR   DB "Bad Command or File Name ",0H,0H
T_DIR1      DB " Volume Serial Number is ",0H,0H
T_DIR2      DB " Directory of C:\ ",0H,0H
V_DISP_AX   DB 8 DUP(?)
;********** for FILE
DATA_TOSLEN = $
DATA_TOS    ENDS

; FAT16 MODIFIED
IDTSEG      SEGMENT PARA USE16              ;全局描述符表
IDT0        IDT_DESC 14 DUP (<>)                ;00--0D   
IDT0E       IDT_DESC <0,V_TOS_CODE_SEL,8E00H,0>
            IDT_DESC 18 DUP (<>)                ;0F,10--1F,20
                                                ;10,13,16,21 7 BYTES/ONE
IDT21       IDT_DESC <COS_DOSINT21,V_TOS_CODE_SEL,8E00H,0>
            IDT_DESC 94 DUP (<>)                ;22--7F
IDT80       IDT_DESC <COS_DOSINT10,V_TOS_CODE_SEL,8E00H,0>
            REPT 2                              ;81--82
               IDT_DESC <>
            ENDM
IDT83       IDT_DESC <COS_DOSINT13,V_TOS_CODE_SEL,8E00H,0>
            REPT 2                              ;84--85
               IDT_DESC <>
            ENDM
IDT86       IDT_DESC <COS_DOSINT16,V_TOS_CODE_SEL,8E00H,0>
            REPT 9                              ;87--8F
               IDT_DESC <>
            ENDM
IDT90       IDT_DESC <V86BEGIN,V86TSS_SEL,8500H,0>
            IDT_DESC 111 DUP (<>)                ;91--FF
IDTLEN = $
IDTSEG      ENDS
            include \tc\g\include\v86_seg.asm

;*************************************************next DOS
STACK       SEGMENT STACK     ;實模式用堆棧 
            DB 200 DUP(0)
STACK       ENDS

DATA        SEGMENT PUBLIC 'DATA'      ;各任務公用的數據段
t_string    DB 80 dup(?)
FILE_NAME   DB 80,0,80 DUP(0)
INPUT_MSG   DB 0DH,0AH,'Input file_name:$'
FILE_HANDLE DW 0
FILE_OVER   DW 0
ERR_FILE_NAME    DB 0DH,0AH,'input run file_name error$'
ERR_FILE    DB 0DH,0AH,'Open file error real_mode$'
ERR_EXEFILE DB 'Error: It is not a DOS .exe protect_mode $'
OK_MSG      DB 0DH,0AH,'Have a nice day,Bye!   $'
SAVE_GDT    DW 4 DUP(0)
SAVE_IDT    DW 4 DUP(0)
SAVE_SS     DW 0
SAVE_SP     DW 0
C_BUF_SIZE  DW 0         ;848=350H
C_BUFFER    DB 16000 DUP(?)
tos_sp      dw ?
GDT_ADDR    DW 0
            DW 0,0   ;LIMIT=DW BASE=DW,DW
USER_Ps_LDT_ADDR    DW 0
            DW 0,0   ;LIMIT=DW BASE=DW,DW
USER_P1_LDT_ADDR    DW 0
            DW 0,0   ;LIMIT=DW BASE=DW,DW
DATALEN     = $
DATA        ENDS

CODE        SEGMENT PARA USE16 ;PUBLIC 'CODE'  ;實模式代碼段

            ASSUME CS:CODE,DS:DATA,SS:STACK
MAIN        PROC FAR
START:      
            REAL_PAGE_INIT  ;in cos_def.asm 
            CALL V86_IDT_INIT  ;in V86_REAL.ASM
            ;在\tc\g\include\g_def.asm中，見程序1-1
TURN_TO_PROTECT_MODE:
            CALL GDT_INIT       ;初始化GDT表，在\tc\g\include\g_real.asm中，見程序1-2

            MOV AX,V86LDTSEG
            CALL USER_Px_LDT_INIT ;in px_ldt.asm

            cli
            TURN_TO_PROTECT_PAGE  
            ;*****進入TOS任務，在\TC\G\INCLUDE\G_DEF.ASM中，見程序1-1
REAL_MODE:  
            TO_DOS      ;回到DOS 在\TC\G\INCLUDE\G_DEF.ASM中，見程序1-1
MAIN        ENDP
            include \tc\g\include\g_real.asm
            include \tc\g\include\V86_REAL.ASM      ;見程序1-1
            include \tc\g\include\a20.asm      ;見程序1-1
            include \tc\g\include\PX_LDT.ASM      ;見程序1-1
tsrline     label byte
CODE        ENDS
END START