-
Notifications
You must be signed in to change notification settings - Fork 1
/
Plumbutt_pre.rb
executable file
·53 lines (48 loc) · 951 Bytes
/
Plumbutt_pre.rb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
require './PlumPott.rb'
require './Okuda.rb'
require './plumbENGRAVE/plumAVDOG.rb'
require './plumbENGRAVE/plumULTRA.rb'
require './plumbENGRAVE/plumGONGUE.rb'
$bitwidth = 2.0/25.4
$halfwidth = $bitwidth/2
class Plumbutt < PlumPott
MARJ = 0.05 #0.25
@@numero = 0
def initialize(starx, stary)
@width = 6
@heigh = 6.95 ###1.95 ####wasz 2!!!
@@lipp = 0.0
@zstep = 4
super(starx, stary)
end
def dy(y)
return @stary-(y/1000.0)
end
def dx(x)
return @curxo+(x/1000.0)
end
def boxo()
@curxo += MARJ
shallot(dx(0),dy(2000),1)
shallot(dx(0),dy(-2000),1)
@curxo += @width
shallot(dx(0),dy(-1500),-1)
shallot(dx(0),dy(1500),-1)
@curxo += MARJ
return @curxo
end
def ducatop
end
def ducabot
end
def duxo
@curxo += $bitwidth
return @curxo
end
end
$rimmer = 0.01
lastx=stutterat(Plumbutt)
Plumbutt.new(0,0).drillus(0,0,0,-0.55)
Plumbutt.new(0,0).drillus(lastx,0,0,-0.55)
printf "G0 Z0.5\n"
printf "G0 X0 Y0\n"