一个好玩的fish例子哈，点哪哪红喔 yellow blue
这是彭老师书上的\(^o^)/~new
gen zone brick
m e
prop she 1e4bulk 1e6 dens 2000
set grav 10
fix x y z range z 0
plot bloc model yellow red blue axes white
plot set rotation 20 0 30
plot set center auto
def leftdblclick
i=mclickx
j=mclicky
k=mclickz
ii=out ('左击（' +string(i) + ',' +string(j) + ' , ' +string(k) +
')')
zpnt=z_near (i,j,k)
if zpnt #null then
zid=z_id(zpnt)
ii=out( '单元体 zid号= ' + ' '+string(zid))
command
m m range id zid
endcommand
endif
end
;
def rightdblclick
i=mclickx
j=mclicky
k=mclickz
ii=out('左击（' +string(i) + ' , ' +string(j) + ' , ' +string(k) + '
) ' )
zpnt=z_near(i,j,k)
if zpnt #null then
zid=z_id(zpnt)
ii=out('单元体 zid号 = ' + ' ' +string(zid))
command
model ssoft range id zid
endcommand
endif
end
set fishcall 14 leftdblclick
set fishcall 15 rightdblclick
页:
[1]