12 lines
272 B
Plaintext
Executable file
12 lines
272 B
Plaintext
Executable file
0 const CHUCK-GONE
|
|
1 const CHUCK-SEARCH
|
|
2 const CHUCK-FOLLOW
|
|
3 const CHUCK-HOME
|
|
var chuck.state
|
|
|
|
16 18 W ' {horse} defentity p_chuck
|
|
:noname
|
|
:| player yield
|
|
chuck.state @ CHUCK-FOLLOW = if p_chuck yield then
|
|
done |; ' party redefine
|
|
; ' onload redefine |