Create New Item
Item Type
File
Folder
Item Name
Search file in folder and subfolders...
Are you sure want to rename?
File Manager
/
SKILL
:
copyil
Advanced Search
Upload
New Item
Settings
Back
Back Up
Advanced Editor
Save
procedure(copy_wire() id = car(geGetSelSet()) cv = geGetWindowCellView() w = id~>width lpp = id~>lpp points = id~>points x1=car(car(points)) y1=cadr(car(points)) x2=car(cadr(points)) y2=cadr(cadr(points)) if(sens == "gauche" then delta = 0.5 ) if(sens == "droite" then delta = -0.5 ) if(sens == "bas" then delta = -0.5 ) if(sens == "haut" then delta = 0.5 ) if( x1 == x2 then x1 = x1 + delta x2 = x2 + delta else y1 = y1 + delta y2 = y2 + delta ) coord= list(x1:y1 x2:y2) dbCreatePath(cv lpp coord w) )