- Timestamp:
- Dec 4, 2009 5:07:01 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/liveplot
- Property rcs:date changed from 2001/10/31 20:04:21 to 2001/11/19 19:50:05
- Property rcs:lines changed from +54 -34 to +10 -4
- Property rcs:rev changed from 1.22 to 1.23
r477 r489 196 196 set loadtime [time { 197 197 if {$expgui(tcldump) == ""} { 198 set p HSTDMP 198 199 readdata_hst $box 199 200 } else { 201 set p TCLDUMP 200 202 readdata_tcl $box 201 203 } … … 211 213 } 212 214 $box config -title "Read error" 213 tk_dialog .err "Read Error" "Read Error -- $errmsg" \ 214 error 0 OK 215 MyMessageBox -parent . -title "$p Error" \ 216 -message "There was an error running the $p program. The most common reason for this is that POWPREF & GENLES have not been run.\n\nError message: $errmsg" \ 217 -icon error -type Continue -default continue \ 218 -helplink "expguierr.html TCLDUMPError" 215 219 update 216 220 } … … 938 942 set dth [expr {$th1 - $th2}] 939 943 set xsbar [expr {cos($thbar)}] 944 # skip duplicate points 945 if {$xs2 == $xs1} continue 940 946 set ybar [expr {($xsbar - $xs1) / ($xs2 - $xs1) * ($y2 - $y1) + $y1}] 941 947 # seems to work better starting with just 2 terms
Note: See TracChangeset
for help on using the changeset viewer.