Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (class +ActorModel +Entity)
- (rel id (+Key +Number)) # object ID, could be left out
- (rel good (+Ref +Number)) # some value
- (rel bad (+Ref +Number)) # some other value
- (rel bigger (+List +Link) smaller (+ActorModel)) # objects with more 'good go here
- (rel smaller (+List +Link) bigger (+ActorModel)) # objects with more 'bad go here
- (dm check> ()
- (here goes code for selecting another object, with 'rand or lookup in 'collect, +Link, whatever, comparisons like '(> (get This 'good) (get Other 'good)) and setters for relations depending on comparison)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement