Author Topic: Versions of a format of the description 3dSolid  (Read 4744 times)

0 Members and 1 Guest are viewing this topic.

ElpanovEvgeniy

  • Water Moccasin
  • Posts: 1568
  • Moscow (Russia)
Versions of a format of the description 3dSolid
« on: November 13, 2008, 03:22:32 AM »
Has ripened necessity to gather the information on differences in the description 3dSolid in dxf. First of all, the format header varies each version, in the second, a format of the description, permanently edit. I ask your help - start the program on the computer and copy results of the program on a forum. It will be very useful for my researches, and for going after me.
Especially, results, on computers with vertical solutions of various versions are interesting...

Code: [Select]
(defun c:test (/ e)
  (vl-load-com)
  (setq i 0)
  (princ "\n\n\t*** *** Start log *** ***")
  (princ (strcat "\n\t acadver = " (getvar "acadver") "\n\t "))
  (princ (ver))
  (princ
    (strcat "\n\t SOLIDCHECK = " (itoa (getvar "SOLIDCHECK")))
  )
  (if (getvar "SOLIDHIST")
    (princ
      (strcat "\n\t SOLIDHIST = " (itoa (getvar "SOLIDHIST")))
    )
  )
  (princ "\n\t'(")
  (foreach a (entget
       (setq
e (vlax-vla-object->ename
     (vla-addbox
       (vla-get-ModelSpace
(vla-get-ActiveDocument (vlax-get-acad-object))
       ) ;_  vla-get-ModelSpace
       (vlax-3d-point 10 11 12)
       10
       10
       10
     ) ;_  vla-addbox
   ) ;_  vlax-vla-object->ename
       ) ;_  setq
     ) ;_  entget
    (if (= 1 (car a))
      (princ (strcat "\n\t\t("
     (apply 'strcat
    (mapcar '(lambda (x)
       (if (= x 32)
" "
(chr (- 159 x))
       ) ;_  if
     ) ;_  lambda
    (vl-string->list (cdr a))
    ) ;_  mapcar
     ) ;_  apply
     ")"
     ) ;_  strcat
      ) ;_  princ
    ) ;_  if
  ) ;_  foreach
  (princ "\n\t)\n\t*** *** End log *** ***")
  (entdel e)
  (textscr)
  (princ)
)

kpblc

  • Bull Frog
  • Posts: 396
