Quick Ruby script to create a cube in CATIA using COM.

catia.rb

#!/usr/bin/ruby
 
require 'win32ole'
 
def get_catia()
  catia = nil
  catia = WIN32OLE.connect('CATIA.Application')
  if catia == nil then
      catia = WIN32OLE.new('CATIA.Application')
  end
  if catia == nil then
    puts "Could not connect to CATIA!"
  end
  catia
end
 
cubeWidth = 20
 
catia = get_catia()
part1 = catia.Documents.Add("Part").Part
ad = catia.ActiveDocument
 
bod = part1.MainBody
bod.Name="Cube Generated From Ruby"
 
skts = bod.Sketches()
xyPlane = part1.CreateReferenceFromGeometry(part1.OriginElements.PlaneXY)
shapeFact = part1.Shapefactory
 
ms = skts.Add(xyPlane)
ms.Name="Cube Outline"
 
fact = ms.OpenEdition()
fact.CreateLine(-cubeWidth, -cubeWidth,  cubeWidth, -cubeWidth)
fact.CreateLine(cubeWidth, -cubeWidth,  cubeWidth, cubeWidth)
fact.CreateLine(cubeWidth, cubeWidth,  -cubeWidth, cubeWidth)
fact.CreateLine(-cubeWidth, cubeWidth,  -cubeWidth, -cubeWidth)
ms.CloseEdition()
 
mpad = shapeFact.AddNewPad(ms, cubeWidth)
mpad.Name = "Ruby Pad"
mpad.SecondLimit.Dimension.Value = cubeWidth
 
sel = ad.Selection
sel.Add(mpad)
 
vp = sel.VisProperties
vp.SetRealColor(255,0,0,1)
sel.Clear()
 
part1.Update()