# File rbSnack/tkSnackUtil.rb, line 265 def drawGraph w = self.width @viewPort=[50,30,w-20,w-30] TkcRectangle.new(self,0,0,self.width,self.height ) { fill '#aaa'} f1Labels=(2..8).collect{|x| x*100} f2Labels=(8..24).collect{|x| x*100} f1Labels.each{|label| x= getX label.to_f txt=label.to_s TkcText.new(self,x,@viewPort[3]+15){text txt} TkcLine.new(self,x,@viewPort[1] ,x,@viewPort[3]){ fill '#ccf'} } f2Labels.each{|label| y= getY label.to_f txt=label.to_s TkcText.new(self,@viewPort[0]-20,y){text txt} TkcLine.new(self,@viewPort[0] ,y,@viewPort[2],y){ fill '#ddf'} } TkcLine.new(self,@viewPort[0], @viewPort[1]-10, @viewPort[0],@viewPort[3]){ arrow 'first'} TkcText.new(self,@viewPort[0], @viewPort[1]-20){text "f2"} TkcLine.new(self,@viewPort[0],@viewPort[3],@viewPort[2]+20,@viewPort[3] ){ arrow 'last'} TkcText.new(self,@viewPort[2]+10,@viewPort[3]-10){text "f1"} TkcText.new(self,130,20){text @title} if @title!=nil x0, y0 = nil, nil triangle=} UW AA IY UW} triangle.each{ |k| x1, y1 = getX( VOWELS[k][1]), getY( VOWELS[k][2] ) TkcLine.new(self,x0,y0,x1,y1){ fill '#8f8'; width 2} if x0!=nil and x1!=nil x0, y0 = x1, y1 } VOWELS.each { |k, v| x = getX v[1] y = getY v[2] txt = k TkcText.new(self,x,y){text txt} } end