|
发表于 2015-4-21 21:26:33
|
显示全部楼层
本帖最后由 panxixue 于 2015-4-21 22:59 编辑
占座,一会儿放作业,谢谢罗老师!
第一个:
axlCmdRegister("myfifthskill" 'myfifthskillFunc)
procedure(
myfifthskillFunc(num)
sprintf(string,"The Number %d is an odd",num);
when(oddp(num) == t axlUIConfirm(string));
);end procedure
第二个
axlCmdRegister("mysixthskill" 'mysixthskillFunc)
defun(
mysixthskillFunc ( @key (height 161) (name ""))
when(height > 160 axlUIConfirm(sprintf(nil,"height is more than 160")));
when(height == 160 axlUIConfirm(sprintf(nil,"height is equal to 160")));
when(height < 160 axlUIConfirm(sprintf(nil,"height is less than 160")));
when(name == "" axlUIConfirm(sprintf(nil,"input your name!")));
);end defun
再问罗老师,when之后没有else吗,只能一直when...吗
|
|