⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 editconfigs.tcl

📁 一个烧写FLASH的软件
💻 TCL
字号:
# converted to .tcl by html2tcl.tclset buffer ""append buffer {												<html xmlns="http://www.w3.org/TR/REC-html40"><head><title>Zylin ZY1000 JTAG debugger</title><meta charset="utf-8" content="text/html" http-equiv="Content-Type"/><link type="text/css" rel="stylesheet" href="menuweb.css"/></head>}				set console ""				set upload_filename /ram/upload			append buffer {<body style="margin:0px;"><div style="width:974px;height:85px;"><div style="float:left;position:relative;left:32px;width:478px;"><a href="/"><img src="menu_cuts/logo_top.png" style="border:0px;"/></a></div><div style="float:left;position:relative;height:26px; width:278px;left:122px;background-image:url('menu_cuts/top_right.png');"><div style="position:relative;left:15px;top:4px;" class="textlight">}append buffer [capture version]append buffer {</div></div></div><table style="padding:0px;border-collapse:collapse;"><tr><td style="width:33px;"><div style="width:20px;height:510px;">								&nbsp;							</div></td><td style="vertical-align:top;height:100%;width:140px;padding:0px;"><table style="padding:0px;border-collapse:collapse;height:100%;width:140px;"><tr style="height:59px;"><td/></tr><tr><td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;"><div style="position:relative;left:10px;top:10px;font-weight:bold;"><a href="index.tcl" style="">Target Status</a></div></td></tr><tr><td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;"><div style="position:relative;left:10px;top:10px;font-weight:bold;"><a href="preconfig.tcl" style="">Select Target Config</a></div></td></tr><tr><td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab_selected.png');background-repeat: no-repeat;"><div style="position:relative;left:10px;top:10px;font-weight:bold;"><a href="editconfigs.tcl" style="font-weight: bold;">Edit Configurations</a></div></td></tr><tr><td style="width:140px;height:38px;background-image:url('menu_cuts/v_tab.png');background-repeat: no-repeat;"><div style="position:relative;left:10px;top:10px;font-weight:bold;"><a href="reload.tcl" style="">Reload Config Scripts</a></div></td></tr><tr><td style="width:140px;height:35px;background-image:url('menu_cuts/v_1.png')"/></tr><tr><td style="width:140px;background-image:url('menu_cuts/v_2_tile.png')"/></tr><tr><td style="width:140px;height:140px;background-image:url('menu_cuts/v_3.png')"/></tr></table></td><td style="vertical-align:top;padding:0px;height:100%"><table style="padding:0px;border-collapse:collapse;height:100%;"><tr><td><table style="padding:0px;border-collapse:collapse;"><tr><td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1_selected.png');background-repeat: no-repeat;"><div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"><a href="index.tcl" style="font-weight: bold;">Config Target</a></div></td><td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;"><div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"><a href="flashinfo.tcl">Flash</a></div></td><td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;"><div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"><a href="browsemem.tcl">Memory</a></div></td><td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab1.png');background-repeat: no-repeat;"><div style="position:relative;top:7px;font-weight:bold;text-align:center;width:100px;"><a href="openocd.tcl">OpenOCD</a></div></td></tr></table></td></tr><tr><td style="height:30px;width:535px;background-image:url('menu_cuts/center_top.png');background-repeat: no-repeat;background-position:top right;" colspan="6"><div style="width:500px;background-color:#ffffff;height:100%;">								 			&nbsp;							 			</div></td></tr><tr><td style="background-color:#ffffff;text-indent:30px;height:40px;" colspan="6"><H1>Edit Target Configurations</H1></td></tr><tr style="height:100%;"><td style="background-color:#ffffff;padding-left:30px;padding-right:30px;width=535px;height:100%;" colspan="6">			<form action="editconfigs.tcl" method="post">			}				set form_edittext [formfetch form_edittext]				set form_action [formfetch form_action]				set form_filename [formfetch form_filename]				set form_selected [formfetch form_selected] 								if {[string compare $form_action "Load"]==0} {					set form_filename $form_selected				}								if {[string compare $form_action "Delete"]==0} {					capture_catch "rm /config/settings/$form_selected"				}								if {[string compare $form_action "Save"]==0} {					save_var $form_filename [from_textarea $form_edittext] 					append buffer "Wrote file $form_filename<br>"				}							set form_edittext ""								# load original or script saved on disk.				if {[string compare $form_action "Show default"]==0} {					set form_edittext [load_file "/rom/$form_selected"]					set form_filename $form_selected				} else {				    set form_edittext [load_config $form_filename]				}							set form_edittext_subst [to_textarea $form_edittext]											proc prepend { val list } {					set res ""							        foreach value $list {			        	set t $val			        	append t $value			            lappend res $t			        }			        return $res				 }												set files [prepend target/ [ls /rom/target]]				set files [lunion $files [prepend event/ [ls /config/settings/event]]]				set files [lunion $files [prepend target/ [ls /config/settings/target]]]				set files [lsort $files]								append buffer {				<table style="padding:0px;border-collapse:collapse;"><tr>					<td style="padding-top:1px;"><select name="form_selected">						}							set foundTarget 0							foreach i $files {								append buffer {							  		<option 							  		}								  		if {[string compare $form_filename $i]==0} { 											set foundTarget 1									  		append buffer {selected="selected"} 								  		}								  	append buffer {						  		value="}append buffer $iappend buffer {">}append buffer $iappend buffer {</option>								}							}							if {$foundTarget==0} {								append buffer {							  		<option selected="selected" value="">Select target config</option>								}							}						append buffer {					</select></td>					<td class="buttonspacesmall">&nbsp</td>					<td><input type="submit" value="Load" name="form_action"></td>					<td class="buttonspacesmall">&nbsp</td>					<td><input type="submit" value="Show default" name="form_action"></td>					<td class="buttonspacesmall">&nbsp</td>					<td><input type="submit" value="Delete" name="form_action"></td>				</tr></table>				<textarea  style="overflow:auto;"  rows="21" cols="65" name="form_edittext" wrap="off">}append buffer $form_edittext_substappend buffer {</textarea>				<table style="padding:0px;border-collapse:collapse;"><tr>				}					append buffer {<td class="formtext">File</td><td><input type="text" name="form_filename" } "\n"					append buffer "value=\"$form_filename\" ></td>\n"					append buffer {<td class="buttonspacesmall">&nbsp</td><td><input type="submit" value="Save" name="form_action"></td><br>} "\n"					append buffer {</tr></table>} "\n"				append buffer {			</form>						</td></tr>}							 										 	set toggle_details [formfetch toggle_details]								 	if {[string length $toggle_details]==0} {								 		set toggle_details 0								 	}								 	set show_details [load_var show_details]								 	if {[string length $show_details]==0} {								 		set show_details 0								 	}								 	if {$toggle_details==1} {								 		set show_details [expr 1-$show_details]								 		save_var show_details $show_details								 	}								 								 		if {[string length $console]!=0} {							 			append buffer {<tr style="height:100%;"><td style="height:100%;background-color:red;" colspan="6"><table style="padding:0px;border-collapse:collapse;background-color:#ffffff;width:100%" class="textgray"><td style="width:25px;">&nbsp;</td>}												 		if {$show_details==1} {												 			append buffer <												 			append buffer {td style="background-color:#dddddd;padding-left:5px;padding-right:5px;padding-top:3px;padding-bottom:3px;"}												 			append buffer >												 		} else {												 			append buffer <												 			append buffer {td style="background-image:url('menu_cuts/h_tab_free.png');width:110px;height:29px;background-repeat: no-repeat;background-position:top left;"}												 			append buffer >												 		}												 	append buffer {<a class="openocd" href="editconfigs.tcl?toggle_details=1">}															if {$show_details==1} {																append buffer "Hide details"													 			append buffer <br/>															} else {																append buffer {<div style="position:relative;top:7px;text-align:center;">}																append buffer "Show details"																append buffer {</div>}															}															append buffer {</a>}													 		if {$show_details==1} {													 			append buffer $console													 		}													 	append buffer {</td>}													 	if {$show_details!=1} {													 		append buffer {<td>&nbsp;</td>}													 	}													 append buffer {<td style="width:25px;">&nbsp;</td></table></td></tr>}									 }								append buffer {<tr><td style="height:30px;background-image:url('menu_cuts/center_bottom.png');background-repeat: no-repeat;background-position:top right;" colspan="6"><div style="width:500px;background-color:#ffffff;height:100%;">								 			&nbsp;							 			</div></td></tr></table></td><td style="width:6px;"/><td style="width:245px;height:100%"><table style="padding:0px;border-collapse:collapse;height:100%;"><tr><td style="width:103px;height:29px;background-image:url('menu_cuts/h_tab2_selected.png');background-repeat: no-repeat;"><div style="position:relative;top:7px;;font-weight:bold;text-align:center;width:100px;" class="textgray">										    Documentation										 </div></td><td width="40px">								 		&nbsp;								 	</td><td/></tr><tr><td style="height:10px;width:245px;background-image:url('menu_cuts/right_top_small.png');" colspan="3"/></tr><tr><td style="background-color:#d8d7d7;width:245px;padding-left:10px;padding-buttom:10px;line-height:17px;" colspan="3"><a target="_blank" href="http://www.zylin.com/zy1000/ZY1000_Quick_Start_Guide.pdf">Quick Start Manual</a><br/><a target="_blank" href="http://www.zylin.com/zy1000/openocd.pdf">OpenOCD Manual</a><br/><a target="_blank" href="http://www.zylin.com/zy1000_contact.html">Contact Zylin AS</a></td></tr><tr><td style="background-color:#d8d7d7;height:15px;" colspan="3"/></tr><tr><td colspan="3"><table style="padding:0px;border-collapse:collapse;"><td style="background-color:#d8d7d7;width:10px;height:1px"/><td style="background-color:#999999;width:225px; height:1px;"/><td style="background-color:#d8d7d7;width:10px;height:1px"/></table></td></tr><tr><td style="background-color:#d8d7d7;height:15px;" colspan="3"/></tr><tr style="height:100%;"><td style="height:100%;background-color:#d8d7d7;padding-left:10px;padding-right:10px;" colspan="3" class="textgray">								<p>Here you can edit predefined target configurations, restore predefined configurations to				default state and create new target configurations.<p/>				<p>Typically when creating a new target configuration, you would take an existing				configuration that resembles the most your needs and modify it for your				purposes and save it under a different name.</p>				<p><b>Load</b> - Loads a configuration file into the editor.</p>				<p><b>Show default</b> - Loads the firmware included version of the				configuration file (if any), into the editor.<br>				<b>Note</b> that the editor content is not saved.</p>				<p><b>Delete</b> - Deletes a custom created configuration file.<br>				<b>Note</b> that firmware included configuration files can not be deleted.</p>				<p><b>Save</b> - Save the edited file under the a new or the same name.</p>							</td></tr><tr><td style="height:30px;background-image:url('menu_cuts/right_bottom.png');" colspan="3">							 			&nbsp;							 		</td></tr></table></td></tr><tr><td/><td><img border="0" src="menu_cuts/logo_bottom.png"/></td></tr></table></body></html>																																														}start_chunked "html"write_chunked $bufferend_chunked

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -