842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
|
object; objects which no longer exist still compare correctly. Values
of two different types are never equal to each other.
FlushClass ( class -- ) **
Resets the Arrived, Busy, Departed, Inertia, Moved, and UserSignal flags
of all objects of the specified class to zero. If the class is -1, then
all objects are flushed in this way, and during the input phase, it also
skips the other phases similarly to IgnoreKey if the class is -1.
FlushObj ( -- ) **
Resets this object's Arrived, Departed, Inertia, Moved, and UserSignal.
,FlushObj ( obj -- ) **
Resets the Arrived, Busy, Departed, Inertia, Moved, and UserSignal flags
of the specified object only.
|
|
|
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
|
object; objects which no longer exist still compare correctly. Values
of two different types are never equal to each other.
FlushClass ( class -- ) **
Resets the Arrived, Busy, Departed, Inertia, Moved, and UserSignal flags
of all objects of the specified class to zero. If the class is -1, then
all objects are flushed in this way, and during the input phase, it also
skips the beginning and ending phases if the class is -1.
FlushObj ( -- ) **
Resets this object's Arrived, Departed, Inertia, Moved, and UserSignal.
,FlushObj ( obj -- ) **
Resets the Arrived, Busy, Departed, Inertia, Moved, and UserSignal flags
of the specified object only.
|
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
|
lor ( in1 in2 -- out )
Logical OR.
LoseLevel ( -- )
Ends all execution and results in loss of game.
lsh ( in shift -- out )
Left shift.
lt ( in1 in2 -- bool )
Test if first input is less than second input (unsigned).
,lt ( in1 in2 -- bool )
Test if first input is less than second input (signed).
|
|
>
|
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
|
lor ( in1 in2 -- out )
Logical OR.
LoseLevel ( -- )
Ends all execution and results in loss of game.
lsh ( in shift -- out )
Left shift. If the shift amount is out of range 0-31, all bits are
shifted out, and the result is zero.
lt ( in1 in2 -- bool )
Test if first input is less than second input (unsigned).
,lt ( in1 in2 -- bool )
Test if first input is less than second input (signed).
|
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
|
at the end of a code block.)
rot ( x y z -- y z x )
-rot ( x y z -- z x y )
rsh ( in shift -- out )
Logical right shift.
,rsh ( in shift -- out )
Arithmetic right shift.
Self ( -- obj )
The reference to the current object.
Send ( message arg1 arg2 -- value )
Similar to ,Send but this object sends the message to itself.
|
|
>
|
>
>
|
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
|
at the end of a code block.)
rot ( x y z -- y z x )
-rot ( x y z -- z x y )
rsh ( in shift -- out )
Logical right shift. If the shift amount is out of the range 0-31,
then all bits are shifted out and the result is zero.
,rsh ( in shift -- out )
Arithmetic right shift. If the shift amount is out of the range 0-31,
then all bits are shifted out; the result will be -1 if the input is
negative, or 0 otherwise.
Self ( -- obj )
The reference to the current object.
Send ( message arg1 arg2 -- value )
Similar to ,Send but this object sends the message to itself.
|
1480
1481
1482
1483
1484
1485
1486
1487
|
that Inertia is not reset.
* Some bits are masked out of the return value from HIT and HITBY.
* Many variables are limited to 16-bits.
* Moving objects is not allowed during LASTIMAGE processing.
|
>
>
|
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
|
that Inertia is not reset.
* Some bits are masked out of the return value from HIT and HITBY.
* Many variables are limited to 16-bits.
* Moving objects is not allowed during LASTIMAGE processing.
* The way that the trigger phase works is different.
|