Zobrazit plnou verzi příspěvku: Příkaz _CIRCLE v LISPu

orlik
03.01.2008, 14:50
Na příkaz "shora" musím změnit program v LISPu, kde nemůžu vytvořit kružnici se středem bo3 a poloměrem 0.75mm (podle povelu)(command "_circle" bo3 "0.75")ale kružnici se středem bo3 a variabilním poloměrem, podle velikosti prostoru, kde má být díra vyvrtána. Částečně jsem to vyřešil příkazem(command "_circle" bo3 (getpoint))ale kružnici to vykreslí bez toho, aby viděl dopředu, jak velkou kružnici chci kreslit (podobně jako příkaz circle přímo v Acadu).Pomůže někdo? Díky.

Mantlík
03.01.2008, 15:15
použijte
 
(command "_circle" bo3 pause)
 
PAUSE znamená čekání na uživatelský vstup

orlik
04.01.2008, 07:04
Dik, funguje

Ferdinand
04.01.2008, 09:38
Pokud to má být variabilní poloměr, tak použít pro ten poloměr taky proměnnou
(command "_circle" bo3 RR)
Předpokládám, že
(setq P1 (getreal "\nZadej průměr otvoru: "))
(setq RR (/ P1 2))
(setq bo3 (getpoint "\nZadej střed otvoru: "))
Co myslíte tím "shora"?

orlik
07.01.2008, 07:25

Myslit tim to, ze ten program mam hotovy nekolik let, a pouzivam tam pro body vrtani fixni prumer 1.5mm, kterym prirazuji cisla bodu a tuto sestavu se souradnicema pak dostanou na dilne i s s vytiskem konkretniho dilu. Cisla otvoru jsem chytal pomoci uchop. bodu. Nyni chteji mit zahrnut i prumer vrtaku, kterym se dira muze jeste vrtat. A jelikoz nemame kotovane vykresy, musim zadavat prumery zkusmo. Cisla otvoru nyni musim urcovat vyberem konkretni kruznice. A jelikoz kod Lisp programu uz ma pres 1700 radku, vzdy mi trva nejakou dobu, nez se do nej opet dostanu. Proto mi to bylo trochu proti srsti, kdyz jsem dostal od samotneho vedouciho doporuceni, ze bych mel program upravit.Takze, jelikoz konstrukce nema cas na kotovani, odpada i to doporuceni o nacteni variabilniho prumeru, protoze jaky prumur muzu pouzit, dopredu nevim.
orlik2008-01-07 07:28:23