Koordinasyon Blokları

[OneWay]

Herkese merhaba, forumda yeniyim ve bir problemim var:

Ben otocad ile arayüzler içeren basit bir otoit programı yaratıyorum, problem şu ki bir blok koordinatlarında otocad kesseydim, 'insertionpoint' bana boş bir değişken sunuyorum, x y z içeren çift değişken olduğunu biliyorum ama otoit the matrices are managed with a block, [] değil () Ben bu sorun olup olmadığını bilmiyorum, saygı bana aynı şekilde cevap verir, boş.

x y z ekstrapolating x y z olmayan iki değişkende var.

Form için teşekkür ederim ve özür dilerim belki biraz acele, ama zaman ve geç ve daha az ve daha az, herhangi bir öneri ve iyi kabul.

Selamlar:

 

[Shape]

Herkese merhaba, forumda yeniyim ve bir problemim var:

Ben otocad ile arayüzler içeren basit bir otoit programı yaratıyorum, problem şu ki bir blok koordinatlarında otocad kesseydim, 'insertionpoint' bana boş bir değişken sunuyorum, x y z içeren çift değişken olduğunu biliyorum ama otoit the matrices are managed with a block, [] değil () Ben bu sorun olup olmadığını bilmiyorum, saygı bana aynı şekilde cevap verir, boş.

x y z ekstrapolating x y z olmayan iki değişkende var.

Form için teşekkür ederim ve özür dilerim belki biraz acele, ama zaman ve geç ve daha az ve daha az, herhangi bir öneri ve iyi kabul.

Selamlar:

Addionpoint

varyant (üçlü çiftlerin üç boyutlu dizi); okuma
Addion noktasını temsil eden 3d wcs koordinatörü.

vba geri dönen değişken bir çift değil, değişken bir dizi 3 boyut, eksiyon = x ekleme noktası (1)=y addionpoint(2)=z>

Çift sadece matrix oluşturmak zorundaysanız kullanır

İyi iş

 

[OneWay]

Size teşekkür ederim, aslında vba onu yönetmek için bir sorun yok ama otoit aynı şey değil.

Ancak, seriyi 1-2-3’i eşsiz bir dize olarak yönetmenin bir yolu yoktur, belki de seriyi kapatan bir iç otocad komutla veya tek değişken x, y, x ölçekli faktör için z.

Bildiğiniz ve otoit kullanıyorsanız, kodu daha iyi anlamak için girebilirim.

Aynı zamanda getentity kullanmaya çalıştım ama aynı zamanda bu durumda ‘görün boş görünüyor’ ek değişkeni döndürür, çünkü gerçekte bunu bir dizi olarak yönetebilirim.

Bana, bu soruyu sorduğum üç forumda, bana cevap vermeye istekli olan tek kişisin.

 

[Shape]

Autocad ile nasıl başa çıkıyorsunuz?

Nasıl çalıştığını ve bıraktığımızı anlamak için iki satır yazın

 

[OneWay]

I pass a script in autoit the language I would like to use.

