CAD tip # 1365:

Otázka

CAD

% platforma kategorie

Jak vygenerovat pomocí AutoLISPu náhodné číslo?

Použijte následující funkci LISP generátoru pseudonáhodného čísla:

(defun rnd (/ modulus multiplier increment random)
  (if (not seed)
    (setq seed (getvar "DATE"))
  )
  (setq modulus    65536
        multiplier 25173
        increment  13849
        seed  (rem (+ (* multiplier seed) increment) modulus)
        random     (/ seed modulus)
  )
)

Každé zavolání funkce (rnd) pak vrátí pseudonáhodné číslo z intervalu (0,1). Pro celá čísla od 0 do 20 tedy např. použijte (fix(* 20 (rnd))).

ACAD

*CAD

1.6.2001 4033×

lisp

Připomínky Přeposlat

Zaslat obchodní dotaz

Související CAD produkty:

AutoCAD

tento tip od ARKANCE platí pro: AutoCAD ·

ArkanceCZ

Vybíráme: Zobrazení ozubení v bokorysu ozubeného kola.

Zprávy: Autodesk Flex (platba za použití) je nyní ještě dostupnější

Zpět Všechny další tipy

Problém aplikování SP2 pro Autodesk Inventor. « | » Jak zakódovat LSP program aby jej nebylo možné editovat?

Pomohl vám tento tip? Provoz služby CADForum.cz podpoříte i nákupem produktů Autodesk u provozovatele tohoto serveru a Platinum partnera Autodesku, firmy ARKANCE.
Můžete si také přidat odkaz na vaše stránky:

Text:

FAQ

Tipy a triky prosím využívejte na vlastní zodpovědnost.
Provozovatel (Arkance Systems CZ s.r.o.) nenese odpovědnost za případné potíže vzniklé v souvislosti s použitím kteréhokoliv z uvedených tipů.
Pro plné zvládnutí dané aplikace doporučujeme absolvování některého z nabízených CAD školení.
Další publikování obsahu je dovoleno jen se souhlasem autora.

CADfórum

Tipy, triky, podpora, pomoc a rady pro AutoCAD, LT, Inventor, Revit, Map, Civil 3D, 3ds Max, Fusion, Forma, Vault, PowerMill a další Autodesk aplikace (community support firmy ARKANCE). Viz O portálu.

ARKANCE CZ/SK (CAD Studio) - Autodesk Platinum Partner & Training Center & Services Partner

KONTAKT:
webmaster.cz@arkance.world | tel. +420 910 970 111



právě nás čte: 8126