mirror of
https://github.com/RTimothyEdwards/magic.git
synced 2026-08-31 10:16:01 +02:00
Corrected problems having to do with color (blue and green were swapped)
and incorrect call to cairo_set_source_rgba which is in an unused function and has no effect except with versions of Tcl less than 8.6 where "load -lazy" is not available and unknown functions cause immediate exit. Cleaned up remaining references to OpenGL in the Cairo code, and updated the copyright and acknowledged Chuan Chen, who coded the Cairo interface. No attempt yet to deal with memory leaks caused by calling Cairo "create" functions without the accompanying "destroy" functions.
This commit is contained in:
Tim Edwards
@@ -1,248 +0,0 @@
|
||||
# 1 "proto.magicrc.in"
|
||||
# 1 "<built-in>"
|
||||
# 1 "<command-line>"
|
||||
# 1 "/usr/include/stdc-predef.h" 1 3 4
|
||||
# 1 "<command-line>" 2
|
||||
# 1 "proto.magicrc.in"
|
||||
# 9 "proto.magicrc.in"
|
||||
puts stdout "Processing system .magicrc file"
|
||||
|
||||
|
||||
###############################################################################
|
||||
|
||||
###############################################################################
|
||||
|
||||
macro a "select visible"
|
||||
macro A "select more visible"
|
||||
macro ^A "select less visible"
|
||||
|
||||
macro b "box"
|
||||
macro B "findbox"
|
||||
|
||||
macro c "copy"
|
||||
|
||||
macro d "delete"
|
||||
macro ^D "erase $"
|
||||
|
||||
macro e "edit"
|
||||
|
||||
macro f "sideways"
|
||||
macro F "upsidedown"
|
||||
|
||||
macro g "grid"
|
||||
macro G "grid 2"
|
||||
|
||||
macro i "select cell"
|
||||
macro I "select more cell"
|
||||
|
||||
macro Control_XK_i "select less cell"
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
imacro l "label "
|
||||
|
||||
macro L "shell ls"
|
||||
macro ^L "redraw"
|
||||
|
||||
macro m "move"
|
||||
macro M "stretch"
|
||||
|
||||
macro ^N ""
|
||||
|
||||
macro o "openwindow"
|
||||
macro O "closewindow"
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
imacro p "paint "
|
||||
|
||||
|
||||
|
||||
macro Control_Shift_XK_q "quit"
|
||||
|
||||
|
||||
macro r "clockwise"
|
||||
macro R "clockwise 270"
|
||||
macro ^R "clockwise 180"
|
||||
|
||||
macro s "select"
|
||||
macro S "select more"
|
||||
macro ^S "select less"
|
||||
|
||||
macro Control_Shift_XK_s "undo ; select"
|
||||
|
||||
|
||||
macro u "undo"
|
||||
macro U "redo"
|
||||
|
||||
macro v "view"
|
||||
macro V "xview"
|
||||
|
||||
macro w "writeall"
|
||||
macro W "writeall force"
|
||||
|
||||
macro x "expand"
|
||||
macro X "unexpand"
|
||||
macro ^X "expand toggle"
|
||||
|
||||
macro z "zoom .5"
|
||||
macro Z "zoom 2"
|
||||
macro ^Z "findbox zoom"
|
||||
|
||||
macro Control_Shift_XK_z "center"
|
||||
|
||||
|
||||
macro ? "drc why"
|
||||
macro / "select area; what ; select clear"
|
||||
|
||||
macro , "select clear"
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
macro " " "tool"
|
||||
|
||||
imacro XK_colon ":"
|
||||
imacro XK_semicolon ":"
|
||||
|
||||
macro Shift_XK_space "tool box"
|
||||
macro Control_XK_space "tool wiring"
|
||||
|
||||
macro XK_Left "scroll l .1 w"
|
||||
macro Shift_XK_Left "scroll l 1 w"
|
||||
macro Control_XK_Left "box grow w 1"
|
||||
macro Control_Shift_XK_Left "box shrink e 1"
|
||||
macro XK_Right "scroll r .1 w"
|
||||
macro Shift_XK_Right "scroll r 1 w"
|
||||
macro Control_XK_Right "box grow e 1"
|
||||
macro Control_Shift_XK_Right "box shrink w 1"
|
||||
macro XK_Up "scroll u .1 w"
|
||||
macro Shift_XK_Up "scroll u 1 w"
|
||||
macro Control_XK_Up "box grow n 1"
|
||||
macro Control_Shift_XK_Up "box shrink s 1"
|
||||
macro XK_Down "scroll d .1 w"
|
||||
macro Shift_XK_Down "scroll d 1 w"
|
||||
macro Control_XK_Down "box grow s 1"
|
||||
macro Control_Shift_XK_Down "box shrink n 1"
|
||||
|
||||
|
||||
macro XK_KP_Delete "box size 0 0"
|
||||
macro XK_KP_Insert "box size 4 4"
|
||||
macro XK_KP_0 "box size 7 2"
|
||||
macro Shift_XK_KP_0 "box size 7 2"
|
||||
macro XK_0 "box size 7 2"
|
||||
macro Control_XK_KP_0 "box size 2 7"
|
||||
macro Control_XK_KP_Insert "box size 2 7"
|
||||
macro XK_KP_End "move sw 1"
|
||||
macro XK_KP_Down "move d 1"
|
||||
macro XK_KP_2 "stretch d 1"
|
||||
macro Shift_XK_KP_2 "stretch d 1"
|
||||
macro XK_2 "stretch d 1"
|
||||
macro XK_KP_Next "move se 1"
|
||||
macro XK_KP_Left "move l 1"
|
||||
macro XK_KP_4 "stretch l 1"
|
||||
macro Shift_XK_KP_4 "stretch l 1"
|
||||
macro XK_4 "stretch l 1"
|
||||
macro XK_KP_Begin "findbox zoom"
|
||||
macro XK_KP_5 "findbox"
|
||||
macro Shift_XK_KP_5 "findbox"
|
||||
macro XK_5 "findbox"
|
||||
macro XK_KP_Right "move r 1"
|
||||
macro XK_KP_6 "stretch r 1"
|
||||
macro Shift_XK_KP_6 "stretch r 1"
|
||||
macro XK_6 "stretch r 1"
|
||||
macro XK_KP_Home "move nw 1"
|
||||
macro XK_KP_Up "move u 1"
|
||||
macro XK_KP_8 "stretch u 1"
|
||||
macro Shift_XK_KP_8 "stretch u 1"
|
||||
macro XK_8 "stretch u 1"
|
||||
macro XK_KP_Prior "move ne 1"
|
||||
|
||||
macro XK_Pointer_Button4 "scroll u .05 w"
|
||||
macro XK_Pointer_Button5 "scroll d .05 w"
|
||||
|
||||
macro XK_F1 "paint ndiff"
|
||||
macro XK_F2 "paint pdiff"
|
||||
macro XK_F3 "paint poly"
|
||||
macro XK_F4 "paint poly2"
|
||||
macro XK_F5 "paint m1"
|
||||
macro XK_F6 "paint m2"
|
||||
macro XK_F7 "paint m3"
|
||||
macro XK_F8 "paint m4"
|
||||
macro XK_F9 "paint ndc"
|
||||
macro XK_F10 "paint pdc"
|
||||
macro XK_F11 "paint pc"
|
||||
macro XK_F12 "paint via"
|
||||
# 235 "proto.magicrc.in"
|
||||
macro Control_Button1 "*bypass box move bl cursor"
|
||||
macro Control_Button2 "*bypass paint cursor"
|
||||
macro Control_Button3 "*bypass box corner ur cursor"
|
||||
|
||||
macro Button1 "*bypass box move bl cursor"
|
||||
macro Shift_Button1 "*bypass box corner bl cursor"
|
||||
macro Button2 "*bypass paint cursor"
|
||||
macro Shift_Button2 "*bypass erase cursor"
|
||||
macro Button3 "*bypass box corner ur cursor"
|
||||
macro Shift_Button3 "*bypass box move ur cursor"
|
||||
# 258 "proto.magicrc.in"
|
||||
macro color Button1 "pushbutton left"
|
||||
macro color Button2 "pushbutton middle"
|
||||
macro color Button3 "pushbutton right"
|
||||
macro color u "undo"
|
||||
macro color U "redo"
|
||||
macro color plus "color next"
|
||||
macro color minus "color last"
|
||||
|
||||
macro netlist Button1 "pushbutton left"
|
||||
macro netlist Button2 "pushbutton middle"
|
||||
macro netlist Button3 "pushbutton right"
|
||||
|
||||
macro wind3d L "level up"
|
||||
macro wind3d l "level down"
|
||||
macro wind3d C "cif"
|
||||
macro wind3d " " "defaults"
|
||||
macro wind3d ^L "refresh"
|
||||
macro wind3d Z "zoom 2.0 1 rel"
|
||||
macro wind3d z "zoom 0.5 1 rel"
|
||||
macro wind3d 1 "view 0 10 0 rel"
|
||||
macro wind3d 2 "view 0 -10 0 rel"
|
||||
macro wind3d 3 "view 10 0 0 rel"
|
||||
macro wind3d 4 "view -10 0 0 rel"
|
||||
macro wind3d 5 "view 0 0 10 rel"
|
||||
macro wind3d 6 "view 0 0 -10 rel"
|
||||
macro wind3d 7 "view 0 1 0 rel"
|
||||
macro wind3d 8 "view 0 -1 0 rel"
|
||||
macro wind3d 9 "view 1 0 0 rel"
|
||||
macro wind3d 0 "view -1 0 0 rel"
|
||||
|
||||
macro wind3d XK_Up "scroll 0 -0.25 0 rel"
|
||||
macro wind3d XK_Down "scroll 0 0.25 0 rel"
|
||||
macro wind3d XK_Left "scroll 0.25 0 0 rel"
|
||||
macro wind3d XK_Right "scroll -0.25 0 0 rel"
|
||||
macro wind3d XK_minus "view 0 0 1 rel"
|
||||
macro wind3d XK_equal "view 0 0 -1 rel"
|
||||
macro wind3d XK_greater "zoom 1 2.0 rel"
|
||||
macro wind3d XK_less "zoom 1 0.5 rel"
|
||||
|
||||
|
||||
|
||||
|
||||
setlabel font FreeSans.pt3 0.58
|
||||
setlabel font FreeSerif.pt3 0.58
|
||||
setlabel font FreeMono.pt3 0.6
|
||||
|
||||
|
||||
|
||||
|
||||
magic::suspendout
|
||||
if {![catch {set Opts(tools)}]} { magic::enable_tools }
|
||||
set GND "gnd!"
|
||||
set VDD "vdd!"
|
||||
magic::resumeout
|
||||
catch {source ${CAD_ROOT}/magic/sys/site.def}
|
||||
Reference in New Issue
Block a user