aview-app 1.0.2

package/aardio/lib/dotNet/nuget.aardio

@@ -0,0 +1,67 @@
+//nuget 包管理器
+import zlib.httpFile;
+import web.rest.jsonLiteClient;
+namespace dotNet.nuget;
+
+http = ..web.rest.jsonLiteClient(); 
+
+service = function(srvType){
+	if(!srvType) srvType = "PackageBaseAddress/3.0.0";
+	
+	if(!serviceIndex){
+		var data,err = http.get("https://api.nuget.org/v3/index.json")
+		data = data[["resources"]]; 
+		if(!data) return;	
+		
+		serviceIndex = {};
+		for(i,v in data){
+			serviceIndex[v["@type"]] = http.api(v["@id"],"GET")
+		} 
+	}
+	
+	return serviceIndex[srvType]; 
+}
+
+getPackageIndex = function(package){
+	if(!package) error("请指定包名称");
+	var pba = service("PackageBaseAddress/3.0.0");
+	if(pba) return pba[..string.lower(package)]["index.json"]();
+}
+
+download = function(package,version,downloadDir,extraDir,ownerForm){
+	var packageId = ..string.lower(package);
+	
+	if(!version){
+		var versions = getPackageIndex(package)[["versions"]];
+		if(!versions) return;
+		version = versions[#versions]
+	}
+	
+	var url = service("PackageBaseAddress/3.0.0").getUrl();
+	url =  ..inet.url.append( url,packageId,version,packageId+"."+version+".nupkg");
+	
+	return ..zlib.httpFile.download(url,"正在下载 NuGet 包："+package,downloadDir,extraDir,ownerForm);
+}
+
+//https://learn.microsoft.com/nuget/api/search-query-service-resource
+query = function(param){
+	var sqs = service("SearchQueryService/3.5.0");
+	if( !sqs ) return;
+	
+	return sqs(param);
+}
+
+
+/**intellisense()
+dotNet.nuget = NuGet 接口操作 
+end intellisense**/
+
+/**intellisense(dotNet.nuget)
+download( = 下载 NuGet 包
+download(.(package,version,downDir,extraDir,ownerForm) = 下载 NuGet 包。\m@package 指定包名称。\n@version 指定包版本，不指定则下载最后一个版本。\n@downDir 可选参数，用于指定下载目录，默认为 /download。\n@extraDir 可选参数，用于指定解压目录，\n不指定则在下载目录根据包名自动生成解压目录。\n下载成功返回解压目录，失败返回 null
+service(__) = 返回 web.rest.jsonLiteClient 引入的 API 对象,\n参数指定 NuGet 服务名，省略参数则默认为 "PackageBaseAddress/3.0.0"
+service() = !web_rest_api.
+getPackageIndex(__) = 返回指定 Package 的版本信息。\n成功返回表的 versions 字段为版本数组。\n失败返回 null 与错误信息
+http = web.rest.jsonLiteClient 客户端。\n!web_restClient.
+query(__) = 搜索包。\n参数 @1 可选指定一个查询参数表。\n参数表支持的字段：\nhttps://learn.microsoft.com/nuget/api/search-query-service-resource
+end intellisense**/

package/aardio/lib/dotNet/ocr/_.aardio

@@ -0,0 +1,275 @@
+import dotNet; 
+import gdip.snap;
+import string.fuzzyMatching;
+import winex.mouse;
+
+namespace dotNet;
+
+//"~\codes\范例程序\2) 调用其他语言\2) dotNet\D.uwpCompiler.aardio"
+var ocrAssembly = ..dotNet.loadFile($"~\lib\dotNet\ocr\.res\ocr.dll");
+
+class ocr{
+	ctor(){
+		if(!_WIN10_LATER) error("仅支持 Windows 10 以上系统",2); 
+		if(!ocrAssembly ) error("当前系统未安装.Net Framework",2);
+
+		this.ocrEngine = ocrAssembly.new("aardio.UwpOcrEngine");
+		var languages = this.ocrEngine.AvailableRecognizerLanguages();
+	  
+		if(#languages){
+			if(..table.indexOf(languages,"zh-Hans-CN")){
+				this.language = "zh-Hans-CN";
+			}
+			else {
+				this.language = ..table.pop(languages)
+			}	
+		} 	
+		
+		this.wordSpace = null;
+	};
+	availableLanguages = function(){
+		return this.ocrEngine.AvailableRecognizerLanguages()
+	};
+	detectBuffer = function(buffer){
+		if(!this.language){
+			error("未指定识别语言",2);
+		}
+		
+		var ocrResult = this.ocrEngine.Recognize( buffer,this.language); 
+		if(ocrResult && ocrResult.LineCount()){
+			var resultBlocks = {};
+			var  resultLines  = {};
+			for(lineIndex=1;ocrResult.LineCount();1){
+				var wordRects = ocrResult.GetWordRects(lineIndex-1);
+				var rect = {
+					left = wordRects[1][1];
+					top = wordRects[1][2];
+					right = wordRects[ wordRects.Length ][3];
+					bottom = wordRects[ wordRects.Length ][4];
+				}
+				
+				if(this.wordSpace){
+					text = ..string.join(words,this.wordSpace);
+				}
+				else {
+					var words = ocrResult.GetWords(lineIndex-1);
+					for(k,v in words){
+						if(..string.find(v,"^[\a\d]+$") ){
+							words[k] = " " + v + " ";
+						} 
+					}
+					
+					text = ..string.join(words);
+					text = ..string.replace(text," +"," ");
+				}
+				
+				..table.push(resultBlocks,{
+					words = words;
+					text = text;
+					wordRects = wordRects;
+					rect = rect;
+				});
+				
+				..table.push(resultLines,text);
+			}
+			
+			return $orcResult({
+				text = ..string.join(resultLines,this.wordSpace);
+				blocks  = resultBlocks;
+			}); 
+		} 
+	};
+	detectBitmap = function(bmp){
+		var result = this.detectBuffer(bmp.saveToBuffer("*.jpg"))
+		return result;	
+	};
+	detectImagePath = function(path){
+		var bmp = ..gdip.bitmap(path);
+		if(bmp){
+			var ret = this.detectBitmap(bmp);
+			bmp.dispose();
+			return ret;
+		}
+	};
+	detectScreen = function(hwnd,x,y,cx,cy){
+		if(hwnd && ! ::User32.IsWindow(hwnd) ){error("错误的窗口句柄",2)}
+		
+		var bmp = ..gdip.snap(hwnd,x,y,cx,cy)
+		var result = this.detectBuffer(bmp.saveToBuffer("*.jpg"))
+		bmp.dispose();
+		
+		return result;	
+	};
+	detectWindow = function(hwnd,x,y,cx,cy){
+		if(hwnd && ! ::User32.IsWindow(hwnd) ){error("错误的窗口句柄",2)}
+		
+		var bmp = ..gdip.snap.print(hwnd,x,y,cx,cy)
+		var result = this.detectBuffer(bmp.saveToBuffer("*.jpg"))
+		bmp.dispose();
+		
+		return result;	
+	};
+	detectClient = function(hwnd,x,y,cx,cy){
+		if(hwnd && ! ::User32.IsWindow(hwnd) ){error("错误的窗口句柄",2)}
+		
+		var bmp = ..gdip.snap.printClient(hwnd,x,y,cx,cy)
+		var result = this.detectBuffer(bmp.saveToBuffer("*.jpg"))
+		bmp.dispose();
+		
+		if(result) result.hwnd = hwnd;
+		return result;	
+	};
+	findClient = function(hwnd,text,miniSimilar){
+		var ret = this.detectClient(hwnd);
+		if(ret) return  ret.find(text,miniSimilar);	
+	};
+	waitClient = function(hwnd,text,miniSimilar,timeout,hwndWait){
+		if(hwnd && ! ::User32.IsWindow(hwnd) ){error("错误的窗口句柄",2)}
+		
+		return ..win.wait( 
+			function(){
+				var ret = this.detectClient(hwnd);
+				if(ret){ 
+					if( ret.findPoint(text,miniSimilar:0.6) ){
+						return ret;
+					}
+				}
+			},hwndWait: hwnd,timeout);	
+	};
+	clickClient = function(hwnd,text,miniSimilar){
+		var ret = this.detectClient(hwnd);
+		if(ret) return  ret.click(text,miniSimilar);	
+	};
+	waitClickClient = function(hwnd,text,miniSimilar,timeout,hwndWait){
+		var ret = this.waitClient(hwnd,text,miniSimilar,timeout,hwndWait);
+		if(ret) return  ret.click(text,miniSimilar);	
+	};
+	close = function(){
+		this.ocrEngine = null;
+		collectgarbage("collect");
+	};
+}
+
+namespace ocr{
+	
+	class $orcResult{ 
+		ctor(result){
+			this = result;
+		}
+		find = find;
+		findRect = findRect;
+		findPoint = findPoint;
+		search =  search;
+		click = click;
+	}
+		
+	$orcResult.find = function(txt,miniSimilar,startIndex){  
+		if(type(txt)==="table"){
+			for(i=1;#txt;1){
+				var tb,index = owner.find(txt[i],miniSimilar,startIndex)
+				if(tb){
+					return tb,index;
+				}
+			}
+			
+			return; 
+		}  
+		
+		var tbs = owner.blocks;
+		if(startIndex && startIndex!=1) tbs = ..table.slice(tbs,startIndex);
+			
+		for(i=1;#tbs;1){
+			if( tbs[i].text == txt ){
+				return tbs[i];
+			} 
+		} 
+	
+		var textArray = ..table.map(tbs,lambda(v)v.text);
+		
+		var fm = ..string.fuzzyMatching(txt);
+		var txt,similar,index = fm.find(textArray,miniSimilar);
+		if(index){
+			return tbs[index],index+(startIndex:0);
+		}
+	}
+	
+	$orcResult.findRect = function(txt,miniSimilar,startIndex){
+		var tb,index = owner.find(txt,miniSimilar,startIndex);
+		if(tb){
+			return ..table.assign(::RECT(),tb.rect),index;
+		}
+	} 
+	
+	$orcResult.findPoint = function(txt,miniSimilar,startIndex){
+		var rc = owner.findRect(txt,miniSimilar,startIndex);
+		if(rc){
+			return rc.left+(rc.right-rc.left)/2,rc.top+(rc.bottom-rc.top)/2; 
+		}
+	} 
+	
+	$orcResult.click = function(txt,miniSimilar,startIndex){
+		if(!owner.hwnd) error("此函数仅适用于 detectClient 函数的识别结果",2)
+		
+		var x,y = owner.findPoint(txt,miniSimilar,startIndex);
+		if(x||y){
+			..winex.mouse.click(owner.hwnd,x,y); 
+			return true;
+		}
+	}  
+		
+	$orcResult.search = function(txt,miniSimilar){
+		return ..string.fuzzyMatching(txt).search(owner.text,miniSimilar); 
+	} 
+}
+
+/**intellisense()
+dotNet.ocr = 识别屏幕或图像上文字的本地组件，\n系统自带组件，仅支持 Windows 10
+dotNet.ocr() = 创建OCR对象\n!stdDotNetOrc.
+end intellisense**/
+
+/**intellisense(!stdDotNetOrc)
+availableLanguages() = 返回支持的语言列表,返回值为字符串数组
+language = 字符串，设置识别用到的语言
+wordSpace =  单词分隔符，\n不指定则自动设置英文或数值使用空格，中文不分隔
+close() = 关闭对象,\n关闭以后不应再使用此对象,\n默认在对象被回收时会自动关闭
+detectBuffer(.(buffer) = 识别文字并返回识别结果对象,\nbuffer指定图像文件的内存数据,\n支持jpg,png,bmp等常见格式
+detectBitmap(__) = 传入 gdip.bimap 对象并识别文字,\n返回识别结果对象
+detectScreen(.(hwnd,x,y,cx,cy) = 自屏幕截图并识别文字,\n所有参数可选,可选用 @hwnd 参数指定窗口句柄,\n可选用 @x,y@ 参数指定坐标\n可选用 @cx,@cy 指定宽度和高度,\n返回识别结果对象
+detectWindow(.(hwnd,x,y,cx,cy) = 自窗口后台截图并识别文字,\n所有参数可选,可选用 @hwnd 参数指定窗口句柄,\n可选用 @x,y@ 参数指定坐标\n可选用 @cx,@cy 指定宽度和高度,\n返回识别结果对象
+detectClient(.(hwnd,x,y,cx,cy) = 自窗口客户区后台截图并识别文字,注意截图范围越小结果越准确,\n必须用 @hwnd 参数指定窗口句柄,\n可选用 @x,y@ 参数指定坐标\n可选用 @cx,@cy 指定宽度和高度,\n返回识别结果对象
+detectImagePath(.(path) = 自图像文件识别文字,\n参数指定图像文件路径 
+detectBuffer() = !stdDotNetOrcResult.
+detectBitmap() = !stdDotNetOrcResult.
+detectScreen() = !stdDotNetOrcResult.
+detectWindow() = !stdDotNetOrcResult.
+detectClient() = !stdDotNetOrcResult.
+detectImagePath() = !stdDotNetOrcResult.
+waitClient(.(hwnd,text,miniSimilar,timeout,hwndWait) = 等待@hwnd参数指定的窗口上出现@text指定的文本,\n@miniSimilar指定最小相似度,可选参数,默认为 0.6,\n@timeout 为可选的超时参数,单位毫秒,\n可选用 @hwndWait 指定等待窗口句柄,不指定则默认值为 @hwnd,\n成功返回true
+waitClickClient(.(hwnd,text,miniSimilar,timeout,hwndWait) = 等待@hwnd参数指定的窗口,查找并点击@text指定的文本,\n@miniSimilar指定最小相似度,可选参数,默认为 0.6,\n@timeout 为可选的超时参数,单位毫秒,\n可选用 @hwndWait 指定等待窗口句柄,不指定则默认值为 @hwnd,\n成功返回true
+clickClient(.(hwnd,text,miniSimilar) = 在@hwnd参数指定的窗口上查找并点击@text指定的文本,\n@miniSimilar指定最小相似度,可选参数,默认为 0.5,\n成功返回true
+findClient(.(hwnd,text,miniSimilar) = 在@hwnd参数指定的窗口上查找@text指定的文本,\n@miniSimilar指定最小相似度,可选参数,默认为 0.5,\n成功返回true
+end intellisense**/
+		
+/**intellisense(!stdDotNetOrcResult)
+text = 识别出的全部文本
+blocks = 识别结果文本块数组
+click( = 查找文本所在的区块正中点坐标,并发送鼠标点击消息
+click(.(txt,miniSimilar,startIndex) = 查找文本所在的区块正中点坐标,并发送鼠标点击消息,\n参数 @txt 指定要查找的文本,可传入文本数组,支持模糊匹配,\n@miniSimilar 指定最小相似度,可选参数,\n完全相似为1,完全不相似为0,默认最小相似度为0.5,\n可以降低相似度没有问题,此函数会自动获取相似度最高的结果,\n可选指定起始索引,\n成功返回值@1为匹配的文本坐标,返回值@2为找到的索引
+search(.(subString,miniSimilar) = 查找识别结果是否包含@subString指定的子字符串,支持模糊匹配,\n@miniSimilar 指定最小相似度,可选参数,\n完全相似为1,完全不相似为0,默认最小相似度为0.8,\n字符串较短时建议降低相似度
+find( = 查找文本,支持模糊匹配
+find(.(txt,miniSimilar,startIndex) = 查找文本,支持模糊匹配,\n参数 @txt 指定要查找的文本,可传入包含多个查询文本的数组,\n@miniSimilar 指定最小相似度,可选参数,\n完全相似为1,完全不相似为0,默认最小相似度为0.5,\n可以降低相似度没有问题,此函数会自动获取相似度最高的结果,\n可选指定起始索引,\n成功返回值@1为匹配的文本块信息,返回值@2为找到的索引
+findRect( = 查找文本所在的区块,支持模糊匹配
+findRect(.(txt,miniSimilar,startIndex) = 查找文本所在的区块,支持模糊匹配,\n参数 @txt 指定要查找的文本,可传入包含多个查询文本的数组,\n@miniSimilar 指定最小相似度,可选参数,\n完全相似为1,完全不相似为0,默认最小相似度为0.5,\n可以降低相似度没有问题,此函数会自动获取相似度最高的结果,\n可选指定起始索引,\n成功返回值@1为匹配的::RECT对象,返回值@2为找到的索引
+findPoint( = 查找文本所在的区块正中点坐标,支持模糊匹配
+findPoint(.(txt,miniSimilar,startIndex) = 查找文本所在的区块正中点坐标,支持模糊匹配,\n参数 @txt 指定要查找的文本,可传入包含多个查询文本的数组,\n@miniSimilar 指定最小相似度,可选参数,\n完全相似为1,完全不相似为0,默认最小相似度为0.5,\n可以降低相似度没有问题,此函数会自动获取相似度最高的结果,\n可选指定起始索引,\n成功返回值@1为匹配的文本坐标,返回值@2为找到的索引
+find() = !stdDotNetOrcResultBlock.
+findRect() = !rect.
+end intellisense**/
+
+/**intellisense(!stdDotNetOrcResultBlock)
+text = 识别出的全部文本
+wordRects = 字符或单词区块数组
+word = 字符或单词数组
+rect = 识别出的文本区块
+points = 文本框四角坐标,长度为4的坐标数组,\n每个坐都是包含x,y坐标属性的对象,\n!points.
+end intellisense**/

package/aardio/lib/dotNet/ps.aardio

@@ -0,0 +1,177 @@
+//ps PowerShell组件
+import dotNet; 
+import web.json;
+
+namespace dotNet;
+
+class ps{
+	ctor(command,params,useLocalScope,...){
+		var runner,err = getRunner();
+		if( !runner ){ return null,err:"当前系统未安装.Net Framework 2.0 以上版本";}
+		
+		if(onWrite) runner.OnWrite = onWrite;
+        if(onWriteProgress) runner.OnWriteProgress = onWriteProgress;
+        if(onReadLine) runner.OnReadLine = onReadLine;
+        if(onReadLineAsSecureString) runner.OnReadLineAsSecureString = onReadLineAsSecureString;
+        
+		if(type(params)==type.string){
+			params = {params;useLocalScope;...}
+			useLocalScope = false;
+		}
+		
+		var paramNames = {};
+		var paramValues = {};
+		for k,v in ..table.eachName(params){
+			..table.push(paramNames,k);
+			..table.push(paramValues,v);
+		}
+		
+		for(i=1;#params;1){
+			..table.push(paramNames,(params[i]));
+		}
+         
+		var ret = runner.InvokeScript(command,!!useLocalScope
+			,#paramNames?paramNames:null,#paramValues?..dotNet.createArrayList(paramValues):null);//useLocalScope参数必须是布尔类型，以匹配C#函数签名
+		if(ret){
+			ret = ..string.trim(ret);
+			if(..string.match(ret,"^ERROR\:\s+")){
+				return null ,ret;
+			}
+			 
+			return ret; 
+		}
+	};
+}
+
+namespace ps {
+	
+	export = function(obj){
+		var runner = getRunner();
+		if( runner ) return runner.Export(obj);
+	}
+
+    var powerShellRunner;
+    command = function( command,params,useLocalScope,... ) {
+		var runner,err = getRunner();
+		if( !runner ){ return null,err:"当前系统未安装.Net Framework 2.0 以上版本";}
+		
+		if(onWrite) runner.OnWrite = onWrite;
+        if(onWriteProgress) runner.OnWriteProgress = onWriteProgress; //回调参数说明 https://docs.microsoft.com/en-us/dotnet/api/system.management.automation.progressrecord?view=powershellsdk-1.1.0
+        if(onReadLine) runner.OnReadLine = onReadLine;
+        if(onReadLineAsSecureString) runner.OnReadLineAsSecureString = onReadLineAsSecureString;
+            
+		if(type(params)==type.string){
+			params = {params;useLocalScope;...}
+			useLocalScope = false;
+		}
+		
+		var paramNames = {};
+		var paramValues = {};
+		for k,v in ..table.eachName(params){
+			..table.push(paramNames,k);
+			..table.push(paramValues,v);
+		}
+		
+		for(i=1;#params;1){
+			..table.push(paramNames,tostring(params[i]));
+		}
+		
+		var ret,err;
+		try{
+			ret = runner.InvokeCommand(command,false,!!useLocalScope 
+				,#paramNames?paramNames:null,#paramValues?..dotNet.createArrayList(paramValues):null);//参数必须是非空数组，以匹配C#函数签名
+	 		
+	 		if(ret) ret = ..string.trim(ret);
+	 	}
+	 	catch(e){
+	 		err = e;
+	 	}
+	 	
+		if(ret){
+			if(..string.match(ret,"^ERROR\:\s+")){
+				return null ,ret;
+			}
+			
+			return ret; 
+		}
+		
+		return null,err;
+	};
+	
+	var psJsonWeb = /*
+	if ($PSVersionTable.PSVersion.Major -lt 3){
+		Add-Type -assembly system.web.extensions
+		function ConvertTo-Json([object] $item){ 
+    		$jss=New-Object system.web.script.serialization.javascriptSerializer
+    		return $jss.Serialize($item)
+		}
+	};
+	*/
+
+	var psJsonNet = /* 
+	function ConvertTo-Json([object] $item){ 
+    	return [Newtonsoft.Json.JsonConvert]::SerializeObject($item)
+	} 
+	*/
+
+	json = function(ps,...){
+		var ret,err = ..dotNet.ps(..string.concat(..dotNet.json ? psJsonNet : psJsonWeb,ps),...);
+		if(ret && !err){
+			return ..web.json.tryParse(ret) : ret;
+		}
+		return ret,err;
+	}
+	
+	getRunner = function(){
+		if( powerShellRunner ){
+			return powerShellRunner;
+		} 
+		
+		var compile = ..dotNet.createCompiler("C#");
+		compile.Reference("System.Core")
+		compile.Reference("System.Management.Automation");
+		compile.Parameters.CompilerOptions = "/optimize";
+		
+		/* 
+		https://github.com/MicrosoftDocs/PowerShell-Docs/tree/staging/reference/docs-conceptual/developer/hosting
+		1、不需要带上体积较大的特定版本System.Management.Automation.dll，改用自动获取系统dll。
+		2、支持的 PowerShell 最低版本为 Win7 自带 PowerShell 2.0，Win10/Win11 自带 PowerShell 5.1 支持直接回调 aardio 参数对象。
+		3、支持动态添加参数等。
+		*/
+		compile.Source = { 
+			$"~\lib\dotNet\.res\Aardio.PS\Aardio.PS.DynObject.cs",
+			$"~\lib\dotNet\.res\Aardio.PS\Aardio.PS.cs"
+		};
+		
+		var assembly = compile.Compile()  
+		var err = compile.getLastError();
+	
+		if(#err){
+			return null,err;
+		}
+		
+		if(!assembly){
+			return null,"系统未安装 PowerShell"
+		}
+		
+		powerShellRunner = assembly.createInstance("Aardio.PS");
+		return powerShellRunner;	
+	}
+}
+
+/**intellisense()
+dotNet.ps(  = 支持 Windows PowerShell 2.0 以上。\nWin7 自带 PowerShell 2.0，可回调 dotNet.ps.export 导出的 aardio 参数对象。\nWin10/Win11 自带 PowerShell 5.1，已支持直接回调 aardio 参数对象。
+dotNet.ps(.(script,parameters,useLocalScope) = 执行PowerShell脚本，返回输出字符串。\n@script 参数指定PowerShell脚本或脚本路径，\n可选用@parameters参数指定一个表，包含调用参数名值对，\n@parameters参数既可以包含名值对，也可以包含仅指定参数名的数组，\n表里的参数名不需要加 $或 - 前缀，PowerShell里要加$前缀，\n参数值可以使用任何 .Net 支持的数据类型，\n如果 @parameters 是字符串，则后面可以添加任意个数字符串参数，\n@useLocalScope 为可选参数，@parameters 为字符串时无 @useLocalScope 参数\nPowerShell 脚本用 param 接收命名参数,\n用 args 接收匿名参数
+dotNet.ps.command(.(command,parameters,useLocalScope) = 执行 PowerShell 命令，\n成功返回输出字符串,失败返回null,错误信息。\n可选用@parameters参数指定一个表，包含调用参数名值对，\n@parameters参数既可以包含名值对，也可以包含仅指定参数名的数组，\n表里的参数名不需要加 $或 - 前缀，\n参数值可以使用任何 .Net 支持的数据类型，\n如果 @parameters 是字符串，则后面可以添加任意个数字符串参数，\n@useLocalScope 为可选参数，@parameters 为字符串时无 @useLocalScope 参数			
+dotNet.ps.onWrite = @.onWrite = function(str){
+	__/*PowerShell 输出文本回调此函数，\n参数 @str 为待输出的字符串*/
+}
+
+dotNet.ps.onWriteProgress = @.onWriteProgress = function(sourceId,record){
+	__/*PowerShell 进度条回调此函数，\n参数 record.Activity 为任务标题，\n参数 record.StatusDescription 为进度描述，\n参数 record.PercentComplete 为进度百分比，\nPowerShell 回调出错不会抛出异常，\n如果有需要在函数内部自行 try catch 捕获代码错误*/
+	winform.plus.text = record.StatusDescription;
+	winform.plus.progressPercentage = record.PercentComplete; 
+}
+dotNet.ps.export(__) = 将参数 @1 指定的 aardio 表对象转换为 PowerShell 参数对象\n在 PowerShell 中可使用  InvokeMember 调用成员函数，参数@1为成员函数名，\n也可以使用下标读写对象属性值。\n\nWin10/Win11 自带 PowerShell 5.1 已经直接支持回调 aardio 对象，\n如果不需要兼容旧版 PowerShell 则不需要使用此函数
+dotNet.ps.json(ps) = @.json(`ConvertTo-Json __/*执行 PowerShell 脚本，\nConvertTo-Json 兼容到 PowerShell 2.0，\n如果导入 dotNet.json 则用 dotNet.json 实现 ConvertTo-Json，\n返回文本作为 JSON 自动解析为 aardio 对象*/`)
+end intellisense**/

package/aardio/lib/dotNet/uwpCompiler.aardio

@@ -0,0 +1,61 @@
+//uwpCompiler 编译器
+import dotNet;
+import fsys;
+
+namespace dotNet;
+
+if(!_WIN10_LATER){
+	error("仅支持 Windows 10 1507 以上版本",2)
+}
+
+var appDomain = ..dotNet.appDomain();
+if( !appDomain ) error("当前系统未安装.Net Framework") 
+
+class uwpCompiler{
+	ctor( outputPath,winmdPath ){
+		
+		this = appDomain.createCompiler("C#"); 
+		this.Reference("System.Runtime.dll");
+		this.Reference("System.Runtime.WindowsRuntime.dll");	
+		this.Parameters.GenerateInMemory = false;
+		this.Parameters.OutputAssembly = ..io.fullpath(outputPath);
+		
+		var findWinMdPath = function(){
+			if(!..io.exist(winmdPath)){ 
+				var metaDir = ..io.getSpecial(0x26/*_CSIDL_PROGRAM_FILES*/,"\Windows Kits\10\UnionMetadata\")
+				if(!..io.exist(metaDir)){
+					error("请先安装 Windows 10 SDK，或指定 Windows.winmd 文件路径。 ",2)
+				}
+				
+				winmdPath = ..io.joinpath(metaDir,"Windows.winmd")
+				if(!..io.exist(winmdPath)){ 
+					var files,dirs = ..fsys.list(metaDir,"\d+");
+					if(#dirs){
+						..table.sort(dirs);
+						var dir = ..table.pop(dirs);
+						var path = ..io.joinpath(metaDir,dir,"Windows.winmd")
+					
+						if(..io.exist(path)){
+							winmdPath = path;
+						}
+					} 
+				}
+			}
+			
+			return ..io.exist(winmdPath);			
+		}
+		
+		if(!findWinMdPath()){
+			error("未找到文件 " + ..io.joinpath(metaDir,"Windows.winmd"),2)
+		}
+		else {
+			this.Reference(winmdPath)	
+		}
+	}; 
+}
+
+/**intellisense()
+dotNet.uwpCompiler( = 创建支持 UWP 接口的 C# 编译器
+dotNet.uwpCompiler(.(outputPath,winmdPath) = 创建支持 UWP 接口的 C# 编译器,\n@outputPath 参数必须指定编译后生成 DLL 文件的路径,\n可选自定义 Windows.winmd 路径，不指定则自动搜索最新版本\n生成的DLL程序集不再需要 Windows.winmd 文件
+dotNet.uwpCompiler() = !dotNetCompiler.
+end intellisense**/

package/aardio/lib/dotNet/v2.aardio

@@ -0,0 +1,19 @@
+//v2 运行时
+import dotNet.clr;
+var clr = dotNet.clr("v2.0");
+
+if(clr){
+	clr.createAppDomain();//先创建默认单例应用程序域，避免默认使用 4.x 运行时。
+	import dotNet;
+}
+
+class dotNet.v2{
+	ctor(){ return !!clr;}; 
+}
+
+namespace dotNet.v2;
+
+/**intellisense()
+dotNet.v2 = 导入此库以替代导入 dotNet，则默认加载 .Net 2.0 运行时\n这个库没有自动安装 .Net 运行时的作用
+dotNet.v2() = 加载 .Net 2.0 运行时成功返回 true，\n否则返回 false
+end intellisense**/

package/aardio/lib/dotNet/v4.aardio

@@ -0,0 +1,57 @@
+//v4 运行时
+import dotNet.version;
+
+class dotNet.v4{
+	ctor(){ 
+		var fw = ..dotNet.version.getFrameworks("^v4!\D"); 
+		if( ..table.next(fw) ){
+			import ..dotNet;
+			return true;
+		}
+		
+		return false;
+	}; 
+}
+
+if(!dotNet.v4()){
+    import inet.installer;
+    
+    //https://docs.microsoft.com/zh-cn/dotnet/framework/get-started/system-requirements
+    if(_WIN7_LATER){ //WIN7 SP1 
+    	if(!inet.installer(" .NET Framework 4.8"
+        	,"https://go.microsoft.com/fwlink/?linkid=2088631"
+        	,"/passive /norestart"
+    	)) {
+    		
+    	}   
+    }
+    else{
+    	var dll = ..raw.loadDll("msi.dll");
+		var v = {
+  			INT cbSize = 20;
+  			INT major;
+  			INT minor;
+  			INT build;
+  			INT platformId;
+		}
+		dll.DllGetVersion(v);
+		
+		if(v.major<3 || (v.major==3 && v.minor<1) ){
+			error("系统至少要安装 Windows Installer 3.1 或以上版本",2)
+		}
+
+    	if(!inet.installer(" .NET Framework 4.0"
+        	,"http://download.microsoft.com/download/5/6/2/562A10F9-C9F4-4313-A044-9C94E0A8FAC8/dotNetFx40_Client_x86_x64.exe"
+        	,"/passive /norestart"
+    	)) {
+    		return;
+    	}
+    	
+    	dotNet.v4(); 
+    }
+}
+
+/**intellisense()
+dotNet.v4 = 导入此库，如果 .Net v4.x 未安装则自动安装。\n如果 .Net 4.x 已安装，则自动导入 dotNet 库。\n导入其他 dotNet 库前导入此库才能修改默认运行时版本为 4.0。\n注意 .NET 3.5的运行时是 v2.0，.Net 4.5 的运行时是 v4.0，\nWin7 自带 .NET2.0 运行时，Win10 自带 .NET4.0 运行时。\n获取系统已安装 .Net 版本信息请使用标准库 dotNet.version
+dotNet.v4() = 如果已成功安装 .Net 4.x 则返回 true
+end intellisense**/