Lines Matching refs:endl

86         if (verbose) outf << "% " << d_argv[i] << endl;  in derivedConstructor()
241 outf << "#!/bin/sh" << endl in canvasCreate()
242 << "# restart trick \\" << endl in canvasCreate()
243 << "exec wish \"$0\" \"$@\"" << endl in canvasCreate()
244 << "if {![info exists Global(CurrentCanvas)]} {" << endl in canvasCreate()
245 << " proc originObject { name } {" << endl in canvasCreate()
246 << " global Global" << endl in canvasCreate()
247 << " set bb [$Global(CurrentCanvas) bbox $name]" << endl in canvasCreate()
248 << " set x [lindex $bb 0]" << endl in canvasCreate()
249 << " set y [lindex $bb 1]" << endl in canvasCreate()
250 << " if {$x > 0} {" << endl in canvasCreate()
251 << " set nx -$x" << endl in canvasCreate()
252 << " } else {" << endl in canvasCreate()
253 << " set nx [expr abs($x)]" << endl in canvasCreate()
254 << " }" << endl in canvasCreate()
255 << " if {$y > 0} {" << endl in canvasCreate()
256 << " set ny -$y" << endl in canvasCreate()
257 << " } else {" << endl in canvasCreate()
258 << " set ny [expr abs($y)]" << endl in canvasCreate()
259 << " }" << endl in canvasCreate()
260 << " $Global(CurrentCanvas) move $name $nx $ny" << endl in canvasCreate()
261 << " }" << endl in canvasCreate()
262 << " proc scaleObject {name ratio width height} {" << endl in canvasCreate()
263 << " global Global" << endl in canvasCreate()
264 << " set bb [eval $Global(CurrentCanvas) bbox $name]" << endl in canvasCreate()
265 << " if {\"$bb\" != \"\"} {" << endl in canvasCreate()
266 << " set x [lindex $bb 2]" << endl in canvasCreate()
267 << " set y [lindex $bb 3]" << endl in canvasCreate()
268 << " if {$ratio == \"variable\"} {" << endl in canvasCreate()
269 << " set scalex [expr ($width + 0.0) / $x]" << endl in canvasCreate()
270 << " set scaley [expr ($height + 0.0) / $y]" << endl in canvasCreate()
271 << " if {$scalex > $scaley} {" << endl in canvasCreate()
272 << " set scale $scaley" << endl in canvasCreate()
273 << " } else {" << endl in canvasCreate()
274 << " set scale $scalex" << endl in canvasCreate()
275 << " }" << endl in canvasCreate()
276 << " } elseif {$ratio != \"\"} {" << endl in canvasCreate()
277 << " set scalex $ratio" << endl in canvasCreate()
278 << " set scaley $ratio" << endl in canvasCreate()
279 << " set scale $ratio" << endl in canvasCreate()
280 << " } else {" << endl in canvasCreate()
281 << " set scalex [expr ($width + 0.0) / $x]" << endl in canvasCreate()
282 << " set scaley [expr ($height + 0.0) / $y]" << endl in canvasCreate()
283 << " if {$scalex > $scaley} {" << endl in canvasCreate()
284 << " set scalex $scaley" << endl in canvasCreate()
285 << " set scale $scaley" << endl in canvasCreate()
286 << " } else {" << endl in canvasCreate()
287 << " set scaley $scalex" << endl in canvasCreate()
288 << " set scale $scalex" << endl in canvasCreate()
289 << " }" << endl in canvasCreate()
290 << " }" << endl in canvasCreate()
291 << " $Global(CurrentCanvas) scale $name 0 0 $scalex $scaley" << endl in canvasCreate()
292 << " foreach i [$Global(CurrentCanvas) find withtag $name] {" << endl in canvasCreate()
293 << " set type [$Global(CurrentCanvas) type $i]" << endl in canvasCreate()
294 << " if {\"$type\" == \"text\"} {" << endl in canvasCreate()
295 << " if {$Global(FontScale)} {" << endl in canvasCreate()
296 << " set fn [$Global(CurrentCanvas) itemcget $i -font]" << endl in canvasCreate()
297 << " regexp \\" << endl in canvasCreate()
298 << " {([-][^-]*-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-)([^-]*)(-.*)}\\" << endl in canvasCreate()
299 << " $fn dummy d1 size d2;" << endl in canvasCreate()
300 << " if {\"$dummy\" != \"\"} {" << endl in canvasCreate()
301 << " set nsize [expr round($size * $scale)]" << endl in canvasCreate()
302 << " if {$nsize < 20} {" << endl in canvasCreate()
303 << " set nsize 20" << endl in canvasCreate()
304 << " }" << endl in canvasCreate()
305 << " $Global(CurrentCanvas) itemconfigure $i \\" << endl in canvasCreate()
306 << " -font ${d1}${nsize}${d2}" << endl in canvasCreate()
307 << " set fnn [$Global(CurrentCanvas) itemcget $i -font]" << endl in canvasCreate()
308 << " regexp \\" << endl in canvasCreate()
309 << " {([-][^-]*-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-[^-]*-)([^-]*)(-.*)}\\" << endl in canvasCreate()
310 << " $fnn dummy d1 nsize d2;" << endl in canvasCreate()
311 << " if { ($scale < 1 && $nsize < $size ) || \\" << endl in canvasCreate()
312 << " ($scale > 1 && $nsize > $size) } {" << endl in canvasCreate()
313 << " $Global(CurrentCanvas) itemconfigure $i \\" << endl in canvasCreate()
314 << " -width [expr [$Global(CurrentCanvas) itemcget $i \\" << endl in canvasCreate()
315 << " -width] * $scale]" << endl in canvasCreate()
316 << " } else {" << endl in canvasCreate()
317 << " $Global(CurrentCanvas) itemconfigure $i \\" << endl in canvasCreate()
318 << " -font $fn" << endl in canvasCreate()
319 << " }" << endl in canvasCreate()
320 << " }" << endl in canvasCreate()
321 << " }" << endl in canvasCreate()
322 << " } else {" << endl in canvasCreate()
323 << " catch {$Global(CurrentCanvas) itemconfigure $i \\" << endl in canvasCreate()
324 << " -width [expr [$Global(CurrentCanvas) itemcget $i -width] \\" << endl in canvasCreate()
325 << " * $scale]}" << endl in canvasCreate()
326 << " }" << endl in canvasCreate()
327 << " }" << endl in canvasCreate()
328 << " return $scale" << endl in canvasCreate()
329 << " }" << endl in canvasCreate()
330 << " return 1.0" << endl in canvasCreate()
331 << " }" << endl in canvasCreate()
332 << " proc nextPage {} {" << endl in canvasCreate()
333 << " global Global" << endl in canvasCreate()
334 << " set Global(CurrentPageId) [expr $Global(CurrentPageId) + 1]" << endl in canvasCreate()
335 << " if {![winfo exists .can.c$Global(CurrentPageId)]} {" << endl in canvasCreate()
336 << " if {$Global(Circulate)} {" << endl in canvasCreate()
337 << " set Global(CurrentPageId) 1 " << endl in canvasCreate()
338 << " } else {" << endl in canvasCreate()
339 << " set Global(CurrentPageId) [expr $Global(CurrentPageId) - 1]" << endl in canvasCreate()
340 << " }" << endl in canvasCreate()
341 << " }" << endl in canvasCreate()
342 << " newCanvas .can c$Global(CurrentPageId)" << endl in canvasCreate()
343 << " update idletasks" << endl in canvasCreate()
344 << " }" << endl in canvasCreate()
345 << " proc prevPage {} {" << endl in canvasCreate()
346 << " global Global" << endl in canvasCreate()
347 << " " << endl in canvasCreate()
348 << " if {$Global(CurrentPageId) > 1} {" << endl in canvasCreate()
349 << " set Global(CurrentPageId) [expr $Global(CurrentPageId) - 1]" << endl in canvasCreate()
350 << " newCanvas .can c$Global(CurrentPageId)" << endl in canvasCreate()
351 << " update idletasks" << endl in canvasCreate()
352 << " }" << endl in canvasCreate()
353 << " }" << endl in canvasCreate()
354 << " proc newCanvas { cf name } {" << endl in canvasCreate()
355 << " global Global" << endl in canvasCreate()
356 << " if {[winfo exists $Global(CurrentCanvas)]} {" << endl in canvasCreate()
357 << " pack forget $Global(CurrentCanvas)" << endl in canvasCreate()
358 << " }" << endl in canvasCreate()
359 << " .can.ezoom configure -textvariable Global(ViewScale_$Global(CurrentPageId))" << endl in canvasCreate()
360 …ckScale) $Global(ViewScale_$Global(CurrentPageId));newCanvas .can c$Global(CurrentPageId)}" << endl in canvasCreate()
361 << " set Global(CurrentCanvas) $cf.$name" << endl in canvasCreate()
362 << " if {[winfo exists $Global(CurrentCanvas)]} {" << endl in canvasCreate()
363 << " pack $Global(CurrentCanvas) -in $cf.top -side left -fill both \\" << endl in canvasCreate()
364 << " -expand true" << endl in canvasCreate()
365 << " update idletasks" << endl in canvasCreate()
366 << " if {$Global(Fit) && !$Global(LockZoom)} {" << endl in canvasCreate()
367 << " set newzoom [scaleObject all \"\" \\" << endl in canvasCreate()
368 << " [winfo width $Global(CurrentCanvas)] \\" << endl in canvasCreate()
369 << " [winfo height $Global(CurrentCanvas)]]" << endl in canvasCreate()
370 << " set Global(ViewScale_$Global(CurrentPageId)) \\" << endl in canvasCreate()
371 << " [expr double($newzoom) * \\" << endl in canvasCreate()
372 << " $Global(LastScale_$Global(CurrentPageId))]" << endl in canvasCreate()
373 << " } else {" << endl in canvasCreate()
374 << " if {$Global(LockZoom)} {" << endl in canvasCreate()
375 << " set Global(ViewScale_$Global(CurrentPageId)) \\" << endl in canvasCreate()
376 << " $Global(LockScale)" << endl in canvasCreate()
377 << " }" << endl in canvasCreate()
378 << " scaleObject all \\" << endl in canvasCreate()
379 << " [expr double($Global(ViewScale_$Global(CurrentPageId))) / \\" << endl in canvasCreate()
380 << " double($Global(LastScale_$Global(CurrentPageId)))] {} {}" << endl in canvasCreate()
381 << " }" << endl in canvasCreate()
382 << " set Global(LastScale_$Global(CurrentPageId)) \\" << endl in canvasCreate()
383 << " $Global(ViewScale_$Global(CurrentPageId))" << endl in canvasCreate()
384 << " } else {" << endl in canvasCreate()
385 << " set Global(LastScale_$Global(CurrentPageId)) 100.0" << endl in canvasCreate()
386 << " set Global(ViewScale_$Global(CurrentPageId)) 100.0" << endl in canvasCreate()
387 << " if {$Global(LockZoom)} {" << endl in canvasCreate()
388 << " set Global(ViewScale_$Global(CurrentPageId)) \\" << endl in canvasCreate()
389 << " $Global(LockScale)" << endl in canvasCreate()
390 << " }" << endl in canvasCreate()
391 << " canvas $Global(CurrentCanvas) -bg $Global(SlideBG) \\" << endl in canvasCreate()
392 << " -scrollregion \"0i 0i 50i 50i\" \\" << endl in canvasCreate()
393 << " -xscrollcommand \"$cf.scrollx set\" \\" << endl in canvasCreate()
394 << " -yscrollcommand \"$cf.scrolly set\"" << endl in canvasCreate()
395 << " bind $Global(CurrentCanvas) <2> {%W scan mark %x %y}" << endl in canvasCreate()
396 << " bind $Global(CurrentCanvas) <B2-Motion> {%W scan dragto %x %y}" << endl in canvasCreate()
397 << " bind . <Key-Next> {nextPage}" << endl in canvasCreate()
398 << " bind . <Key-Prior> {prevPage}" << endl in canvasCreate()
399 << " pack $Global(CurrentCanvas) -in $cf.top -side left -fill both \\" << endl in canvasCreate()
400 << " -expand true" << endl in canvasCreate()
401 << " }" << endl in canvasCreate()
402 << " }" << endl in canvasCreate()
403 << " set Global(ThisFile) \"Plugin\"" << endl in canvasCreate()
404 << " catch {set Global(ThisFile) \"$argv0\"}" << endl in canvasCreate()
405 << " set Global(FontScale) 1" << endl in canvasCreate()
406 << " set Global(Circulate) 0" << endl in canvasCreate()
407 << " set Global(Fit) 0" << endl in canvasCreate()
408 << " set Global(PointsInch) [winfo fpixels . 1i]" << endl in canvasCreate()
409 << " if {[info exists embed_args]} {" << endl in canvasCreate()
410 << " set Global(Plugin) 1" << endl in canvasCreate()
411 << " } else {" << endl in canvasCreate()
412 << " set Global(Plugin) 0" << endl in canvasCreate()
413 << " }" << endl in canvasCreate()
414 << " frame .can" << endl in canvasCreate()
415 << " frame .can.top" << endl in canvasCreate()
416 << " frame .can.bottom" << endl in canvasCreate()
417 << " frame .can.buttons" << endl in canvasCreate()
418 << " button .can.origin -text Origin -command \\" << endl in canvasCreate()
419 << " {originObject all;newCanvas .can c$Global(CurrentPageId)}" << endl in canvasCreate()
420 << " checkbutton .can.lzoom -text \"Lock Zoom\" -variable Global(LockZoom)" << endl in canvasCreate()
421 << " entry .can.ezoom -width 5 -bg #FF00FF00FF00" << endl in canvasCreate()
422 ….can.fit -text Fit -variable Global(Fit) -command {newCanvas .can c$Global(CurrentPageId)}" << endl in canvasCreate()
423 << " checkbutton .can.circ -text Circulate -variable Global(Circulate)" << endl in canvasCreate()
424 << " button .can.next -text Next -command {nextPage}" << endl in canvasCreate()
425 << " button .can.prev -text Prev -command {prevPage}" << endl in canvasCreate()
426 << " button .can.dismiss -text Dismiss -command \"exit\"" << endl in canvasCreate()
427 << " scrollbar .can.scrolly -bd 2 -width 15 \\" << endl in canvasCreate()
428 << " -command {$Global(CurrentCanvas) yview}" << endl in canvasCreate()
429 << " scrollbar .can.scrollx -orient h -bd 2 -width 15 \\" << endl in canvasCreate()
430 << " -command {$Global(CurrentCanvas) xview}" << endl in canvasCreate()
431 << " frame .can.corner -height 15 -width 15 -bd 2" << endl in canvasCreate()
432 << " pack .can.scrolly -in .can.top -anchor se -side right -fill y" << endl in canvasCreate()
433 << " pack .can.scrollx -in .can.bottom -anchor se -side left -expand true -fill x" << endl in canvasCreate()
434 << " pack .can.corner -in .can.bottom -anchor ne -in .can.bottom \\" << endl in canvasCreate()
435 << " -side right -fill both" << endl in canvasCreate()
436 …ack .can.prev .can.next .can.origin .can.ezoom .can.lzoom .can.fit .can.circ -side left \\" << endl in canvasCreate()
437 << " -in .can.buttons" << endl in canvasCreate()
438 << " pack .can.top -side top -in .can -expand true -fill both" << endl in canvasCreate()
439 << " pack .can.bottom -side top -in .can -anchor sw -fill x" << endl in canvasCreate()
440 << " pack .can.buttons -side top -in .can -anchor sw -fill x" << endl in canvasCreate()
441 << " pack .can -fill both -expand true" << endl in canvasCreate()
442 << " bind .can.ezoom <Key-Return> {" << endl in canvasCreate()
443 << " newCanvas .can c$Global(CurrentPageId)" << endl in canvasCreate()
444 << " }" << endl in canvasCreate()
445 << "}" << endl in canvasCreate()
446 << "if {[info exists Global(EmbedPage)]} {" << endl in canvasCreate()
447 << " if {!$Global(EmbedPage)} {" << endl in canvasCreate()
448 << " set Global(CurrentPageId) 0" << endl in canvasCreate()
449 << " set Global(CurrentCanvas) \"\"" << endl in canvasCreate()
450 << " } elseif {[info exists Global(CurrentPageId)]} {" << endl in canvasCreate()
451 << " set Global(CurrentPageId) [expr $Global(CurrentPageId) - 1]" << endl in canvasCreate()
452 << " }" << endl in canvasCreate()
453 << "} else {" << endl in canvasCreate()
454 << " set Global(CurrentPageId) 0" << endl in canvasCreate()
455 << " set Global(CurrentCanvas) \"\"" << endl in canvasCreate()
456 << "}" << endl in canvasCreate()
457 << "set Global(LoadPageId) [expr $Global(CurrentPageId) + 1]" << endl in canvasCreate()
458 << "set Global(DocPointsInch) 72.0" << endl in canvasCreate()
459 << "set Global(SlideBG) #FF00FF00FF00" << endl in canvasCreate()
460 << "set Global(Circulate) 1" << endl in canvasCreate()
461 << "set Global(SlideScale) 0" << endl; in canvasCreate()
469 buffer << "set Global(CurrentPageId) $Global(LoadPageId)" << endl in ~drvTK()
470 << "newCanvas .can c$Global(CurrentPageId)" << endl; in ~drvTK()
491 buffer << "\\" << endl; in print_coords()
498 …uffer << "scaleObject all [expr $Global(PointsInch)/$Global(DocPointsInch) * 1.0] {} {}" << endl; in close_page()
505 buffer << " set Global(CurrentPageId) [expr $Global(CurrentPageId) + 1]" << endl in open_page()
506 << " set Global(PageHeight) " << pheight << endl in open_page()
507 << " set Global(PageWidth) " << pwidth << endl in open_page()
508 << " set Global(Landscape) 0" << endl in open_page()
509 << " newCanvas .can c$Global(CurrentPageId)" << endl; in open_page()
543 buffer << endl in show_text()
568 << endl; in show_text()
574 << endl; in show_text()
603 << endl; in show_path()
620 << endl; in show_path()
633 << endl; in show_path()
640 << endl; in show_path()