Kamil Hronovský
11.07.2013, 15:32
Zdravím,je nějaký rozdíl v funkčnosti lispu mezi 2013 a 2014?mám takovýhle prográmek, který čísluje body - nakreslí kružnici a osadí blok s číslem které se inkrementálně zvyšuje o 1. Ve verzi 2014 ale nečísluje - vyskočí tabulka "Zadejte atributy" a atribut je přednastaven vždy na 1.;*; PRIKAZ "vykot" VYPISUJE CISLO BODU DO KROUZKU; vhodne pro posloupnost cislovani napr: vytycovaciho schematu;___________________________________________________________________________;**(defun c:vykot ()(setvar "cmdecho" 0) (setvar "expert" 2);****** meritko ******************************************** (setq meritko (getreal "\nZadej meritko pro vykresleni vykresu - 1:<100> : ")) (if (= meritko nil) (setq meritko 100.0)) (setq nasobek (* meritko 1));****** reseni **********************************************************(setq cislo (getint "\nCISLOVANI OD : "))(setq natoc(getreal "\nNATOCENI TEXTU:"))(setq r (* nasobek 0.5))(while (setq bod (getpoint "\nBod popisu do krouzku : ")) (command "_circle" bod r) (command "_insert" "cislo" pause nasobek nasobek natoc cislo) (setq cislo (+ cislo 1)))(setvar "cmdecho" 1) (setvar "expert" 1))díky za pomoc