kod:
$acadapp = objget (")"autocad.application")
dim $sset, $ent
$acaddoc = $acadapp.activedocument
winactivate (acadapp.caption,$acaddoc.name)
$sset = $acaddoc.activeselectionset
$sset.selectonscreen
$ 1 için
Eğer $ent.entityname = "acdbblockreference" o zaman
msgbox(0), özel blok”, ölçeklix: " & $ent.xscalepha & @cr & _
"scaley: " & $ent.yscalepha & @cr & _
"scalez: " & $ent.zscalepha & @cr & _
"unita yanlış: " & $ent.insunits & @cr & _
"isim: " & $ent.name & @cr & _
"idobj: " & $ent.objectid & @cr & _
"nomeff: " & $ent. effectivename & @cr & _
"Doktor: " & $ent.insertionpoint & @cr & _
“Bölüm: " & $ent.layer & @cr & _
"Demek: " & $ent.mate & @cr & _
"Doktor: " & $ent.objectname"

msgbox (0"", "bloyu kaçırdın!" ve @cr & " tekrar sen şanslı olacaksın. " " ""
endif
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki

Her şeyden önce, bir otocad açmanız ve bir blok girmeniz gerekir, senaryonun yürütülmesinden sonra bloku seçersiniz ve özelliklerle bir kutu görünecektir.

göreceğiniz gibi $t.insertionpoint boş olacak, otoit the matrices manage with the matrices [] Ve değil (), ama $ent.insertionpoint[0]1, 2 bir hata yapar.

Muhtemelen bu bilgiyi bulamayacağınızı düşünmeye başladım, tüm diğerleri doğru gösteriliyorsa bile.

Teşekkür ederim önceden

 

[Shape]

Daha sonra otoit bilmiyorum ama prog indirdim ve diğerlerinden çok farklı görünmüyorum...

Bu arada görmeye çalışın


dim $myarray[10][20] 1. Sezon 1. Bölüm
$rows = ubound($myarray)
$cols = ubound($myarray, 2)
$dims = ubound($myarray, 0)

msgbox(0, " & $dims & "-boyutlu dizi", _
$rows & " rows, " & $cols & " columns"

;display $myarray'ın içeriği
$ $ = ""
$ = 0 to ubound($myarray,1) - 1
$ $ = $output & @lf
$c = 0 to ubound($myarray,2) - 1
$ $ = $yar & $myarray[$r][$c] " " ""
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
msgbox(4096,”array content”, $,)


Bir dizi olarak eklerseniz ve onu tekrarlamaya çalışırsanız belki işe yarıyor

 

[OneWay]

dunca, bana gönderdiğin kodi ile kartları karıştırmaya çalıştım ama ben nossun verileri üretmedim, amacın.

kod:
dim $myarray[10][20] 1. Sezon 1. Bölüm
$rows = ubound($myarray)
$cols = ubound($myarray, 2)
$dims = ubound($myarray, 0)

msgbox(0, " & $dims & "-boyutlu dizi", $rows & " satırlar, " & $cols & " columns")

;display $myarray'ın içeriği
$ $ = ""
$ = 0 to ubound($myarray,1) - 1
$ $ = $output & @lf
$c = 0 to ubound($myarray,2) - 1
$ $ = $yar & $myarray[$r][$c] Ve "
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
msgbox(4096,”array Content”, $,)



$acadapp = objget (")"autocad.application")
dim $sset, $ent, $ena

$acaddoc = $acadapp.activedocument
winactivate (acadapp.caption,$acaddoc.name)
$sset = $acaddoc.activeselectionset
$sset.selectonscreen

$ 1 için
Eğer $ent.entityname = "acdbblockreference" o zaman
msgbox(0) özelliklehe blokco",scalex: " & $ent.xscalepha & @cr & _
"scaley: " & $ent.yscalepha & @cr & _
"scalez: " & $ent.zscalepha & @cr & _
"unita yanlış: " & $ent.insunits & @cr & _
"nom: " & $ent.name & @cr & _
"idobj: " & $ent.objectid & @cr & _
"nomeff: " & $ent. effectivename & @cr & _
"Doktor: " & $ent.insertionpoint & @cr & _
“Bölüm: " & $ent.layer & @cr & _
"Demek: " & $ent.mate & @cr & _
"Doktor: " & $ent.objectname"
Başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka başka
msgbox (0", "hai mancato blok ilco!" & @cr & "riprova sarai più fortunato."
endif
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki



$myarray = $sset
$ $ = ""
$ = 0 to ubound($myarray,1) - 1
$ $ & = @lf
$c = 0 to ubound($myarray,2) - 1
$ $ & = $myarray[$r][$c] " " ""
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
Bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki bir sonraki
msgbox(4096,”array content”, $,)

Ayrıca $myarray = $man.insertionpoint yerine $myarray = $sset ama sonuç değişmiyor, dizi boş ortaya çıkıyor.

Başka bir şey, nesnenin mülkiyetinin isimlerini listeleyebilirsiniz, onları nesneden alın, e.g.

x ölçekli faktör
Insunits
katman tabaka katmanı

Bu yüzden ilk önce ne sorgulayabileceğiniz mülk ismini biliyorsunuz.

Yine de teşekkür ederim, sanki delik dışında bir örümcek alamayacağımızı hissediyorum.

 

[Shape]

Buradan çıkaracağım çünkü sinir alıyorum. .

Çözdüğünüzü bilmeme izin verin.

İyi şanslar. .

Aptal bir soru... neden otoit ve değil? Ya da belki ofisle bile içebileceğiniz daha iyi mi?

 

[OneWay]

Seni sinirlendiysem, benim niyetim değildi.

Birkaç yıl boyunca vsa kullanıyorum ve daha lezzetli bir şey istedim, çok ilginç ama arayüzleri kaçırdım, gui se non erro, ve diğer şeyler arasında ocx ve erkeklerine ihtiyaç duymama izin vereceğim.

Son şey, mülk isimlerini bir nesneden çıkarmak için, bana bir ipucu verebilir misiniz?

Selamlar.

 

[Shape]

Forse cos Lodge ce la fai....

Comando: (entget(car(entsel))

selezionare oggetto: (-1 . <nome 7eda9a80="" entità:="">(0 . "insert" (330 .
<nome 7efe3cf8="" entità:="">(5 . "26480") (100 . "acdbentity" (67 . 0) (410 .
"model") (8 . "0" (100 . "acdbblockreference") (66 . 1) (2 . "mar_pez") (10)
55048.5 1758.52 0.0) (41 . 15.0) (43 . 15.0) (50 . 0.0) (70 . 0)
(71 . 0) (44 . 0.0) (45 . 0.0) (210 0.0 1.0)

Görevi oğlumo i codici dxf degli oggetti. come vedi al codice 10 corrisponde punto di inserimento del blockco...

varlık grubu kodları
Grup Kodu Açıklama

-5


Uygulama: kalıcı reaktör zinciri

-4


Uygulama: koşullu operatör (yalnızca ssget ile kullanılır)

-3


Uygulama: genişletilmiş veriler (xdata) sentinel (fixed)

-2


Uygulama: varlık adı referans (fixed)

-1


Uygulama: varlık adı. Bu değişiklikler her seferinde bir çizim açılır. Asla kurtarılmıyor. (geçmiş)

0 0 0 0


Adım dizesi, varlık tipini gösterir (fixed)

1 1 1


Bir varlık için birincil metin değeri

2 2


Adı (attribute etiketi, blok adı ve benzeri)

3-4


Diğer metin veya isim değerleri

5 5


varlık idare eder. 16 hexadecimal basamaklarına kadar metin dizesi (fixed)

6 6


linetype name (fixed)

7 7 7


Text Style name (fixed)

8 8


Katman adı (Eklenmiş)

9 9


dxf: değişken isim tanımlayıcısı (yalnızca dxf dosyasının başlığında kullanılır).

10 10 10


birincil nokta. Bu bir çizgi veya metin varlığın başlangıç noktası, bir çemberin merkezi ve bu yüzden.
dxf: birincil noktanın x değeri (el ve z değer kodları 20 ve 30)
Uygulama: 3d noktası (üç gerçek listesi)

11-18


Diğer noktalar.
dxf: diğer noktaların x değeri (el değer kodları 21-28 ve z değer kodları 31-38)
Uygulama: 3d noktası (üç gerçek listesi)

20, 30


dxf: birincil noktanın y ve z değerleri

21-28, 31-37


dxf: diğer noktaların y ve z değerleri

38 38 38


dxf: varlık yükselti eğer nonzero değilse.

39 39


Varlıkın kalınlığı eğer nonzero (fixed)

40-48


yüzen nokta değerleri ( metin yüksekliği, ölçek faktörleri ve benzeri)

48


linetype ölçek. yüzen ölçeklendirme değeri. varsayılan değer tüm varlık türleri için tanımlanır.

49 49 49 49


Tekrarlanan yüzen nokta değeri. Birden fazla 49 grup değişken uzunluk tabloları için bir varlığında görünebilir ( ltype masasında dash uzunlukları gibi). 7x grubu her zaman masa uzunluğu belirtecek ilk 49 gruptan önce görünür.

50-58


açılar (Axf dosyalarına dereceler ve otolisp ve arx uygulamaları ile radians).

60 60 60


varlık görünürlüğü. tam değer. yokluğu veya 0 görünürlüğü gösterir; 1 inviability gösterir.

62


Renk numarası (Eklenmiş)

66 66 66 66


"yanıklar takip" bayrağı (geçmiş)

67


Uzay-Bu, model ya da kağıt alanı (fixed)

68 68 68


Uygulama: viewport'un tam olarak ekranda olup olmadığını tanımlayın; aktif değildir veya kapalıdır.

69 69 69 69


Uygulama: viewport kimlik numarası.

70-78


Tekrarlanan sayılar, bayrak bitleri veya modlar gibi tam değer

90-99


32-bit tam değer

100 100 100 100


alt sınıf veri işaretleyicisi (köpücü sınıf adı bir dize olarak). Başka bir beton sınıfından elde edilen tüm nesneler ve varlık sınıfları için aynı nesne için miras zincirindeki farklı sınıflar tarafından tanımlanan verileri ayrıştırmak için gereklidir.
Bu, arx'tan elde edilen her ayrı beton sınıf için dxf isimlerinin gerekliliğine ek olarak (sözlü işaretçilere bakınız).

102 102


Kontrol dizesi, takip et "{<arbitrary name="">" veya "}" xdata 1002 grubu koduna benzer, çünkü dize "{" ile başladığında, yorumların başvuruya devam ettiği eğlenceli bir dize tarafından takip edilebilir. Diğer izinli kontrol dizesi bir grup terminatör olarak "}"dir. Daha önce de belirtildiği gibi, autocad bu dizeleri çizim denetim operasyonları sırasında yorumlamaz; onlar başvuru kullanımı içindir.

105


dimvar sembolü masa girişi nesnesi

210 210


Frekans yönü (geçmiş).
dxf: Frekans yönünün x değeri
Uygulama: 3d627 yön vektör

220, 230


dxf: Tamamlama yönünden y ve z değerleri

280-289


8-bit tam değer

300-309


Keyif metin dizeleri

310-319


1004 grup kodu olarak aynı gösterimi ve sınırları olan rastgele ikili chunks: 254 karaktere kadar olan hexadecimal dizeleri, 127 bytes'e kadar veri kıvrımlarını temsil eder.

320-329


Keyif nesne idare eder. "as is" alınan değerleri ele alır. ekleme ve xref operasyonları sırasında tercüme edilmezler.

330-339


Yumuşak noktalı iş. Aynı dxf dosyası veya çizim içindeki diğer nesnelere hoş geldiniz. Ekle ve xref işlemleri sırasında tercüme edilir.

340-349


Sert noktalı iş. Aynı dxf dosyası veya çizim içindeki diğer nesnelere keyfi sert işaretçiler. Ekle ve xref işlemleri sırasında tercüme edilir.

350-359


Yumuşak sahipleri idare eder. Keyif yumuşak mülkiyet aynı dxf dosyası veya çizim içinde diğer nesnelere bağlantılar. Ekle ve xref işlemleri sırasında tercüme edilir.

360-369


Sert sahipleri idare eder. Aynı dxf dosyası veya çizim içindeki diğer nesnelere olan keyfi zor mülkiyet bağlantıları. Ekle ve xref işlemleri sırasında tercüme edilir.

999


dxf: 999 grup kodu aşağıdaki çizginin bir yorum dizesi olduğunu gösteriyor. dxfout bu tür grupları bir dxf çıktı dosyasında içermez, ancak dxfin onları onurlandırır ve yorumları görmezden gelir. 999 grubunu, düzenlemediğiniz bir dxf dosyasında yorumları içerecek şekilde kullanabilirsiniz.

1000 1000 1000


Ascii dizesi (uzun uzun süre 255’e kadar) genişletilmiş verilerde.

1001


Kayıtlı uygulama adı (ascii uzun süre 31'e kadar dize) genişletilmiş veriler için.

1002


genişletilmiş veri kontrol dizesi ("{"or ").

1003


genişletilmiş veri katmanı adı.

1004


Genişleştirilmiş verilerdeBytes (up to 127 bytes long)

1005


varlık genişletilmiş verilerde çalışır. 16 hexadecimal basamak

1010


genişletilmiş verilerde bir nokta
dxf: x değeri (1020 ve 1030 grup tarafından takip edilen)
Uygulama: 3d noktası

1020, 1030


dxf: Bir noktanın y ve z değerleri

1011


genişletilmiş verilerde 3d dünya alanı pozisyonu
dxf: x değeri (1021 ve 1031 gruplar tarafından takip edilen)
Uygulama: 3d noktası

1021, 1031


dxf: Bir dünya uzay pozisyonunun y ve z değerleri

1012


genişletilmiş verilerde 3d dünya alanı yer değiştirme
dxf: x değeri (1022 ve 1032 grup tarafından takip edilen)
Uygulama: 3d vektör

1022, 1032


dxf: Bir dünya uzay yerinden edilmenin y ve z değerleri

1013


genişletilmiş verilerde 3d dünya uzay yönü.
dxf: x değeri (1022 ve 1032 grup tarafından takip edilen)
Uygulama: 3d vektör

1023, 1033


dxf: Bir dünya uzay yönünden y ve z değerleri

1040


genişletilmiş veriler yüzen nokta değeri.

1041


genişletilmiş veri mesafe değeri.

1042


genişletilmiş veri ölçek faktörü.

1070


genişletilmiş veriler 16-bit tamsayı imzaladı.

1071


genişletilmiş veriler 32-bit uzun süre imzalanmıştır.</arbitrary></nome></nome>

 

[OneWay]

Sinirli olduğun iyi şey.

Bu komutu bulduğunuz cehennemin nerede olduğunu sormak istiyorum, ölümcül, aklında sahip olduğum başka bir projeye yeniden dönme arzusunu yeniden açtın, cmq.

30 yaptın, lütfen 31.

(entget(car(entsel)) > d:\xxx.txt dxf ccp cocococo.
Ne yapabileceğinizi söyleyin ve belki de nasıl, onunla zarar vermez.

Çıktıyı bir dosyaya yönlendirmek veya eğer videoya görünen verileri videoya alan vsa codun varsa

Çok fazla... Belki küçük bir chamo mil önce rahatlamak için.

 

[Shape]

Oraya atacağım. Ancak neden dosyayı oluşturan bir makro vsa başlatmak için otomatik olarak kullanmıyorsunuz ve sonra bunu geri yapmak için kullanmıyorsunuz?

 

[OneWay]

Ve evet, haklısın, çok fazla davranıyordum, ama seni bu son bilgiyi kırabilseydim neredeyse iyiydim.

Açıkça ben de düşünüyordum, vsa'dan daha fazla, stil eksikliği olsa da:

Otomatik olarak, dönüşte otoitten alınan bir txt üretiyor.

Tamam, deneyeceğim, umarım.

Size selamlıyorum ve size teşekkür ediyorum, size iyi haber vermek için sizi kızdırmayı umuyorum.

Merhaba ve teşekkür ederim.

 

[arri]

komut, micidiale,

Entget bir lisp işlevi
http://www.google.it/search?hl=it&q=entget+autolisp&meta=

 

[Shape]

(defun c:esportx ()
(setq filename "c:\creafile.txt")
(setq fr)
(setq listesi (entget (entsel)))
(Yaz-line (vl-princ-to-string list) fr)
(geçmiş)
)

rrpor66 sayesinde işlevin sonucunu kurtarmanın yolunu buldum (entget (car (entsel)) istediğiniz gibi dosyada.

 

[OneWay]

Merhaba, otolisp'in nasıl çalıştığını anlamakla meşguldüm ve sonunda bunu netleştirdim:

(entget(car(entsel))
(setq x (cdr (assoc 2 entlist)))
(= x "sk")
(
(setq f(open "d:\\\xgiga.txt" "w")
(Yaz-line (rtos(cadr(assoc 10 entlist))) 2) f)
(Yaz-line (rtos(caddr(assoc 10 entlist) 2) f)
(geçmiş f)
)
"Hayır."
)

Neredeyse çalışıyordum, sonra kapalı ve yeniden açıldım ve büyüye göre artık liste 2 (assoc 2 entlist) değerini çekemem.
İşte o zaman blok adı.
Neredeyse panikliyim, değiştirirseniz bir kod her zaman aynı şekilde tepki vermeli veya değil mi?

bon, benim için güzel bir tisana ve sakince kodunuzu deneyin.

Benim kodumla neyin yanlış olduğunu düşünüyorsunuz.

 

[OneWay]

Oh lsp'e ne cevap vereceğini bilmiyorum, esportx komutunu takip ediyorum ve bana nil cevap veriyor! Sanırım null demektir.

Gerektiğinde otocad 2008 kullanın.

Ben denemeye devam edeceğim, adam.

 

[Shape]

otolisp benim günlük ekmek değil... Ben vsa ile en iyi kabloyum...rrpor66 ne sa mollto... onu pvt'te bir msg gönderiyor ve o zaman size cevap veriyor

Ama sonra özür dilerim

Eğer gönderdiğim kod sizi doğru bir şekilde kurtarırsa tüm liste

Biliyorsun biliyorsun

(10 55048.5 1758.52 0.0) koordinatlar

dizeyi manipüle etmek ve değerleri x y z'ye dönüştürmek için otomatik kullanın

 

[OneWay]

Yokluğum seni unutmadım, (Evde problemler, heitis ile oğul, mutlak öncelik).

Bu yüzden inceledim, karışık karışım, iki buz küp ekledim ve bu çıktı:

(setq listesi (entget (entsel)))
(setq xx (rtos(cadr(assoc 10 liste)) 2))
(setq yy (rtos(caddr(assoc 10 liste)) 2))
(setq sk (cdr(assoc 2 liste)))
(setq filename "d:/xxxx.txt")
(setq fr)
(If (= sk "sk")
(Yazılı yy fr)
(Yaz-line xx fr)
"Hayır"
(geçmiş)

Sonuç, iki satır metin x ve y ile bir dosyadır, sadece bir şeyi özledim, çünkü bir hata ürettiği her şeyi seçemem:

nesne seçin: hata: yanlış konu türü: lentityp nil

Bunu nasıl durduracağımı anlamalıyım, stüdyo hala uzun.

Her neyse, sana yardım için teşekkür etmeliyim ve bana verdiğim zaman.

Eğer ve başarılı olduğumda bunu bu yazıya ekleyeceğim, başka birine hizmet edebilir.

rrport66 sunacak, teşekkür ederim
Yemin ederim