x       = shake128_hash( "" )
if $x != 7F9C2BA4E88F827D616045507605853ED73B8093F6EFBC88EB1A6EACFA66EF26
    ?
    pause
endif

x       = shake256_hash( "" )
if $x != 46B9DD2B0BA88D13233B3FEB743EEB243FCD52EA62B81B82B50C27646ED5762FD75DC4DDD8C0F200CB05019D67B592F6FC821C49479AB48640292EACB3B7C4BE
    ?
    pause
endif

x       = shake128_hash_init()
x       = shake128_hash_update( 12345678 )
x       = shake128_hash_dofinal( 32 )

x       = shake256_hash_init()
x       = shake256_hash_update( "" )
x       = shake256_hash_dofinal( 32 )

data    = 3333333333333333333333333333333333333333
x       = hmac_shake128( $data, 3344 )
x       = hmac_shake256( $data, 3344 )