aview-app 1.0.2

package/aardio/lib/console/_.aardio

@@ -0,0 +1,917 @@
+import web.json; 
+import util.table;
+
+namespace console;
+
+if( _WINE ){
+	import console.wine;
+	return;
+}
+
+getWindow = ::Kernel32.api( "GetConsoleWindow", "int()"); 
+
+getOutputHandle = function(){
+	return topointer( ::Kernel32.GetStdHandle(-11/*_STD_OUTPUT_HANDLE*/) );
+}
+
+getInputHandle = function(){
+	return topointer( ::Kernel32.GetStdHandle(-10/*_STD_INPUT_HANDLE*/) );
+}
+
+getErrorHandle = function(){
+	return topointer( ::Kernel32.GetStdHandle(-12/*_STD_ERROR_HANDLE*/) );
+}
+
+modifyMode = function(h,remove=0,add=0 ){
+	if(h===null) h = getOutputHandle();
+	var mode ={INT value}
+	var _,mode = ::Kernel32.GetConsoleMode(h,mode); 
+	mode.value = ( mode.value & ~remove ) | add ;
+	if( ::Kernel32.SetConsoleMode(h,mode.value) ) return mode;
+}
+
+class INPUT_RECORD{
+	WORD eventType;
+	union event = {
+		struct keyEvent = {
+			int bKeyDown;
+			WORD wRepeatCount;
+			WORD wVirtualKeyCode;
+			WORD wVirtualScanCode;
+			union uChar = {
+				WORD unicodeChar;
+				BYTE asciiChar;
+			} ;
+			INT dwControlKeyState;
+			isShiftPressed = function(){
+				return owner.dwControlKeyState & 0x10 
+			};  
+			isScrLkOn = function(){
+				return owner.dwControlKeyState & 0x40 
+			};
+			isRightCtrlPressed = function(){
+				return owner.dwControlKeyState & 0x4 
+			};
+			isRightAltPressed = function(){
+				return owner.dwControlKeyState & 0x1 
+			};
+			isLeftCtrlPressed = function(){
+				return owner.dwControlKeyState & 0x8 
+			};
+			isLeftAltPressed = function(){
+				return owner.dwControlKeyState & 0x2 
+			};
+			isNumLkOn = function(){
+				return owner.dwControlKeyState & 0x20 
+			}; 
+			isCapsLkOn = function(){
+				return owner.dwControlKeyState & 0x80 
+			}; 
+			isEnhanced = function(){
+				return owner.dwControlKeyState & 0x100 
+			};
+		}
+		struct mouseEvent = {
+			struct dwMousePosition = {word x;word y}
+			INT dwButtonState;
+			INT dwControlKeyState;
+			INT dwEventFlags;
+		}
+		struct windowBufferSizeEvent={
+			struct dwSize = {word x;word y}
+		}
+		struct menuEvent={
+			INT dwCommandId;
+		}
+		struct focusEvent={
+			bool bSetFocus;
+		}
+	} 
+}
+	
+GetNumberOfConsoleInputEvents = ::Kernel32.api( "GetNumberOfConsoleInputEvents", "bool(pointer hIn,INT & numEvt)");
+kbHit = function(){
+	var ret,nums = GetNumberOfConsoleInputEvents(getInputHandle(),0)
+	return ret ? nums : 0;
+}
+
+peek = function(){
+	if(kbHit() ) return kbRead(false);
+}
+
+kbRead = function(wait){
+	var input,ke;
+	if(!wait){
+		input = readInput(1,0x1/*_KEY_EVENT*/);
+		if(#input){
+			return input[1].keyEvent; 
+		}
+	}
+	else {
+		while( getInputHandle() ){ 
+			sleep(100);
+			if( kbHit() ){
+				input = readInput(1,0x1/*_KEY_EVENT*/);
+				if(!#input) continue;
+				ke = input[1].keyEvent;
+				if( ke.bKeyDown) return ke;
+			};
+		}
+	} 
+}
+
+::Msvcrt := ..raw.loadDll("Msvcrt.dll",,"cdecl")
+getch = ::Msvcrt._getwch;
+	
+getche = function(){
+    var c = ::Msvcrt._getwche();
+    c =  ..string.fromUnicode(..raw.str( {WORD bytes = c },true));  
+	return c;
+}
+
+getPassword = function(mask="*"){
+	openForWrite();
+	
+	var s = {};
+	
+	while( 
+		var c;
+		c = ..string.pack( getch() );
+		c != '\r' ) {
+		..table.push(s,c);
+		writeText(mask:c);
+	}
+	
+	writeText('\n');
+	return ..string.join(s)
+}
+
+clearInputBuffer = function(){
+	::Kernel32.FlushConsoleInputBuffer(getInputHandle());
+}
+
+var moreLines = 1;
+more = function(count,cls){
+	count = count : 1;
+	moreLines = moreLines % count;
+	if(!moreLines){
+		pause(,langMore,"---------- More -----------");
+		if(cls) clearScreen();
+	}
+	moreLines++;
+};
+
+askYesNo  = function(title){
+	log( "[Y/N] " + (title : langYesNo) )
+		while(true){ 
+		if( kbHit() ){
+			var kb = kbRead();
+			if(!kb) continue;
+			if(kb.bKeyDown) continue;
+			
+			var vk = kb.wVirtualKeyCode;
+			if( vk == 'Y'#){
+				return true;
+			}
+			elseif( vk ==  'N'#){
+				return false;
+			}
+		}
+	}	
+}
+
+pause = function(close,msg,erase){ 
+	openForWrite();
+	
+	var x,y = getPos();
+	if(x) writeText( '\n' );
+	clearInputBuffer();
+	
+	msg := langPause; 
+	writeText( msg );
+	
+	var chr = kbRead(true).wVirtualKeyCode; 
+	clearInputBuffer();
+	
+	eraseLine(erase);
+	if(erase)  {
+		writeText('\n'); 
+	}
+	
+	if(close)..io.close();
+	return chr;
+}
+
+mapEventType2FieldName = {
+	[0x10/*_FOCUS_EVENT*/] = "focusEvent";
+	[0x1/*_KEY_EVENT*/] = "keyEvent";
+	[0x2/*_MOUSE_EVENT*/] = "mouseEvent";
+	[0x8/*_MENU_EVENT*/] = "menuEvent";
+	[0x4/*_WINDOW_BUFFER_SIZE_EVENT*/] = "windowBufferSizeEvent";
+}
+	
+ReadConsoleInput = Kernel32.api( "ReadConsoleInput", "bool(pointer hIn,struct& brf,INT len,INT &Reads)"); 
+readInput = function(len=1,eventType){
+	if( len < 1)return;
+	var buf = ..raw.toarray( len,"struct","array" );
+	buf.array = { INPUT_RECORD() }
+	var ok,buf,len = ReadConsoleInput( getInputHandle(),buf,len,len); 
+	
+	if( ok && len){ 
+		var ret = {}
+		for(k,input in buf.array){
+			if(input.eventType){
+				if( eventType && eventType!= input.eventType )
+					continue;
+					
+				var name = mapEventType2FieldName[input.eventType]
+				if(name){
+					..table.push(ret,{[name] = input.event[name];eventType=input.eventType;eventName = name } )
+				}
+			}
+		} 
+		return ret;
+	}
+} 
+
+_ctrlHandlerThreads = {}
+setCtrlHandlerThread = function(handle,add,thrdOwner){
+	open();
+	if( add || (add === null) ){
+		var pfunc = _ctrlHandlerThreads[handle] : ..thread.tostdcall(handle,"bool(int ctrlType)",thrdOwner);
+		::Kernel32.SetConsoleCtrlHandler(pfunc,true );
+		_ctrlHandlerThreads[handle] = pfunc;
+	
+	}
+	else{ 
+		var pfunc = _ctrlHandlerThreads[handle];
+		if(pfunc){
+			::Kernel32.SetConsoleCtrlHandler(pfunc,false );
+			_ctrlHandlerThreads[handle] = null;
+		}
+	}
+}
+..subscribe("beforeUnload",function(){
+	for(k,v in _ctrlHandlerThreads){ k();} 
+} );
+
+var init;
+open = function(utf8){
+	if( utf8!== null ) self.utf8 = true;
+	if(self.utf8!==null) ..io.utf8 = self.utf8;
+	
+	return ..thread.lock("std.console.open",function(){
+		
+		var hwnd = getWindow(); 
+		if( ( !hwnd ) || ( !::User32.IsWindowVisible(hwnd) ) ){
+			..io.open();
+			if(crtReopen) crtReopen();
+			hwnd = getWindow(); 
+		}
+		elseif(!init){
+			if( ..io.utf8 && ::Kernel32.SetCurrentConsoleFontEx ){
+				if( ::Kernel32.GetConsoleOutputCP()!=65001 ){
+					..io.open(); 
+					if(crtReopen) crtReopen();
+					hwnd = getWindow();
+					
+				}
+			}
+		}
+		
+		if( !init ){
+			modifyMode( getInputHandle(),0x10/*_ENABLE_MOUSE_INPUT*/,);
+			
+			var ansion;
+			if( _WIN10_LATER ){
+				ansion = null !== modifyMode( getOutputHandle(),,4/*ENABLE_VIRTUAL_TERMINAL_PROCESSING*/) 
+			}
+			
+			init = true;
+			if( ..win[["title"]] ){
+				setTitle(..win[["title"]]);
+			} 
+		}
+		return hwnd;   	
+	})
+}
+
+crtReopen = function(){
+	 
+	var stdin = ::Msvcrt.__iob_func(0);
+	::Msvcrt.freopen("CONIN$", "r+t", stdin);
+	::Msvcrt.freopen("CONOUT$", "w+t", stdin + 32);
+	::Msvcrt.freopen("CONOUT$", "w+t", stdin + 64);	
+	
+	..publish("afterConsoleOpen");
+}
+
+openForWrite = function(utf8){
+    if( utf8!== null ) self.utf8 = utf8;
+	if(self.utf8!==null) ..io.utf8 = self.utf8;
+	
+	showLoading(false);
+	var hwnd = open(utf8);
+	..console.setCursorVisible(true); 
+	return hwnd;
+}
+
+import thread.event;
+var eventLoading = thread.event(,true);
+var eventLoadingRunning = thread.event(,true,true);
+var loadingMessage = thread.var();
+var loadingDotColor = thread.var();
+var loadingDotChanged = thread.var();
+var loadingDots = thread.var(,{"▏";"▎";"▍";"▌";"▋";"▊";"▆";"▅";"▄";"▃";"▁";"▃";"▄";"▅";"▆";"▇";"▉";"▊";"▋";"▌";"▍";"▎"});
+
+setLoadingDots = function(dots,endDots,interval){
+	if( endDots !== null ) dots.endDots = true;
+	if( interval !== null ) dots.interval = true;
+	loadingDots.set(dots);
+	loadingDotChanged.set(true);
+}
+
+showLoading = function(msg,dotColor){
+	open();
+	
+	if(!msg) {
+		eventLoading.set()
+		eventLoadingRunning.waitOne(); 
+		return;
+	}
+	
+	loadingDotColor.set(type(dotColor)!=type.number ? 0xF : dotColor);
+	loadingMessage.set(type(msg)==type.string ? msg : "");
+	if(!eventLoadingRunning.waitOne(100)){
+		return;
+	}
+	
+	open();
+	eventLoading.reset();
+	eventLoadingRunning.reset();
+	thread.invoke( 
+		function(utf8,eventLoading,eventLoadingRunning,loadingMessage,loadingDots,loadingDotChanged,loadingDotColor){  
+			..io.utf8 = utf8;
+			
+			import console;
+			var cursorVisible = console.isCursorVisible();
+			console.setCursorVisible(false);
+			var outHandle = console.getOutputHandle();
+				
+			var written = {INT size};
+			var dots = loadingDots.get();
+			var interval = loadingDots.interval : 120;
+			var endDots = dots.endDots;
+			while(!eventLoading.wait(interval)){
+				for(i=1;#dots;1){
+					console.writeText('\r')
+					if(endDots){
+						console.writeText(loadingMessage.get())	
+						console.writeColorText(dots[i],loadingDotColor.get())
+					}
+					else {
+						console.writeColorText(dots[i],loadingDotColor.get())
+						console.writeText(loadingMessage.get())
+					}
+					
+					console.eraseToEndOfLine();
+					if( eventLoading.wait(interval) ) break;
+					if( loadingDotChanged.get() ){
+						dots = loadingDots.get();
+						interval = loadingDots.interval : 120;
+						endDots = dots.endDots;
+						loadingDotChanged.set(false);
+						break;
+					}
+				}  	
+			}
+			
+			console.eraseLine();
+			console.setCursorVisible(cursorVisible);
+			eventLoadingRunning.set();
+		},..io.utf8,eventLoading,eventLoadingRunning,loadingMessage,loadingDots,loadingDotChanged,loadingDotColor
+	)
+}
+
+fullscreen = function(){
+	var hwnd = open();
+	var s = ::User32.MapVirtualKey(0xD/*_VK_ENTER*/, 0) << 16 | 1 | 0x20000000;
+	::User32.PostMessage(hwnd,0x104, 0xD/*_VK_ENTER*/ ,s );
+	::User32.PostMessage(hwnd,0x105 ,0xD/*_VK_ENTER*/ ,s| 0xC0000000);
+}
+
+getText = function(s,len){
+	openForWrite();
+	if( s ) writeText( s );
+	return  ..io.getText(len) ;	
+}
+
+writeText = function(s,...){
+	var written = {INT size}; 
+	s = tostring(s);
+	if( (!..string.isUtf8(s)) && (!..string.isUnicode(s)) ){
+		..string.setUtf(s,1);
+	}
+	
+	s = ..string.toUnicode(s); 
+	if( ::Kernel32.WriteConsoleB( 
+		::Kernel32.GetStdHandle(-11/*_STD_OUTPUT_HANDLE*/),
+		s,#s/2,written,null) ) {
+		if(!#{...}) return written.size;
+		return writeText(...);
+	}
+	else {
+		var e,c = ..lasterr();
+		if( c == 0x8/*_ERROR_NOT_ENOUGH_MEMORY*/){
+			return ..io.print(s,...));
+		}
+	}
+}
+
+print = function(...){ 
+	openForWrite();
+	var args = {...};
+	var output = {};
+	for(i,v in ..table.eachArgs(args) ){ 
+		if(i>1)writeText('\t'); 
+		writeText(tostring(v)); 
+	}
+	writeText('\n');
+} 
+
+log = print;
+
+logPause = function(...){
+	log(...);
+	pause();
+}
+
+printf = function(s,...){
+	if( ...!== null ) s = ..string.format(s,... )
+	log( s )
+}
+
+hex = function(s){
+	print( ..string.hex(s," ") )
+}
+
+writeBack = function( s,... ){
+	if( ... !== null  ) s =  ..string.format(s,... );
+	writeText( ..string.repeat(#(..string.fromto(s,,::Kernel32.GetConsoleOutputCP())),'\b') );
+	writeText( s );
+}
+
+debug = function(x,...){
+	if( _STUDIO_INVOKED ) openForWrite();
+	stderr.write( tostring(x) ,'\t');
+	if(...===null){ stderr.write('\n');return } 
+	return debug(...);
+}
+
+class CONSOLE_SCREEN_BUFFER_INFO {
+	struct size = {word x;word y};
+	struct cursorPosition = {word x;word y}; 
+	WORD attributes;
+	struct srWindow = {word left;word top;word right;word bottom};
+	struct maximumWindowSize = {word x;word y}; 
+}
+
+clearScreen = function(){
+	var csbi = CONSOLE_SCREEN_BUFFER_INFO();
+	var hConsole = getOutputHandle(); 
+	
+	::Kernel32.GetConsoleScreenBufferInfo(hConsole,csbi)
+	var size = csbi.size.x * csbi.size.y;
+	var cCharsWritten = { INT cChars = 0}
+	::Kernel32.FillConsoleOutputCharacter(hConsole,' '#,  size,0, cCharsWritten );
+		
+	::Kernel32.GetConsoleScreenBufferInfo(hConsole,csbi);
+	::Kernel32.FillConsoleOutputAttribute(hConsole, csbi.wAttributes, size, 0, cCharsWritten);
+	::Kernel32.SetConsoleCursorPosition(hConsole, 0);
+	::Kernel32.SetConsoleTextAttribute(getOutputHandle(),15);
+}  
+
+eraseToEndOfLine = function(){
+	var x,y = getPos();
+	var width = getSize();
+	
+	if(!width) return;
+		
+	var line = ..string.toUnicode(..string.repeat(width-y," ") );
+	::Kernel32.WriteConsoleW(getOutputHandle(),line,#line/2,{INT size},null);
+	setPos(x,y);
+}
+
+eraseLine = function(...){
+	var x,y = getPos();
+	setPos(0,y);
+	eraseToEndOfLine(...);
+	if(#{...}) writeText(...);
+}
+
+getScreenBufferInfo = function(x,y){
+	var csbi = CONSOLE_SCREEN_BUFFER_INFO();
+	if( ::Kernel32.GetConsoleScreenBufferInfo(getOutputHandle(),csbi) )
+		return csbi;
+} 
+
+getCursorInfo = function(){
+	var hConsole = getOutputHandle();
+	var info = {INT size; bool  visible};
+	::Kernel32.GetConsoleCursorInfo(hConsole,info);
+	return info;
+}
+
+setCursorInfo = function(newInfo){ 
+	var hConsole = getOutputHandle();
+	var info = {INT size; bool visible};
+	::Kernel32.GetConsoleCursorInfo(hConsole,info);
+	..table.assign(info,newInfo);
+	::Kernel32.SetConsoleCursorInfo(hConsole,info); 
+}
+
+isCursorVisible = function(visible){
+	return getCursorInfo()[["visible"]];
+}
+
+setCursorVisible = function(visible){
+	setCursorInfo(visible=visible);
+}
+
+getSize = function(){
+	var csbi = CONSOLE_SCREEN_BUFFER_INFO();
+	if( ::Kernel32.GetConsoleScreenBufferInfo(getOutputHandle(),csbi) )
+		return  csbi.size.x,csbi.size.y;
+}
+
+getPos = function(){
+	open();
+	var csbi = CONSOLE_SCREEN_BUFFER_INFO();
+	if( ::Kernel32.GetConsoleScreenBufferInfo(getOutputHandle(),csbi) )
+		return csbi.cursorPosition.x,csbi.cursorPosition.y;
+}
+
+setPos = function(x,y){
+	open();
+	var x2,y2 = getPos();
+	if( x === null ) x = x2;
+	if( y === null ) y = y2;
+	return !!::Kernel32.SetConsoleCursorPosition( getOutputHandle(),::MAKELONG(x,y) )
+}
+
+getTextAttribute = function(){
+	var csbi = CONSOLE_SCREEN_BUFFER_INFO();
+	if( ::Kernel32.GetConsoleScreenBufferInfo(getOutputHandle(),csbi) ) return csbi.attributes;
+} 
+
+setTextAttribute = function(fore,back){
+	if(fore===null) fore = 0xF;
+	if( type(fore) != type.number ) error("参数必须是数值",2)
+	if( type(back) == type.number ) fore = back * 0x10 + fore;
+	return ::Kernel32.SetConsoleTextAttribute(getOutputHandle(),fore);
+} 
+
+setColor = function(fore,back){ 
+	execute("color " + ..string.format("%x%x",back:0, fore:0xF))	
+}
+
+writeColorText = function(txt,fore,back){
+	var a = getTextAttribute();
+	setTextAttribute(fore,back);
+	writeText(txt);
+	setTextAttribute(a);
+}
+
+box = function(x,y,x2,y2,clr,title){
+	openForWrite(); 
+	var csbi = CONSOLE_SCREEN_BUFFER_INFO();
+	::Kernel32.GetConsoleScreenBufferInfo(getOutputHandle(),csbi);
+	if(!x) {
+		x = ..math.floor( ( csbi.srWindow.right - csbi.srWindow.left - x2 ) / 2 );
+		x2 = x + x2;
+	}
+	if(!y) {
+		y = ..math.floor( ( csbi.srWindow.bottom - csbi.srWindow.top - y2 ) / 2 );
+		y2 = y + y2;
+	}
+	x2 = x2 + ( 2 -( ( x2 - x ) % 2 ) ) 
+	if(clr===null) return x,y,x2,y2;
+	setTextAttribute(clr);  
+	for(y=y;y2;1){
+		for(x=x;x2-1){
+			setPos(x,y);writeText(" ");
+		}
+	} 
+	
+	if( title ){
+		title = title;
+		setPos(x,y);writeText("┌")  
+		setPos(x2-2,y);writeText("┐")  
+		setPos(x,y2);writeText("└")  
+		setPos(x2-2,y2);writeText("┘")  
+		
+		for (i=x+2;x2-4;2){
+			setPos(i,y);writeText("─");
+			setPos(i,y2);writeText("─");
+		}
+	
+		for (i=y+1;y2-1){
+			setPos(x,i);writeText("│");
+			setPos(x2-2,i);writeText("│");
+		}
+	
+		setPos(x+4,y);writeText(title);
+		setPos(x+4,y+2);
+	}
+	else {
+		setPos(x+2,y+1);
+	}
+	
+	
+	return x,y,x2,y2;
+}
+
+readOutputCharacter = function(){
+	var buffer = {WORD value[1000]}
+	var ok = ::Kernel32.ReadConsoleOutputCharacterW( getOutputHandle(),buffer,1000,0,{INT charsRead})
+	return ..string.trim(buffer.value);
+}
+
+dump = function(v,...){
+	openForWrite();
+	if( type(v) == type.table ) {
+		if(..com ){
+			if(v[["_dotNetObject"]]){
+				writeText("dotNet.object:",..com.DumpTypeInfo(v[["_dotNetObject"]]))
+				
+			}
+			elseif( ..com.IsObject(v)){
+				if(...){
+					var t = ..com.GetTypeInfo(v); 
+					var tl = t ? t.GetTypeLib();
+					var e = tl ? tl.ExportEnumerations();
+					if(e && e[...]){
+						dumpTable(e[...]);
+					}
+					return;	
+				} 
+				
+				writeText( ..com.DumpTypeInfo(v) )
+			}	
+		}
+		
+		writeText( ..table.tostring(v)) 
+	}
+	else writeText( (tostring(v) ) )  
+	if(...===null ){
+		writeText('\n');
+		return;
+	}
+	writeText('\t')
+	return dump(...);
+} 
+
+dumpTable = function(t){
+	openForWrite();
+	if(type.isString(t)){
+		var s = t; t = {};
+		if(..string.isUnicode(s)){
+			for(i=1;#s/2;1){ t[i] = s[i] } 
+		}
+		else {
+			for(i=1;#s;1){ t[i] = s[i] } 
+		} 
+	}
+	writeText( ..util.table.stringify(t,"    ") ,'\n')
+}
+
+dumpFile = function(path){
+	log( ..string.load(path) );
+}
+
+setTitle = function(title){
+	open();
+	return !!::Kernel32.SetConsoleTitleW(title);
+}
+
+GetConsoleTitle = ::Kernel32.api( "GetConsoleTitleW", "INT(ustring& buf,INT size)");
+getTitle = function(){
+	var len,title = GetConsoleTitle(2000,1000);
+	return title; 
+}
+
+getNumber = function( s,len ){
+	var n;
+	while( 
+		var _;
+		n = tonumber( getText(s,len),10 );
+		n === null
+	) { 
+		s = langInvalidNumber;
+	}
+	return n;
+}
+
+getCodePage = function(){
+	return ::Kernel32.GetConsoleCP(),::Kernel32.GetConsoleOutputCP()
+}
+
+setCodePage = function(icp,ocp){
+	return ::Kernel32.SetConsoleCP(icp) && ( ocp === null || ::Kernel32.SetConsoleOutputCP(ocp) );
+}
+
+dumpJson = function(v){ 
+	log( ..web.json.stringify(v,true,false) );
+}
+
+close = ..io.close;
+stdout = ..io.stdout;
+stderr = ..io.stderr;
+stdin = ..io.stdin; 
+	
+varDump = function(...){
+	openForWrite();
+	var args = {...};
+	var b,e = ..table.range(args);
+	for(i=b;e){
+		var arg = args[i];
+		var t = type(arg);
+		print("参数位置:" ++ i);
+		print("数据类型:" ++ t);
+		if( t != type.table ){
+			print("变量值:" ++ tostring(arg),'\n');
+		}
+		else { 
+			print("变量值: {" ); 
+			
+			var logged = { _struct = 1 };
+			for k,v in ..table.eachName(arg){
+				logged[k] = true;
+				writeText('    ', k,' = ',tostring(v) ,'\n');     
+			}
+			for(i=1;#arg;1){
+				logged[i] = true; 
+				writeText('    [', i,'] = ',tostring(arg[i]) ,'\n'); 
+			}
+			for(k,v in arg){
+				if( !logged[k] ){
+					writeText('    [', tostring(k),'] = ',tostring(v) ,'\n'); 
+				} 
+			}
+				
+			print('}');
+			
+			if(#arg){
+				print("序列数组长度:",#arg);
+			}
+			if(arg[["_struct"]]){
+				try{
+					print("结构体大小:",..raw.sizeof(arg) );
+				}
+				catch(e){
+					print("结构体大小:未知(包含动态数组)");
+				}
+			}
+			print('\n');
+		}  
+	} 
+}
+
+color =  {  
+	/*intellisense(console.color)*/
+	black = 0; //黑色
+	darkBlue = 1; //暗蓝色
+	darkGreen = 2; //暗绿色
+	darkCyan = 3; //暗青色
+	darkRed = 4; //暗红色
+	darkMagenta = 5; //暗紫色
+	darkYellow = 6; //暗黄色
+	gray = 7; //灰色
+	darkGray = 8; //深灰色
+	blue = 9; //蓝色
+	green = 0xA; //绿色
+	cyan = 0xB; //青色
+	red = 0xC; //红色
+	magenta = 0xD; //紫色
+	yellow = 0xE; //黄色
+	white = 0xF //白色
+	/*end intellisense*/
+}
+
+begin
+	var lcid = ::Kernel32.GetUserDefaultLangID();
+	if( lcid==0x404/*zh-TW*/ || lcid == 0x0C04/*zh-HK*/ || lcid == 0x1404/*zh-MO*/ ){
+		langMore = "--- 請按任意鍵顯示更多 ---";
+		langPause = "請按任意鍵繼續 ... ";
+		langYesNo =  "按 Y 鍵繼續,按 N 鍵取消";
+		langInvalidNumber = "請重新輸入有效的數值: ";
+	}
+	elseif( lcid==0x804/*zh-CN*/ || lcid!==0x1004/*zh-SG*/ ){
+		langMore = "--- 请按任意键显示更多 ---";
+		langPause = "请按任意键继续 ... ";
+		langYesNo =  "按 Y 键继续,按 N 键取消";
+		langInvalidNumber = "请重新输入有效的数值: ";
+	}
+	else {
+		langMore = "--- Press any key to read more ---";
+		langPause = "Press any key to continue . . .";
+		langYesNo =  "Do you want to continue?";
+		langInvalidNumber = "Please enter a valid number.";
+	}  
+end;
+
+/**intellisense(console)
+open() = 打开控制台窗口,\n如果控制台窗口已打开,该函数不进行任何操作,\n如果参数为 true 则将 console.utf8 设为true,\n请参考 console.utf8 的说明\n\n此函数重定向 msvcrt.dll 定义的 stdin,stdout,stderr 到控制台
+utf8 = 控制台是否启用UTF-8编码,\n所有线程设置必须相同,否则会导致重新打开控制台,\n如果操作系统为英文环境,控制台启用 UTF-8 可正常显示中文,\n此值为 null（默认值） 时由 aardio 自动选择编码（WIN10 以上系统默认开启 UTF-8）,\n启用这个选项在 WIN10 以下系统可能出现显示不正常的问题,\n但有一些程序，例如 Electron 主进程输出默认需要打开此选项
+setLoadingDots(.(动画字符数组,是否显示在尾部,动画间隔毫秒数) = 指定showLoading函数使用的默认动画字符数组\n除参数@1必须指定之外，其他参数可选
+showLoading( = 显示进度动画
+showLoading(.(状态文本,动画颜色) = n所有参数都可以省略,状态文本为false关闭动画,\n调用console.open,console.log等函数都能自动关闭动画\n参数@2只能使用 console.color 的成员值
+getNumber( "请输入数值:__" ) = 读取用户输入的数值,\n如果用户输入错误的数值则显示错误提示并重新读取输入直到成功,\n可选在参数@2中指定缓冲区大小
+getText( "请输入文本:__" ) = 此函数内部调用io.getText自控制台读取用户输入,\n可选在参数@2中指定缓冲区大小\n此函数不调用io.stdin.read等标准输入函数
+writeText(__) = 直接写入控制台，\n参数支持UTF8/UTF16/ANSI字符串，\n支持1个或多个参数，但遇到null参数会停止输出后面的参数,\n注意这个函数不会自动打开控制台，\n此函数不调用io.stdout.write,io.print等标准输出函数\n并且可以支持更多的Unicode字符
+writeColorText( = 调用 console.writeText 输出指定颜色文本,\n此函数不会自动打开控制台窗口
+writeColorText(.(文本,前景色,背景色) =  参数@2、参数@3只能使用 console.color 的成员值\n背景色可以省略
+log(__) = 调用console.writeText在控制台输出信息,支持多参数\n多个参数间使用制表符分隔，并且在最后输入一个换行,\n\n参数支持UTF8/UTF16/ANSI字符串，\n二进制或非UTF8或系统ANSI编码的字符串请使用 console.hex 函数。\n\n该函数可自动打开控制台窗口,而无需事先调用io.open();\n注意console.log与console.print指向同一函数\n如果是输出调试信息,建议大家使用console.debug函数。
+logPause(__) = 调用 console.log 函数输入所有参数,\n然后调用 console.pause 函数暂停
+print("__") = 调用console.writeText在控制台输出信息,支持多参数\n多个参数间使用制表符分隔，并且在最后输入一个换行,\n参数支持UTF8/UTF16/ANSI字符串，\n该函数可自动打开控制台窗口,而无需事先调用io.open();\n注意console.log与console.print指向同一函数\n如果是输出调试信息,建议大家使用console.debug函数
+printf("%s__", ) = 自动打开控制台\n调用console.log函数输出格式化字符串,\n格式化语法与string.format相同
+hex(__) = 调用console.log以16进制输出字符串、或缓冲区的所有字节码,\n也可以使用 console.dumpTable 函数将字符串或buffer转换为字节码数组输出
+writeBack(__) = 控制台输出字符串并覆盖最后显示的等长字符\n如果有多个参数则调用string.format格式化后输出
+fullscreen() = 控制台窗口全屏切换
+modifyMode(.(输入输出句柄,移除模式,添加模式) = 设置控制台的显示模式\n参数用法参考 WINAPI SetConsoleMode\n参数@1如果省略则默认为标准输出句柄\n成功返回当前模式,失败返回null
+debug("__") = 使用标准错误输出流(io.stderr)输出，可以重定向，\n用法类似io.print,该函数在开发环境中会自动打开控制台\n发布后的程序不会自动打开控制台
+more(__/*分页大小*/) = 用于在循环语句中分页显示\n省略参数时则参数默认为1\n如果参数@2为true，则先清除控制台已显示的内容。
+askYesNo("按Y键继续,按N键取消") = 等待用户按Y或N键
+kbHit() = 检测键盘有没有输入
+peek() = 测试键盘有没有输入\n有则读取并返回keyEvent对象,否则返回空\n!console_kbevent.
+clearInputBuffer() = 刷新控制台输入缓冲区\n丢弃缓冲区的所有输入
+kbRead() = 读取用户按键返回keyEvent对象\n!console_kbevent.
+kbRead(true) = 等待用户按任意键并返回keyEvent对象(不包含释放按键事件)
+getch() = 读取输入字节码,中文字返回两个字节码\n控制台不回显字符
+getche() = 读取输入字符\n控制台回显字符
+getPassword() = 读取密码\n可选使用参数一指定控制台回显掩码,默认显示星号
+getWindow() =  返回控制台窗口句柄\n使用此函数可判断当前是否已打开控制台窗口;
+getOutputHandle() = 标准输出句柄
+getInputHandle() = 标准输入句柄
+getErrorHandle() = 错误输出句柄
+getCodePage() = 获取输入代码页,输出代码页
+setCodePage(.(输入代码页,输出代码页) = 设置代码页\n应在打开控制台后使用该函数
+readOutputCharacter() = 读取标准输出缓冲区文本
+setColor(.(前景色,背景色) = 设置控制台前景色与背景色\n参数必须使用 console.color 的成员值\n无参数恢复默认颜色
+getTextAttribute() = 获取控制台文本颜色,\n返回颜色值为 背景色 * 0x10 + 前景色
+setTextAttribute( = 设置文本前景色与背景色,\n设置整个窗口的背景色请使用 console.setColor;
+setTextAttribute(.(颜色) = 颜色值必须为 背景色 * 0x10 + 前景色,\n前景色,背景色必须使用 console.color 的成员值 
+setTextAttribute(.(前景色,背景色) = 参数必须使用 console.color 的成员值\n无参数恢复默认颜色 
+isCursorVisible() =控制台当前是否显示光标
+setCursorVisible(.(visible) = 设置控制台是否显示光标
+setCursorInfo(.(info) = 修改光标信息,\n用法请参考此函数源码
+getCursorInfo() = 返回光标信息,\n用法请参考此函数源码
+varDump(__/*变量*/) = 此函数显示一个或多个参数的类型与值
+dump( = 显示变量的值,支持多参数
+dump(.(value,->->->) = 在控制台显示普通 table,string,number 等类型的值,不显示函数等,\ntable 对象仅显示键名为字符串的值，以及数值索引自 1 开始的顺序数组
+dump(.(comObj) = 参数 @1 指定 COM 对象，且无其他参数，\n则在控制台输出调用 com.DumpTypeInfo 函数返回的类型信息。\n调用 com.tlbDoc.dump 函数可打印 COM 对象更详细的类型库信息
+dump(.(comObj,enumType) = 参数 @1 指定 COM 对象，参数 @2 指定枚举类型名，\n在控制台输出该枚举类型的所有名值对。\n\n通常枚举名值对也是 COM 常量名值对，\n可以使用列举的枚举名字（不用指定枚举类型名）\n作为 COM 对象的成员名获取枚举值
+dumpJson(__/*变量*/) = 将对像转换为格式化的 JSON 文本并输出到控制台\n对象如果包含数值索引自1开始的顺序数组成员则转换为 JSON 数组\nJSON 数组会忽略其他索引不在数组范围内的成员
+dumpTable(__/*表对象*/) = 如果参数 @1 传入字符串或 buffer，转换为字节码数组再输出。\n\n如果参数 @1 传入表参数,\n使用 ..util.table.stringify 函数格式化为文本然后输出到控制台。\n仅转换表包含的文本、数值、布尔值、嵌套表对象,\n小数精度最大为 6 位、并自动清除小数尾部多余的 0,\n如果表定义了 tostring 元方法、则转换为字符串\n忽略其他类型,忽略循环引用的表
+dumpFile(__/*文件路径*/) = 输出参数 @1 指定文件路径的文件内容
+close() = 关闭控制台
+pause( = 暂停,\n按任意键继续
+pause(.(按键后是否关闭控制台,提示) = 返回用户按键键码 
+setTitle("__") = 设置控制台标题,\n此函数会打开控制台窗口
+getTitle() = 获取控制台标题
+clearScreen() = 清屏
+eraseLine() = 清除当前行\n可选指定要在当前行输出的一个或多个参数
+eraseToEndOfLine() = 清除当前输入光标到行尾的所有字符\n注意用‘\r’虽然能回退光标到行首，但并不擦除已输出的字符
+getScreenBufferInfo() = 返回屏幕缓冲区信息
+getSize() = 返回控制台屏幕缓冲区每行可输入的字符数,\n以及可输入的字符行数
+getPos() = 返回光标坐标
+setPos(.(列,行)= 设置光标坐标
+box(.(列,行,终止列,终止行,背景色,边框标题) = 在控制台画一个色块,边框标题可省略,\n参数@1,@2省略则自动居中\n返回列,行,终止列,终止行
+stderr = 标准错误输出\n!file.
+stdin =  标准输入\n!file.
+stdout = 标准输出\n!file.
+setCtrlHandlerThread(hander,add,owner) = @.setCtrlHandlerThread( function(ctrlType){\n	__/*控制台程序退出前是否触发 @hander 参数指定的线程函数，\n@add 为 true 添加触发函数，为 false 移除，默认值为 true。\n可选用 @owner 指定线程函数的 owner 参数。\n\n使用前请先阅读多线程入门教程，了解线程函数基本规则。\n\nctrlType 为 null 表示控制台正常关闭，不可取消。\nctrlType 为 0 表示按下 Ctrl+ C。\nctrlType 为 1 表示按下 Ctrl + Break。\nctrlType 为 0 或 1 时返回 true 可阻止控制台退出\n\n在此函数内不应再使用任何控制台函数*/\n});
+end intellisense**/ 
+
+/**intellisense()
+console = 控制台扩展函数库\nWin10 以上系统控制台支持以下快捷键:\n Alt + Enter 切换全屏\nCtrl + Shift + 加号/减号 调整透明度
+afterConsoleOpen = @ if(::Kernel32.GetConsoleWindow()){\n	\n }\n ..subscribe("afterConsoleOpen",function(){\n 	__/*console 库打开控制台执行此回调*/\n} );
+!console_kbevent.bKeyDown = 按键是否释放
+!console_kbevent.wRepeatCount = 重复次数
+!console_kbevent.wVirtualKeyCode = 虚拟键码
+!console_kbevent.wVirtualScanCode = 扫描码
+!console_kbevent.uChar.unicodeChar = Unicode字节码
+!console_kbevent.uChar.asciiChar = ASCII字节码
+!console_kbevent.uChar.dwControlKeyState = 控制键状态码
+!console_kbevent.isShiftPressed = 是否按下SHIFT键
+!console_kbevent.isScrLkOn = 是否打开ScrLk键 
+!console_kbevent.isRightCtrlPressed = 是否按下右CTRL键
+!console_kbevent.isRightAltPressed = 是否按下右ALT键
+!console_kbevent.isLeftCtrlPressed = 是否按下左CTRL键
+!console_kbevent.isLeftAltPressed = 是否按下左ALT键
+!console_kbevent.isNumLkOn = 是否打开NumLk键
+!console_kbevent.isCapsLkOn = 是否打开大写
+!console_kbevent.isEnhanced = 是否扩展键
+end intellisense**/
+
+getOutPutHandle = getOutputHandle;