有没有一个函数可以将变量分别取0-7这八个中任意一个整数

mccad

[阿赖耶识]小七 (726628949)
2011-04-20 20:35:46
急求啊，有没有一个函数可以将变量分别取0-7这八个中任意一个整数

[zark] (5905531)

2011-04-20 20:35:59

 RAND

[阿赖耶识]小七 (726628949)

2011-04-20 20:36:22

真的么

[zark] (5905531)

2011-04-20 20:36:22

 (defun ZL-RAND ()
(/ (rem (getvar "CPUTICKS") 1984) 1983)
)

[JAY913]SagapoЖ (503268806)

2011-04-20 20:37:45

最大

[zark] (5905531)

2011-04-20 20:37:58

1984年出生的

[阿赖耶识]小七 (726628949)

2011-04-20 20:38:56

能将函数写小弟弟我么

[阿赖耶识]小七 (726628949)

2011-04-20 20:39:12

跪求

[zark] (5905531)

2011-04-20 20:39:15

小弟弟

[zark] (5905531)

2011-04-20 20:40:43

(defun ZL-RAND ()
(fix (* 7 (/ (rem (getvar "CPUTICKS") 1984) 1983)))
)

[zark] (5905531)

2011-04-20 20:40:53

 他要整数

[阿赖耶识]小七 (726628949)

2011-04-20 20:40:58

 恩恩

[ZZXXQQ] (1468225785)

2011-04-20 20:42:04

 (fix (* (ZL-RAND) 7))

[zark] (5905531)

2011-04-20 20:43:02

 这个可能是(0 7),达不到7吧

[阿赖耶识]小七 (726628949)

2011-04-20 20:43:14

 参数类型错误啊

[ZZXXQQ] (1468225785)

2011-04-20 20:43:38

 (fix (+ (* (ZL-RAND) 7) 0.5))