16 lines
766 B
Plaintext
16 lines
766 B
Plaintext
|
<EFBFBD><EFBFBD> v e r s i o n = 2
|
|||
|
|
: i f : < r e g i s t e r . r e g i s t e r e d ( t k e y c o u n t ) > = f a l s e
|
|||
|
|
@ r e g i s t e r . r e g i s t e r ( t k e y c o u n t , i n t , 0 )
|
|||
|
|
: e n d i f
|
|||
|
|
|
|||
|
|
: i f : < r e g i s t e r . r e g i s t e r e d ( t a n o b y k e y d o n e ) > = t r u e
|
|||
|
|
@ e n t i t y . w a r p ( 0 , 3 , - 0 . 3 , 0 )
|
|||
|
|
@ e n t i t y . w a r p ( 1 , 0 , - 0 . 3 , 2 )
|
|||
|
|
@ e n t i t y . w a r p ( 2 , 6 , - 0 . 3 , 2 )
|
|||
|
|
@ e n t i t y . w a r p ( 3 , 1 , - 0 . 3 , 4 )
|
|||
|
|
@ e n t i t y . w a r p ( 4 , 1 , - 0 . 3 , 6 )
|
|||
|
|
@ e n t i t y . w a r p ( 5 , 5 , - 0 . 3 , 4 )
|
|||
|
|
@ e n t i t y . w a r p ( 6 , 5 , - 0 . 3 , 6 )
|
|||
|
|
: e n d i f
|
|||
|
|
@ r e g i s t e r . c h a n g e ( t k e y c o u n t , 0 )
|
|||
|
|
: e n d
|