.子程序 _啟動子程序, 整數型, , 本子程序在程序啟動后最先執行

.局部變量 input, CHAR_INFO, , "11"

.局部變量 size, 整數型

.局部變量 csbi, CONSOLE_SCREEN_BUFFER_INFO

.局部變量 region, SMALL_RECT

.局部變量 hstdout, 整數型

.局部變量 writestart

input [1].Attributes ＝ 位或 (#FOREGROUND_RED, #FOREGROUND_INTENSITY)

input [1].Char ＝ 取代碼 (“h”, )  ' h';

input [2].Attributes ＝ 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

input [2].Char ＝ 取代碼 (“e”, )  ' 'e';

input [3].Attributes ＝ 位或 (#FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

input [3].Char ＝ 取代碼 (“l”, )  ' l';

input [4].Attributes ＝ 位或 (#FOREGROUND_RED, #FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

input [4].Char ＝ 取代碼 (“l”, )  ' l';

input [5].Attributes ＝ 位或 (#FOREGROUND_GREEN, #FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

input [5].Char ＝ 取代碼 (“o”, )  ' o';

input [6].Attributes ＝ 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

input [6].Char ＝ 取代碼 (“,”, )

input [7].Attributes ＝ 位或 (#FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

input [7].Char ＝ 取代碼 (“w”, )

input [8].Attributes ＝ 位或 (#FOREGROUND_RED, #FOREGROUND_INTENSITY)

input [8].Char ＝ 取代碼 (“o”, )

input [9].Attributes ＝ 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

input [9].Char ＝ 取代碼 (“r”, )

input [10].Attributes ＝ 位或 (#FOREGROUND_BLUE, #FOREGROUND_INTENSITY)

input [10].Char ＝ 取代碼 (“l”, )

input [11].Attributes ＝ 位或 (#FOREGROUND_GREEN, #FOREGROUND_INTENSITY)

input [11].Char ＝ 取代碼 (“d”, )

size ＝ 位或 (65536, 11, 1)

hstdout ＝ GetStdHandle (#STD_OUTPUT_HANDLE)

GetConsoleScreenBufferInfo (hstdout, csbi)

' //要寫入的字符緩沖區相對于控制臺緩沖區的位置

region.Left ＝ (csbi.srWindow.Right ＋ csbi.srWindow.Left － 11) ÷ 2

region.Top ＝ (csbi.srWindow.Top ＋ csbi.srWindow.Bottom) ÷ 2

region.Right ＝ region.Left ＋ 11

region.Bottom ＝ region.Top ＋ 1

WriteConsoleOutput (hstdout, input, size, writestart, region)

SetConsoleTitle (“你好,世界!”)

標準輸入 ()

返回 (0)  ' 可以根據您的需要返回任意數值