.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 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) ' 可以根据您的需要返回任意数值