대한민국 해병대 KAAV-II 상륙돌격장갑차 종이모형 1/35

KAAV-II 종이모형 목업

KAAV-II 빌드업 차체 차체 구조물 궤도 & 스커트 파도막이터렛 완성

종이모형 설명서 제작용 심볼 오른쪽 추가 생성 라이노 스크립트

Add Symbol to Right!-_RunScript (Option ExplicitCall Main()Sub Main() Dim TextObject, Text, Allowance Dim shift01, shift02, Length01 Allowance = Rhino.GetString("Add symbol:","*") Do TextObject = Rhino.GetObject("Select a number:") If Not isNull (TextObject) Then If Rhino.isText (TextObject) Then Text = Rhino.TextObjectText (TextObject) Length01 = Len(Text) Text = Text & Allowance..

종이모형 설명서 제작용 파트 번호 자동 증가 생성 라이노 스크립트

Increase Numbering!-_RunScript (Option ExplicitCall Main()Sub Main() Dim arrObject, Vertical, TextObject, Shift, ShiftObject01, ShiftObject02 Dim auxiliary01, auxiliary02 Dim i Dim length, left01, right01, e, Operator01, Last arrObject = Rhino.ObjectsByLayer("Part_Number") Shift = Rhino.GetReal("add:", 1) Vertical = Rhino.GetReal("Input number to start increasing from:") For i=0 To UBound(arrO..

종이모형 설명서 제작용 심볼 왼쪽 추가 생성 라이노 스크립트

Add Symbol to Left!-_RunScript (Option ExplicitCall Main()Sub Main() Dim TextObject, Text, Allowance Dim shift01, shift02, Length01 Allowance = Rhino.GetString("Add symbol:","*") Do TextObject = Rhino.GetObject("Select a number:") If Not isNull (TextObject) Then If Rhino.isText (TextObject) Then Text = Rhino.TextObjectText (TextObject) Length01 = Len(Text)' Text = Text & Allowance..