excel中心扩散算法填充数据

import win.ui;
/*DSG{{*/
var winform = win.form(text="aardio form";right=599;bottom=334)
winform.add(
button={cls="button";text="开启";left=42;top=142;right=188;bottom=197;z=1};
button2={cls="button";text="停止";left=42;top=216;right=188;bottom=271;z=3};
edit={cls="edit";text="5";left=45;top=83;right=188;bottom=129;edge=1;multiline=1;z=2};
picturebox={cls="picturebox";left=214;top=11;right=579;bottom=326;image=$"\1625733038189746.jpg";z=4}
)
/*}}*/

/*
import console
console.open()
*/

winform.button.oncommand = function(id,event){
    thread.set("手动停止", false);
	win.invoke(
		function(axis1,axis2,count){
			import com.excel;
			var excel = com.excel( true )
			var book  = excel.WorkBooks.Add()
			var sheet = book.Worksheets(1)
			excel.Visible = true
			if(count<=0){
				count = 1;
			}	
			var 每行每列数据点数 = count*2+1;
			var 当前行 = count+1;
			var 当前列 = count+1;
			var 当前轴号 = axis2;
			var 当前轴总步数 = 0;
			var 当前轴剩余步数 = 0;
			var 当前方向 = 1;
			var index = 0;//模拟数据
			while(!thread.get("手动停止")){
	
				sleep(100);
				index++;//模拟数据
				sheet.Cells(当前行, 当前列).Value2 = index;
	
				if(当前行==每行每列数据点数 and 当前列==1 ){//结束运动
					break;
				}
				
				if(当前轴剩余步数<=0){
					if(当前轴号 == axis1){
						当前轴号 = axis2;
					}else {
						当前轴号 = axis1;
						当前方向 = (当前方向==1)?-1:1;
						当前轴总步数++;
					}
					当前轴剩余步数 = 当前轴总步数;
				}
				
				if(当前轴号 == axis1){
					当前列 = 当前列+当前方向;
				}else {
					当前行 = 当前行+当前方向;
				}
	
				当前轴剩余步数--;
				
			}//end while
			//保存文件为csv格式
			excel.SaveAs("/my.csv",6/*_xlCSV*/);	
		} ,"X","Y",(tonumber(winform.edit.text))
	)//end win.invoke
}

winform.button2.oncommand = function(id,event){
	thread.set("手动停止", true);
}

winform.show();
win.loopMessage();