Re: Versions of a format of the description 3dSolid
« Reply #1 on: November 13, 2008, 04:28:15 AM »
AA2008 Eng + SP1:
Code: [Select]
Command: test


 *** *** Start log *** ***
  acadver = 17.1s (LMS Tech)
  Visual LISP 2008 (en)
  SOLIDCHECK = 1
  SOLIDHIST = 1
 '(
   (21200 86 2 26          )
   (16 Autodesk AutoCAD 17 ASM 12.0.1.820 NT 0  )
   (1 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @11 212.0.1.820 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 0 $64 #)
   (vertex $-1 -1 $-1 $19 1 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 0 $75 #)
   (vertex $-1 -1 $-1 $62 1 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 1 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 1 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 0 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 0 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
Sorry for my English.

SEANT

  • Bull Frog
  • Posts: 344
Re: Versions of a format of the description 3dSolid
« Reply #2 on: November 13, 2008, 06:01:38 AM »
AutoCAD Mechanical 2009 SP2 - INSUNITS = Inches

Code: [Select]
*** *** Start log *** ***
  acadver = 17.2s (LMS Tech)
  Visual LISP 2009 (en)
  SOLIDCHECK = 1
  SOLIDHIST = 1
 '(
   (21200 86 2 26          )
   (16 Autodesk AutoCAD 17 ASM 12.0.1.915 NT 0  )
   (25.399999999999999 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @11 212.0.1.915 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 0 $64 #)
   (vertex $-1 -1 $-1 $19 1 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 0 $75 #)
   (vertex $-1 -1 $-1 $62 1 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 1 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 1 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 0 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 0 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
Sean Tessier
AutoCAD 2016 Mechanical

CAB

  • Global Moderator
  • Seagull
  • Posts: 10399
Re: Versions of a format of the description 3dSolid
« Reply #3 on: November 13, 2008, 08:56:40 AM »

Code: [Select]
*** *** Start log *** ***
  acadver = 15.0
  Visual LISP 2000 (en)
  SOLIDCHECK = 1
 '(
   (400 85 1 0          )
   (7 Unknown 13 ACIS 4.0.2 NT 24 Thu Nov 13 08:48:43 2008 )
   (-1 9.9999999999999995e-007 1e-010 )
   (body $-1 $1 $-1 $-1 #)
   (lump $-1 $-1 $2 $0 #)
   (shell $-1 $-1 $-1 $3 $-1 $1 #)
   (face $-1 $4 $5 $2 $-1 $6 forward single #)
   (face $-1 $7 $8 $2 $-1 $9 reversed single #)
   (loop $-1 $-1 $10 $3 #)
   (plane-surface $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 $11 $12 $2 $-1 $13 reversed single #)
   (loop $-1 $-1 $14 $4 #)
   (plane-surface $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 $15 $16 $17 $18 forward $5 $-1 #)
   (face $-1 $19 $20 $2 $-1 $21 reversed single #)
   (loop $-1 $-1 $22 $7 #)
   (plane-surface $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 $23 $24 $25 $26 forward $8 $-1 #)
   (coedge $-1 $27 $10 $28 $29 forward $5 $-1 #)
   (coedge $-1 $10 $27 $30 $31 forward $5 $-1 #)
   (coedge $-1 $32 $33 $10 $18 reversed $34 $-1 #)
   (edge $-1 $35 $36 $17 $37 forward #)
   (face $-1 $38 $39 $2 $-1 $40 reversed single #)
   (loop $-1 $-1 $41 $11 #)
   (plane-surface $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 $42 $30 $43 $44 forward $12 $-1 #)
   (coedge $-1 $45 $14 $42 $46 forward $8 $-1 #)
   (coedge $-1 $14 $45 $47 $48 forward $8 $-1 #)
   (coedge $-1 $33 $32 $14 $26 reversed $34 $-1 #)
   (edge $-1 $49 $50 $25 $51 forward #)
   (coedge $-1 $16 $15 $52 $53 forward $5 $-1 #)
   (coedge $-1 $54 $55 $15 $29 reversed $39 $-1 #)
   (edge $-1 $36 $56 $28 $57 forward #)
   (coedge $-1 $22 $58 $16 $31 reversed $12 $-1 #)
   (edge $-1 $59 $35 $30 $60 forward #)
   (coedge $-1 $25 $17 $58 $61 forward $34 $-1 #)
   (coedge $-1 $17 $25 $54 $62 reversed $34 $-1 #)
   (loop $-1 $-1 $32 $38 #)
   (vertex $-1 $18 $63 #)
   (vertex $-1 $18 $64 #)
   (straight-curve $-1 15 11 17 0 1 0 I I #)
   (face $-1 $-1 $34 $2 $-1 $65 reversed single #)
   (loop $-1 $-1 $54 $19 #)
   (plane-surface $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 $66 $52 $55 $67 forward $20 $-1 #)
   (coedge $-1 $58 $22 $23 $46 reversed $12 $-1 #)
   (coedge $-1 $52 $66 $22 $44 reversed $20 $-1 #)
   (edge $-1 $59 $68 $43 $69 forward #)
   (coedge $-1 $24 $23 $66 $70 forward $8 $-1 #)
   (edge $-1 $50 $68 $42 $71 forward #)
   (coedge $-1 $55 $54 $24 $48 reversed $39 $-1 #)
   (edge $-1 $72 $49 $47 $73 forward #)
   (vertex $-1 $26 $74 #)
   (vertex $-1 $61 $75 #)
   (straight-curve $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 $41 $43 $27 $53 reversed $20 $-1 #)
   (edge $-1 $56 $59 $52 $76 forward #)
   (coedge $-1 $47 $28 $33 $62 forward $39 $-1 #)
   (coedge $-1 $28 $47 $41 $67 reversed $39 $-1 #)
   (vertex $-1 $29 $77 #)
   (straight-curve $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 $30 $42 $32 $61 reversed $12 $-1 #)
   (vertex $-1 $53 $78 #)
   (straight-curve $-1 10 6 17 1 0 0 I I #)
   (edge $-1 $35 $50 $32 $79 forward #)
   (edge $-1 $36 $49 $33 $80 forward #)
   (point $-1 15 6 17 #)
   (point $-1 15 16 17 #)
   (plane-surface $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 $43 $41 $45 $70 reversed $20 $-1 #)
   (edge $-1 $56 $72 $55 $81 forward #)
   (vertex $-1 $70 $82 #)
   (straight-curve $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 $68 $72 $66 $83 forward #)
   (straight-curve $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 $48 $84 #)
   (straight-curve $-1 10 16 7 1 0 0 I I #)
   (point $-1 15 16 7 #)
   (point $-1 15 6 7 #)
   (straight-curve $-1 5 11 17 0 -1 0 I I #)
   (point $-1 5 16 17 #)
   (point $-1 5 6 17 #)
   (straight-curve $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 5 16 12 0 0 -1 I I #)
   (point $-1 5 6 7 #)
   (straight-curve $-1 5 11 7 0 1 0 I I #)
   (point $-1 5 16 7 #)
 )
 *** *** End log *** ***
I've reached the age where the happy hour is a nap. ()
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

CAB

  • Global Moderator
  • Seagull
  • Posts: 10399
Re: Versions of a format of the description 3dSolid
« Reply #4 on: November 13, 2008, 09:00:09 AM »
Code: [Select]
*** *** Start log *** ***
  acadver = 16.0
  Visual LISP 2004 (en)
  SOLIDCHECK = 1
 '(
   (20800 86 2 0          )
   (16 Autodesk AutoCAD 17 ASM 6.0.5.7004 NT 24 Thu Nov 13 08:52:49 2008 )
   (25.399999999999999 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @12 208.0.5.7004 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 $64 #)
   (vertex $-1 -1 $-1 $19 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 $75 #)
   (vertex $-1 -1 $-1 $62 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
I've reached the age where the happy hour is a nap. ()
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

CAB

  • Global Moderator
  • Seagull
  • Posts: 10399
Re: Versions of a format of the description 3dSolid
« Reply #5 on: November 13, 2008, 09:02:21 AM »

Code: [Select]
*** *** Start log *** ***
  acadver = 16.2s (LMS Tech)
  Visual LISP 2006 (en)
  SOLIDCHECK = 1
 '(
   (20800 86 2 0          )
   (16 Autodesk AutoCAD 17 ASM 6.0.5.7004 NT 24 Thu Nov 13 08:54:55 2008 )
   (25.399999999999999 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @12 208.0.5.7004 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 $64 #)
   (vertex $-1 -1 $-1 $19 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 $75 #)
   (vertex $-1 -1 $-1 $62 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
I've reached the age where the happy hour is a nap. ()
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

ElpanovEvgeniy

  • Water Moccasin
  • Posts: 1568
  • Moscow (Russia)
Re: Versions of a format of the description 3dSolid
« Reply #6 on: November 13, 2008, 09:06:05 AM »
Many thanks Friends! :)

Chris

  • Swamp Rat
  • Posts: 547
Re: Versions of a format of the description 3dSolid
« Reply #7 on: November 13, 2008, 10:55:51 AM »
Vanilla AutoCAD 2009 SP2, Bonus Pack 1
Code: [Select]
*** *** Start log *** ***
  acadver = 17.2s (LMS Tech)
  Visual LISP 2009 (en)
  SOLIDCHECK = 1
  SOLIDHIST = 1
 '(
   (21200 86 2 26          )
   (16 Autodesk AutoCAD 17 ASM 12.0.1.915 NT 0  )
   (25.399999999999999 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @11 212.0.1.915 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 0 $64 #)
   (vertex $-1 -1 $-1 $19 1 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 0 $75 #)
   (vertex $-1 -1 $-1 $62 1 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 1 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 1 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 0 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 0 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
Christopher T. Cowgill, P.E.
AEC Collection 2020 (C3D)
Win 10

T.Willey

  • Needs a day job
  • Posts: 5247
Re: Versions of a format of the description 3dSolid
« Reply #8 on: November 13, 2008, 11:17:36 AM »
AutoCAD 2006 Electrical SP2a

Code: [Select]
Command: test


 *** *** Start log *** ***
  acadver = 16.2s (LMS Tech)
  Visual LISP 2006 (en)
  SOLIDCHECK = 1
 '(
   (20800 86 2 0          )
   (16 Autodesk AutoCAD 17 ASM 6.0.5.7004 NT 24 Thu Nov 13 08:15:06 2008 )
   (25.399999999999999 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @12 208.0.5.7004 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 $64 #)
   (vertex $-1 -1 $-1 $19 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 $75 #)
   (vertex $-1 -1 $-1 $62 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
Tim

I don't want to ' end-up ', I want to ' become '. - Me

Please think about donating if this post helped you.

T.Willey

  • Needs a day job
  • Posts: 5247
Re: Versions of a format of the description 3dSolid
« Reply #9 on: November 13, 2008, 11:19:48 AM »
AutoCAD 2008 Electrical No SPs

Code: [Select]
Command: test


 *** *** Start log *** ***
  acadver = 17.1s (LMS Tech)
  Visual LISP 2008 (en)
  SOLIDCHECK = 1
  SOLIDHIST = 1
 '(
   (21200 86 2 26          )
   (16 Autodesk AutoCAD 17 ASM 12.0.1.820 NT 0  )
   (25.399999999999999 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @11 212.0.1.820 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 0 $64 #)
   (vertex $-1 -1 $-1 $19 1 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 0 $75 #)
   (vertex $-1 -1 $-1 $62 1 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 1 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 1 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 0 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 0 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
Tim

I don't want to ' end-up ', I want to ' become '. - Me

Please think about donating if this post helped you.

VovKa

  • Swamp Rat
  • Posts: 1459
  • Ukraine
Re: Versions of a format of the description 3dSolid
« Reply #10 on: November 13, 2008, 11:23:42 AM »
Map 2005
Code: [Select]
*** *** Start log *** ***
  acadver = 16.1s (LMS Tech)
  Visual LISP 2005 (en)
  SOLIDCHECK = 1
 '(
   (20800 86 2 0          )
   (16 Autodesk AutoCAD 17 ASM 6.0.4.7009 NT 24 Thu Nov 13 18:21:11 2008 )
   (1 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @12 208.0.4.7009 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 $64 #)
   (vertex $-1 -1 $-1 $19 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 $75 #)
   (vertex $-1 -1 $-1 $62 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***

gile

  • Water Moccasin
  • Posts: 2379
  • Marseille, France
Re: Versions of a format of the description 3dSolid
« Reply #11 on: November 13, 2008, 04:59:26 PM »
Code: [Select]
*** *** Start log *** ***
  acadver = 17.0s (LMS Tech)
  Visual LISP 2007 (fr)
  SOLIDCHECK = 1
  SOLIDHIST = 1
 '(
   (21200 86 2 26          )
   (16 Autodesk AutoCAD 18 ASM 12.0.0.5828 NT 0  )
   (1 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @12 212.0.0.5828 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 0 $64 #)
   (vertex $-1 -1 $-1 $19 1 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 0 $75 #)
   (vertex $-1 -1 $-1 $62 1 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 1 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 1 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 0 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 0 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
Speaking English as a French Frog

SEANT

  • Bull Frog
  • Posts: 344
Re: Versions of a format of the description 3dSolid
« Reply #12 on: November 16, 2008, 05:31:45 AM »
Ive never spent much time examining 3DSolids from this approach.  Apparently there is a lot to see and manipulate if a person has the expertise. 

Is it safe to say that the information exposed with your routine is the same as would be derived from an Acisout command?

The reason I ask is that it is a quite common requirement to transfer Solids from other applications (in my case Rhino 3D) to AutoCAD.  The only path is via the .SAT format.  Sadly, this transfer is less than perfect (not necessarily with flat faced solids but certainly with those including non-planar faces).

I dont imagine you have much interest in the predicaments of Rhino 3D users but thought Id post the description below as an interesting comparison.  It is an Acis export of a similar 3d Box.


Code: [Select]
400 0 1 0       
7 Unknown 13 ACIS 5.0.1 NT 24 Sun Nov 16 10:12:55 2008
1 9.9999999999999995e-007 1e-010
-0 body $-1 $2 $-1 $1 #                                                                                           
-1 transform $-1 1 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0 #
-2 lump $-1 $-1 $3 $0 #
-3 shell $-1 $-1 $-1 $4 $-1 $2 #
-4 face $-1 $15 $6 $3 $-1 $5 forward single #
-5 spline-surface $-1 forward { exactsur nubs 1 1 open open none none 2 2
        0 1 10 1
        0 1 10 1
        5 6 7
        15 6 7
        5 6 17
        15 6 17
        0
        0
        0
        0
        0
        0
        0
        F 0 F 10 F 0 F 10 } F 0 F 10 F 0 F 10 #
-6 loop $-1 $-1 $7 $4 #
-7 coedge $-1 $9 $13 $57 $70 forward $6 $8 #
-8 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        0 0
        10 0
        0
        spline 0 { ref 0 } F 0 F 10 F 0 F 10
        } 0 0 #
-9 coedge $-1 $11 $7 $24 $88 forward $6 $10 #
-10 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        10 0
        10 10
        0
        spline 0 { ref 0 } F 0 F 10 F 0 F 10
        } 0 0 #
-11 coedge $-1 $13 $9 $62 $78 reversed $6 $12 #
-12 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        10 10
        0 10
        0
        spline 0 { ref 0 } F 0 F 10 F 0 F 10
        } 0 0 #
-13 coedge $-1 $7 $11 $42 $86 reversed $6 $14 #
-14 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        0 10
        0 0
        0
        spline 0 { ref 0 } F 0 F 10 F 0 F 10
        } 0 0 #
-15 face $-1 $26 $17 $3 $-1 $16 forward single #
-16 spline-surface $-1 forward { exactsur nubs 1 1 open open none none 2 2
        0 1 10 1
        0 1 10 1
        15 6 7
        15 16 7
        15 6 17
        15 16 17
        0
        0
        0
        0
        0
        0
        0
        F 0 F 10 F 0 F 10 } F 0 F 10 F 0 F 10 #
-17 loop $-1 $-1 $18 $15 #
-18 coedge $-1 $20 $24 $55 $72 forward $17 $19 #
-19 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        0 0
        10 0
        0
        spline 0 { ref 5 } F 0 F 10 F 0 F 10
        } 0 0 #
-20 coedge $-1 $22 $18 $35 $90 forward $17 $21 #
-21 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        10 0
        10 10
        0
        spline 0 { ref 5 } F 0 F 10 F 0 F 10
        } 0 0 #
-22 coedge $-1 $24 $20 $64 $80 reversed $17 $23 #
-23 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        10 10
        0 10
        0
        spline 0 { ref 5 } F 0 F 10 F 0 F 10
        } 0 0 #
-24 coedge $-1 $18 $22 $9 $88 reversed $17 $25 #
-25 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        0 10
        0 0
        0
        spline 0 { ref 5 } F 0 F 10 F 0 F 10
        } 0 0 #
-26 face $-1 $37 $28 $3 $-1 $27 forward single #
-27 spline-surface $-1 forward { exactsur nubs 1 1 open open none none 2 2
        0 1 10 1
        0 1 10 1
        15 16 7
        5 16 7
        15 16 17
        5 16 17
        0
        0
        0
        0
        0
        0
        0
        F 0 F 10 F 0 F 10 } F 0 F 10 F 0 F 10 #
-28 loop $-1 $-1 $29 $26 #
-29 coedge $-1 $31 $35 $53 $74 forward $28 $30 #
-30 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        0 0
        10 0
        0
        spline 0 { ref 10 } F 0 F 10 F 0 F 10
        } 0 0 #
-31 coedge $-1 $33 $29 $46 $92 forward $28 $32 #
-32 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        10 0
        10 10
        0
        spline 0 { ref 10 } F 0 F 10 F 0 F 10
        } 0 0 #
-33 coedge $-1 $35 $31 $66 $82 reversed $28 $34 #
-34 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        10 10
        0 10
        0
        spline 0 { ref 10 } F 0 F 10 F 0 F 10
        } 0 0 #
-35 coedge $-1 $29 $33 $20 $90 reversed $28 $36 #
-36 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        0 10
        0 0
        0
        spline 0 { ref 10 } F 0 F 10 F 0 F 10
        } 0 0 #
-37 face $-1 $48 $39 $3 $-1 $38 forward single #
-38 spline-surface $-1 forward { exactsur nubs 1 1 open open none none 2 2
        0 1 10 1
        0 1 10 1
        5 16 7
        5 6 7
        5 16 17
        5 6 17
        0
        0
        0
        0
        0
        0
        0
        F 0 F 10 F 0 F 10 } F 0 F 10 F 0 F 10 #
-39 loop $-1 $-1 $40 $37 #
-40 coedge $-1 $42 $46 $51 $76 forward $39 $41 #
-41 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        0 0
        10 0
        0
        spline 0 { ref 15 } F 0 F 10 F 0 F 10
        } 0 0 #
-42 coedge $-1 $44 $40 $13 $86 forward $39 $43 #
-43 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        10 0
        10 10
        0
        spline 0 { ref 15 } F 0 F 10 F 0 F 10
        } 0 0 #
-44 coedge $-1 $46 $42 $68 $84 reversed $39 $45 #
-45 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        10 10
        0 10
        0
        spline 0 { ref 15 } F 0 F 10 F 0 F 10
        } 0 0 #
-46 coedge $-1 $40 $44 $31 $92 reversed $39 $47 #
-47 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        0 10
        0 0
        0
        spline 0 { ref 15 } F 0 F 10 F 0 F 10
        } 0 0 #
-48 face $-1 $59 $50 $3 $-1 $49 forward single #
-49 spline-surface $-1 forward { exactsur nubs 1 1 open open none none 2 2
        0 1 10 1
        0 1 10 1
        5 6 7
        5 16 7
        15 6 7
        15 16 7
        0
        0
        0
        0
        0
        0
        0
        F 0 F 10 F 0 F 10 } F 0 F 10 F 0 F 10 #
-50 loop $-1 $-1 $51 $48 #
-51 coedge $-1 $53 $57 $40 $76 reversed $50 $52 #
-52 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        0 0
        10 0
        0
        spline 0 { ref 20 } F 0 F 10 F 0 F 10
        } 0 0 #
-53 coedge $-1 $55 $51 $29 $74 reversed $50 $54 #
-54 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        10 0
        10 10
        0
        spline 0 { ref 20 } F 0 F 10 F 0 F 10
        } 0 0 #
-55 coedge $-1 $57 $53 $18 $72 reversed $50 $56 #
-56 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        10 10
        0 10
        0
        spline 0 { ref 20 } F 0 F 10 F 0 F 10
        } 0 0 #
-57 coedge $-1 $51 $55 $7 $70 reversed $50 $58 #
-58 pcurve $-1 0 forward { exppc nubs 1 open 2
        -10 1 0 1
        0 10
        0 0
        0
        spline 0 { ref 20 } F 0 F 10 F 0 F 10
        } 0 0 #
-59 face $-1 $-1 $61 $3 $-1 $60 forward single #
-60 spline-surface $-1 forward { exactsur nubs 1 1 open open none none 2 2
        0 1 10 1
        0 1 10 1
        5 6 17
        15 6 17
        5 16 17
        15 16 17
        0
        0
        0
        0
        0
        0
        0
        F 0 F 10 F 0 F 10 } F 0 F 10 F 0 F 10 #
-61 loop $-1 $-1 $62 $59 #
-62 coedge $-1 $64 $68 $11 $78 forward $61 $63 #
-63 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        0 0
        10 0
        0
        spline 0 { ref 25 } F 0 F 10 F 0 F 10
        } 0 0 #
-64 coedge $-1 $66 $62 $22 $80 forward $61 $65 #
-65 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        10 0
        10 10
        0
        spline 0 { ref 25 } F 0 F 10 F 0 F 10
        } 0 0 #
-66 coedge $-1 $68 $64 $33 $82 forward $61 $67 #
-67 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        10 10
        0 10
        0
        spline 0 { ref 25 } F 0 F 10 F 0 F 10
        } 0 0 #
-68 coedge $-1 $62 $66 $44 $84 forward $61 $69 #
-69 pcurve $-1 0 forward { exppc nubs 1 open 2
        0 1 10 1
        0 10
        0 0
        0
        spline 0 { ref 25 } F 0 F 10 F 0 F 10
        } 0 0 #
-70 edge $-1 $94 $96 $7 $71 forward #
-71 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        5 6 7
        15 6 7
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-72 edge $-1 $96 $98 $18 $73 forward #
-73 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        15 6 7
        15 16 7
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-74 edge $-1 $98 $100 $29 $75 forward #
-75 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        15 16 7
        5 16 7
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-76 edge $-1 $100 $94 $40 $77 forward #
-77 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        5 16 7
        5 6 7
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-78 edge $-1 $102 $104 $11 $79 forward #
-79 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        5 6 17
        15 6 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-80 edge $-1 $104 $106 $22 $81 forward #
-81 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        15 6 17
        15 16 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-82 edge $-1 $106 $108 $33 $83 forward #
-83 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        15 16 17
        5 16 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-84 edge $-1 $108 $102 $44 $85 forward #
-85 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        5 16 17
        5 6 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-86 edge $-1 $94 $102 $13 $87 forward #
-87 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        5 6 7
        5 6 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-88 edge $-1 $96 $104 $9 $89 forward #
-89 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        15 6 7
        15 6 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-90 edge $-1 $98 $106 $20 $91 forward #
-91 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        15 16 7
        15 16 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-92 edge $-1 $100 $108 $31 $93 forward #
-93 intcurve-curve $-1 forward { exactcur nubs 1 open 2
        0 1 10 1
        5 16 7
        5 16 17
        0
        null_surface
        null_surface
        nullbs
        nullbs
        I I
        0
        0
        0
        F 0 F 10 } F 0 F 10 #
-94 vertex $-1 $70 $95 #
-95 point $-1 5 6 7 #
-96 vertex $-1 $70 $97 #
-97 point $-1 15 6 7 #
-98 vertex $-1 $72 $99 #
-99 point $-1 15 16 7 #
-100 vertex $-1 $74 $101 #
-101 point $-1 5 16 7 #
-102 vertex $-1 $78 $103 #
-103 point $-1 5 6 17 #
-104 vertex $-1 $78 $105 #
-105 point $-1 15 6 17 #
-106 vertex $-1 $80 $107 #
-107 point $-1 15 16 17 #
-108 vertex $-1 $82 $109 #
-109 point $-1 5 16 17 #
End-of-ACIS-data



Sean Tessier
AutoCAD 2016 Mechanical

Amsterdammed

  • Swamp Rat
  • Posts: 507
  • Revit MEP 2016 Acad2013, OPEN DCL
Re: Versions of a format of the description 3dSolid
« Reply #13 on: November 16, 2008, 02:37:44 PM »
*** *** Start log *** ***
  acadver = 17.0s (LMS Tech)
  Visual LISP 2007 (en)
  SOLIDCHECK = 1
  SOLIDHIST = 1
 '(
   (21200 86 2 26          )
   (16 Autodesk AutoCAD 18 ASM 12.0.0.5822 NT 0  )
   (1 9.9999999999999995e-007 1e-010 )
   (asmheader $-1 -1 @12 212.0.0.5822 #)
   (body $-1 -1 $-1 $2 $-1 $-1 #)
   (lump $-1 -1 $-1 $-1 $3 $1 #)
   (shell $-1 -1 $-1 $-1 $-1 $4 $-1 $2 #)
   (face $-1 -1 $-1 $5 $6 $3 $-1 $7 forward single #)
   (face $-1 -1 $-1 $8 $9 $3 $-1 $10 reversed single #)
   (loop $-1 -1 $-1 $-1 $11 $4 #)
   (plane-surface $-1 -1 $-1 10 11 17 0 0 1 1 0 0 forward_v I I I I #)
   (face $-1 -1 $-1 $12 $13 $3 $-1 $14 reversed single #)
   (loop $-1 -1 $-1 $-1 $15 $5 #)
   (plane-surface $-1 -1 $-1 10 11 7 0 0 1 1 0 0 forward_v I I I I #)
   (coedge $-1 -1 $-1 $16 $17 $18 $19 forward $6 $-1 #)
   (face $-1 -1 $-1 $20 $21 $3 $-1 $22 reversed single #)
   (loop $-1 -1 $-1 $-1 $23 $8 #)
   (plane-surface $-1 -1 $-1 10 6 12 0 1 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $24 $25 $26 $27 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $28 $11 $29 $30 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $11 $28 $31 $32 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $33 $34 $11 $19 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $36 -5 $37 5 $18 $38 forward @7 unknown #)
   (face $-1 -1 $-1 $39 $40 $3 $-1 $41 reversed single #)
   (loop $-1 -1 $-1 $-1 $42 $12 #)
   (plane-surface $-1 -1 $-1 5 11 12 1 0 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $43 $31 $44 $45 forward $13 $-1 #)
   (coedge $-1 -1 $-1 $46 $15 $43 $47 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $15 $46 $48 $49 forward $9 $-1 #)
   (coedge $-1 -1 $-1 $34 $33 $15 $27 reversed $35 $-1 #)
   (edge $-1 -1 $-1 $50 -5 $51 5 $26 $52 forward @7 unknown #)
   (coedge $-1 -1 $-1 $17 $16 $53 $54 forward $6 $-1 #)
   (coedge $-1 -1 $-1 $55 $56 $16 $30 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $37 -5 $57 5 $29 $58 forward @7 unknown #)
   (coedge $-1 -1 $-1 $23 $59 $17 $32 reversed $13 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $36 5 $31 $61 forward @7 unknown #)
   (coedge $-1 -1 $-1 $26 $18 $59 $62 forward $35 $-1 #)
   (coedge $-1 -1 $-1 $18 $26 $55 $63 reversed $35 $-1 #)
   (loop $-1 -1 $-1 $-1 $33 $39 #)
   (vertex $-1 -1 $-1 $19 0 $64 #)
   (vertex $-1 -1 $-1 $19 1 $65 #)
   (straight-curve $-1 -1 $-1 15 11 17 0 1 0 I I #)
   (face $-1 -1 $-1 $-1 $35 $3 $-1 $66 reversed single #)
   (loop $-1 -1 $-1 $-1 $55 $20 #)
   (plane-surface $-1 -1 $-1 10 16 12 0 -1 0 0 0 -1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $67 $53 $56 $68 forward $21 $-1 #)
   (coedge $-1 -1 $-1 $59 $23 $24 $47 reversed $13 $-1 #)
   (coedge $-1 -1 $-1 $53 $67 $23 $45 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $60 -5 $69 5 $44 $70 forward @7 unknown #)
   (coedge $-1 -1 $-1 $25 $24 $67 $71 forward $9 $-1 #)
   (edge $-1 -1 $-1 $51 -5 $69 5 $43 $72 forward @7 unknown #)
   (coedge $-1 -1 $-1 $56 $55 $25 $49 reversed $40 $-1 #)
   (edge $-1 -1 $-1 $73 -5 $50 5 $48 $74 forward @7 unknown #)
   (vertex $-1 -1 $-1 $27 0 $75 #)
   (vertex $-1 -1 $-1 $62 1 $76 #)
   (straight-curve $-1 -1 $-1 15 11 7 0 -1 0 I I #)
   (coedge $-1 -1 $-1 $42 $44 $28 $54 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $60 5 $53 $77 forward @7 unknown #)
   (coedge $-1 -1 $-1 $48 $29 $34 $63 forward $40 $-1 #)
   (coedge $-1 -1 $-1 $29 $48 $42 $68 reversed $40 $-1 #)
   (vertex $-1 -1 $-1 $30 1 $78 #)
   (straight-curve $-1 -1 $-1 10 16 17 -1 0 0 I I #)
   (coedge $-1 -1 $-1 $31 $43 $33 $62 reversed $13 $-1 #)
   (vertex $-1 -1 $-1 $54 1 $79 #)
   (straight-curve $-1 -1 $-1 10 6 17 1 0 0 I I #)
   (edge $-1 -1 $-1 $36 -5 $51 5 $33 $80 forward @7 unknown #)
   (edge $-1 -1 $-1 $37 -5 $50 5 $34 $81 forward @7 unknown #)
   (point $-1 -1 $-1 15 6 17 #)
   (point $-1 -1 $-1 15 16 17 #)
   (plane-surface $-1 -1 $-1 15 11 12 -1 0 0 0 0 1 forward_v I I I I #)
   (coedge $-1 -1 $-1 $44 $42 $46 $71 reversed $21 $-1 #)
   (edge $-1 -1 $-1 $57 -5 $73 5 $56 $82 forward @7 unknown #)
   (vertex $-1 -1 $-1 $71 0 $83 #)
   (straight-curve $-1 -1 $-1 5 6 12 0 0 -1 I I #)
   (edge $-1 -1 $-1 $69 -5 $73 5 $67 $84 forward @7 unknown #)
   (straight-curve $-1 -1 $-1 10 6 7 -1 0 0 I I #)
   (vertex $-1 -1 $-1 $49 0 $85 #)
   (straight-curve $-1 -1 $-1 10 16 7 1 0 0 I I #)
   (point $-1 -1 $-1 15 16 7 #)
   (point $-1 -1 $-1 15 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 17 0 -1 0 I I #)
   (point $-1 -1 $-1 5 16 17 #)
   (point $-1 -1 $-1 5 6 17 #)
   (straight-curve $-1 -1 $-1 15 6 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 15 16 12 0 0 -1 I I #)
   (straight-curve $-1 -1 $-1 5 16 12 0 0 -1 I I #)
   (point $-1 -1 $-1 5 6 7 #)
   (straight-curve $-1 -1 $-1 5 11 7 0 1 0 I I #)
   (point $-1 -1 $-1 5 16 7 #)
 )
 *** *** End log *** ***
Bernd

ElpanovEvgeniy

  • Water Moccasin
  • Posts: 1568
  • Moscow (Russia)
Re: Versions of a format of the description 3dSolid
« Reply #14 on: January 10, 2022, 05:58:48 AM »
For my programs, I used this manual. This is not exactly the same format as in AutoCAD, but the description of the format helps a lot.