Step 5, play on chain and off chain distribute rewards, allowing the framework to actually be used (#49)

* WIP rearranging slashing

* Seems to be back

* One more step: recognizing the move coming back from on chain that corresponds with the prior synchronization.  We know stop at a move launched in response to having successfully recognized the other player's on chain move and need to reconcile our own turn with it.

* WIP Checkpointing a lot of construction.  We're doing the first native on chain move but args isn't aligned with the max move size we need.  Investigating

* Hold the program in GameHandler via rc

* I feel like things are getting under control

* removed a hack, better

* Reaching accept state on chain

* Prepare for clippy and fmt

* Checkpoint clippy+fmt

* WIP: Loops closed.  We send accept and shutdown down the pipe and finish the simulation.  Needed: verify outputs from referee (including check that mover shares total up properly in all cases), refactor how to call referee's verify method.

* 1 remaining test failure which needs me to combine the validator args parameter objects and make a nice method of referee that gives one

* fmt

* clippy

* fmt

* clippy

* Fix referee slash test

* Fix up wasm

* add decoding of the game outcome to the piss_off_peer_complete test.  we need to ensure the correct side won the channel content

* WIP, zeroing in on mover share

* Make one move

* suspend

* Take other branch

* fmt

* fmt+clippy

* fmt+clippy

* fmt+clippy

* Fix wasm

* wip

* add

* One more

* separate function to start on chain transition

* Can be said to be 'working' for the first time.

* lint

* fmt

* mask sim-tests feature

* api drift

* Add some commentary, align results to what should be expected (more tests required)

* Give a name to index and card

* Start removing diagnostics aids

* remove more diagnostics

* Remove more

* Removing nodeptr from potentially stored values

* Convert more clvm data to durable storage

* Convert more storage

* fmt

* Squeeze out more NodePtr storage

* Convert containers of big puzzle and program objects to Rc

* Fix wasm

* Fix wasm

* Start pulling up referee

* Branch

* All tests pass

* Add remove stray

* Fixed this

* Missed rebuild, propogate

* remove diagnostics from chialisp

Author: prozacchiwawa

clsp/calpoker_generate.clinc

@@ -52,10 +52,22 @@
             (curry calpoker_alice_driver_c PREIMAGE move) PREIMAGE)
 )
 
+(defun single-byte (raw-indices)
+    (if raw-indices
+        (assign
+            indices-len (strlen raw-indices)
+            (substr raw-indices (- indices-len 1) indices-len)
+        )
+        0x00
+    )
+)
+
 (defun bitify (mylist)
-    (if (not mylist)
-        0
-        (logior (f mylist) (lsh (bitify (r mylist)) 1))
+    (single-byte 
+        (if (not mylist)
+            0
+            (logior (f mylist) (lsh (bitify (r mylist)) 1))
+        )
     )
 )
 
@@ -84,13 +96,13 @@
     (if (not mylist)
         0
         (= (f mylist) index)
-        (logior 1 (* 2 (indices_to_bitfield_inner (r mylist) (+ index 1))))
-        (* 2 (indices_to_bitfield_inner mylist (+ index 1)))
+        (logior 1 (lsh (indices_to_bitfield_inner (r mylist) (+ index 1)) 1))
+        (lsh (indices_to_bitfield_inner mylist (+ index 1)) 1)
     )
 )
 
 (defun indices_to_bitfield (mylist)
-    (indices_to_bitfield_inner mylist 0)
+    (single-byte (indices_to_bitfield_inner mylist 0))
 )
 
 ; We have composed cards as sublists but need them as pairs.
@@ -108,14 +120,16 @@
         bob_all_cards (map make_card (append bob_cards_bob my_cards_bob))
         (my_hand_value my_picks) (handcalc (map card_list_to_pair my_all_cards))
         (bob_hand_value bob_picks) (handcalc (map card_list_to_pair bob_all_cards))
+        ;; win_result is 1 if my_hand_value is greater than bob_hand_value
         win_result (list_compare my_hand_value bob_hand_value)
+        ;; split is captured in a their turn handler below so it's the opposite of what
+        ;; this turn would specify.
         split (if (= win_result 1) 0 (= win_result 0) (lsh amount -1) amount)
         (list MAKE_MOVE
             (list move (indices_to_bitfield my_picks) (indices_to_bitfield bob_picks)
                 my_hand_value bob_hand_value win_result)
-            (lambda ((& MY_SALT MY_PICKS split)) (list (concat MY_SALT MY_PICKS) 0 0 0 0 split 0 0)
+            (lambda ((& MY_SALT MY_PICKS my_picks split amount)) (list (concat MY_SALT MY_PICKS (single-byte (indices_to_bitfield my_picks))) 0 0 0 0 split 0 0))
             0
-            )
         )
     )
 )
@@ -192,7 +206,7 @@
             pokere
             pokere_hash
             (list my_move (list ALICE_CARDS BOB_CARDS) ALICE_COMMIT_2)
-            17
+            18
             0
             calpoker_bob_driver_e
             0
@@ -206,19 +220,21 @@
 (defun calpoker_bob_driver_e (amount (@ state (bob_selects (alice_cards bob_cards) alice_commit_2)) move
         validation_program_hash max_move_size split)
     (assign
-        alice_selects (substr move 16 (strlen move))
-        (alice_cards_alice alice_cards_bob) (split_cards alice_selects alice_cards)
+        alice_my_picks (substr move 16 17)
+        alice_selects (substr move 17 (strlen move))
+        (alice_cards_alice alice_cards_bob) (split_cards alice_my_picks alice_cards)
         (bob_cards_bob bob_cards_alice) (split_cards bob_selects bob_cards)
         alice_all_cards (map make_card (append alice_cards_alice bob_cards_alice))
         bob_all_cards (map make_card (append bob_cards_bob alice_cards_bob))
         (alice_hand_value alice_picks) (handcalc (map card_list_to_pair alice_all_cards))
         (bob_hand_value bob_picks) (handcalc (map card_list_to_pair bob_all_cards))
         win_result (list_compare alice_hand_value bob_hand_value)
+        ;; win_result 1 means alice wins.
         correct_split (if (= win_result 1) 0 (= win_result 0) (lsh amount -1) amount)
         (if (!= split correct_split)
             (list SLASH (indices_to_bitfield bob_picks))
             (list MAKE_MOVE
-                (list alice_selects (indices_to_bitfield bob_picks) (indices_to_bitfield alice_picks)
+                (list alice_my_picks (indices_to_bitfield bob_picks) (indices_to_bitfield alice_picks)
                     bob_hand_value alice_hand_value split)
             )
         )

clsp/calpoker_include.clsp

@@ -7,108 +7,110 @@
 (export calpoker_template)
 
 (defun find-key-in-params (key params)
-  (if (and params (= (f (f params)) key))
-      (r (f params))
-      (find-key-in-params key (r params))
-      )
-  )
+    (if (and params (= (f (f params)) key))
+        (r (f params))
+        (find-key-in-params key (r params))
+    )
+)
 
 (defun maybe-default (setting default-setting)
-  (i setting setting default-setting)
-  )
+    (i setting setting default-setting)
+)
 
 (defun validation-program-of-template ((_ _ _ _ _ p)) p)
 
+(defun validation-program-hash-of-template ((_ _ _ _ _ _ p)) p)
+
 (defun max-move-size-of-template ((_ _ _ _ m)) m)
 
-(defun calpoker_factory (amount my_contribution params)
-  (assign
+(defun calpoker_factory (i_am_initiator my_contribution their_contribution params)
+    (assign
+        template (calpoker_template)
 
-   template (calpoker_template)
+        amount (+ my_contribution their_contribution)
 
-   their-contribution (- amount my_contribution)
+        (assert
+            (= my_contribution (/ amount 2))
 
-   (assert
+            (list
+                ;; My turn games
+                (list
+                    ;; One game
+                    (list
+                        ;; Amount
+                        amount
 
-    (= my_contribution (/ amount 2))
+                        ;; My turn
+                        1
 
-    (list
-     ;; My turn games
-     (list
-      ;; One game
-      (list
-       ;; GameID - will be replaced by caller
-       ()
-       ;; Amount
-       amount
+                        ;; Handler
+                        (f template)
 
-       ;; Handler
-       (f template)
+                        ;; My contribution this game
+                        my_contribution
+                        ;; Their contribution
+                        their_contribution
 
-       ;; Timeout, specified as 0 since we'll populate it above
-       ()
+                        ;; Initial validation program
+                        (validation-program-of-template template)
 
-       ;; My contribution this game
-       my_contribution
-       ;; Their contribution
-       their-contribution
+                        ;; Hash of initial validator program
+                        (validation-program-hash-of-template template)
 
-       ;; Initial validation program
-       (validation-program-of-template template)
+                        ;; Initial state
+                        ()
 
-       ;; Initial state
-       ()
+                        ;; Initial move
+                        ()
 
-       ;; Initial move
-       ()
+                        ;; Initial max move size
+                        (max-move-size-of-template template)
 
-       ;; Initial max move size
-       (max-move-size-of-template template)
+                        ;; Initial mover share
+                        0
+                    )
+                )
 
-       ;; Initial mover share
-       amount
-       )
-      )
+                ;; Their turn games
+                (list
+                    ;; One game
+                    (list
+                        ;; Amount
+                        amount
 
-     ;; Their turn games
-     (list
-      ;; One game
-      (list
-       ;; GameID - will be replaced by caller
-       ()
-       ;; Amount
-       amount
+                        ;; Their turn
+                        ()
 
-       ;; Handler
-       (f (r template))
+                        ;; Handler
+                        (f (r template))
 
-       ;; Timeout - specified as zero here since we'll fix it above.
-       ()
+                        ;; My contribution this game
+                        their_contribution
+                        ;; Their contribution
+                        my_contribution
 
-       ;; My contribution this game
-       their-contribution
-       ;; Their contribution
-       my_contribution
+                        ;; Initial validation program
+                        (validation-program-of-template template)
 
-       ;; Initial validation program
-       (validation-program-of-template template)
+                        ;; Hash of initial validator program
+                        (validation-program-hash-of-template template)
 
-       ;; Initial state
-       ()
+                        ;; Initial state
+                        ()
 
-       ;; Initial move
-       ()
+                        ;; Initial move
+                        ()
 
-       ;; Initial max move size
-       (max-move-size-of-template template)
+                        ;; Initial max move size
+                        (max-move-size-of-template template)
 
-       ;; Initial mover share
-       ()
-       )
-      )
-     )
+                        ;; Initial mover share
+                        0
+                    )
+                )
+            )
+        )
     )
-   )
-  )
+)
 
 (export calpoker_factory)

clsp/calpoker_include_calpoker_factory.hex

@@ -1 +1 @@
-a024e6d61c722329f072f49807b92a92137007a48efa8990a8a8e892a07302a60c
+a0acd32980d4db741d89e6bd22fac8bcf868236353632429ae7e2aaa6983299555

clsp/calpoker_include_calpoker_factory_hash.hex

@@ -1 +1 @@
-a0a67bd98df995843ce7455e32c980b1313f06f9095c4ebd3d93ee2225aed3b480
+a0cccaed2b69d77e540361ba2fd5d2b1ad6641553f0ca12352c88ee2e620343fd4

clsp/calpoker_include_calpoker_template.hex

@@ -9,9 +9,10 @@
 ; state is empty
 ; move is alice commit to a salted word
 ; evidence is empty
-(export (mod_hash (move new_validation_hash max_move_size mover_share previous_validation_hash 
+; ME below is the object whose hash is mod_hash
+(export (mod_hash (move new_validation_hash mover_share previous_validation_hash 
     mover_puzzle_hash waiter_puzzle_hash amount timeout max_move_size referee_hash) 
-    state me mover_puzzle solution evidence)
+    state me previous_validation_program mover_puzzle solution evidence)
 
     (if_any_fail
         (= new_validation_hash (sha256 bhash (sha256 1 move)))

clsp/calpoker_include_calpoker_template_hash.hex

@@ -1 +1 @@
-ff02ffff03ffff02ffff03ffff09ff15ffff0bffff01a017bebec00518a344e6689c1eb49da0fed674d08685e408a99cd1e070972fb6f4ffff0bffff0101ff09808080ffff01ff02ffff01ff02ffff03ffff09ffff0dff0980ffff012080ffff01ff02ffff01ff09ff2dffff011080ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff01ff02ffff01ff0880ff0180ffff01ff02ffff01ff0180ff018080ff0180
+ff02ffff03ffff02ffff03ffff09ff15ffff0bffff01a058adc514078f82ecf3819caa0309a59cc8815f47d3a64e096704599eec459d81ffff0bffff0101ff09808080ffff01ff02ffff01ff02ffff03ffff09ffff0dff0980ffff012080ffff01ff02ffff01ff09ff820bfdffff011080ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff01ff02ffff01ff0880ff0180ffff01ff02ffff01ff0180ff018080ff0180

clsp/onchain/calpoker/a.clsp

@@ -10,9 +10,9 @@
 ; state is alice's commit
 ; move is bob's seed
 ; evidence is empty
-(export (mod_hash (move new_validation_hash max_move_size mover_share previous_validation_hash 
+(export (mod_hash (move new_validation_hash mover_share previous_validation_hash 
     mover_puzzle_hash waiter_puzzle_hash amount timeout max_move_size referee_hash) 
-    alice_commit me mover_puzzle solution evidence)
+    alice_commit me previous_validation_program mover_puzzle solution evidence)
     (if_any_fail
         (= new_validation_hash (sha256 chash (shatree (list alice_commit move))))
         (= (strlen move) 16)

clsp/onchain/calpoker/a.hex

@@ -1 +1 @@
-ff02ffff01ff02ffff03ffff02ffff03ffff09ff2bffff0bffff01a0d76b54b465224694d5b6f7f3165668b705fc87c0d6c5dd039041b1c164d479b8ffff02ff02ffff04ff02ffff04ffff04ff17ffff04ff13ffff01808080ff808080808080ffff01ff02ffff01ff02ffff03ffff09ffff0dff1380ffff011080ffff01ff02ffff01ff09ff5bffff013080ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff01ff02ffff01ff0880ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff04ffff01ff02ffff03ffff07ff0580ffff01ff02ffff01ff0bffff0102ffff02ff02ffff04ff02ffff04ffff05ff0580ff80808080ffff02ff02ffff04ff02ffff04ffff06ff0580ff8080808080ff0180ffff01ff02ffff01ff0bffff0101ff0580ff018080ff0180ff018080
+ff02ffff01ff02ffff03ffff02ffff03ffff09ff2bffff0bffff01a044cb615df45187c99eb1ace0903b97e85460bfd22f7852fb8ac95e486949e699ffff02ff02ffff04ff02ffff04ffff04ff17ffff04ff13ffff01808080ff808080808080ffff01ff02ffff01ff02ffff03ffff09ffff0dff1380ffff011080ffff01ff02ffff01ff09ff8217fbffff013080ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff01ff02ffff01ff0880ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff04ffff01ff02ffff03ffff07ff0580ffff01ff02ffff01ff0bffff0102ffff02ff02ffff04ff02ffff04ffff05ff0580ff80808080ffff02ff02ffff04ff02ffff04ffff06ff0580ff8080808080ff0180ffff01ff02ffff01ff0bffff0101ff0580ff018080ff0180ff018080

clsp/onchain/calpoker/b.clsp

@@ -12,17 +12,16 @@
 ; state is alice's commit and bob's seed
 ; move is alice's reveal of her card generating seed and her commit to which cards she's picking
 ; evidence is empty
-(export (mod_hash (move new_validation_hash max_move_size mover_share previous_validation_hash 
-    mover_puzzle_hash waiter_puzzle_hash amount timeout max_move_size referee_hash) 
-    (alice_commit bob_seed) me mover_puzzle solution evidence)
+(export (@ all_args (mod_hash (move new_validation_hash mover_share previous_validation_hash
+    mover_puzzle_hash waiter_puzzle_hash amount timeout max_move_size referee_hash)
+    (alice_commit bob_seed) me previous_calidation_program mover_puzzle solution evidence))
     (if_any_fail
         (= (strlen move) 48)
         (= (sha256 (substr move 0 16)) alice_commit)
-        (= new_validation_hash (sha256 dhash (shatree (list (make_cards 
+        (= new_validation_hash (sha256 dhash (shatree (list (make_cards
             (sha256 (substr move 0 16) bob_seed amount)) (substr move 16 48)))))
         (= max_move_size 1)
         0
         (x)
     )
 )
-

clsp/onchain/calpoker/b.hex

@@ -1 +1 @@
-ff02ffff01ff02ffff03ffff02ffff03ffff09ffff0dff1380ffff013080ffff01ff02ffff01ff02ffff03ffff09ffff0bffff0cff13ffff0180ffff01108080ff2780ffff01ff02ffff01ff02ffff03ffff09ff2bffff0bffff01a0a26f665f62b95611287a458c9e63ed131d9a364355e336c991857dfd1e8da690ffff02ff3effff04ff02ffff04ffff04ffff02ff3cffff04ff02ffff04ffff0bffff0cff13ffff0180ffff011080ff57ff820bfb80ff80808080ffff04ffff0cff13ffff0110ffff013080ffff01808080ff808080808080ffff01ff02ffff01ff09ff5bffff010180ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff01ff02ffff01ff0880ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff04ffff01ffffffff02ffff03ffff09ff0bffff010180ffff01ff02ffff01ff02ff28ffff04ff02ffff04ffff06ff0180ffff04ffff14ff17ff0580ff8080808080ff0180ffff01ff02ffff01ff02ff38ffff04ff02ffff04ffff06ff0180ffff04ffff17ff0bffff0181ff80ff8080808080ff018080ff0180ffff04ffff04ff1bff8080ffff04ff13ff808080ff02ff14ffff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ff09ffff04ff0bffff04ff2dff808080808080ff8080808080ffff02ff2cffff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ffff11ff11ff1580ffff04ffff11ff29ff1580ffff04ff2bff808080808080ff8080808080ffff04ffff02ff3affff04ff02ffff04ff25ffff04ff13ffff01ff808080808080ffff04ff2bff808080ff02ff12ffff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ffff0134ffff04ffff0108ffff04ff05ff808080808080ff8080808080ffffff02ff2affff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ffff012cffff04ffff0108ffff04ff2bff808080808080ff8080808080ffff04ff25ffff04ffff02ff36ffff04ff02ffff04ff25ffff04ff13ffff01ff808080808080ff808080ff02ffff03ff0bffff01ff02ffff01ff02ff26ffff04ff02ffff04ffff06ff0180ffff04ffff10ffff05ff0b80ff1780ff8080808080ff0180ffff01ff02ffff0105ff018080ff0180ffffff02ffff03ff09ffff01ff02ffff01ff02ffff03ffff20ffff15ffff05ff0980ff0b8080ffff01ff02ffff01ff04ffff05ff0980ffff02ff3affff04ff02ffff04ffff06ff0980ffff04ff15ffff04ffff10ff2dffff010180ff80808080808080ff0180ffff01ff02ffff01ff04ff0bffff02ff3affff04ff02ffff04ff09ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff0180ffff01ff02ffff01ff04ff0bffff02ff3affff04ff02ffff04ffff0180ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff02ffff03ff0bffff01ff02ffff01ff02ff2effff04ff02ffff04ffff06ff0180ffff04ffff10ffff05ff0b80ff1780ff8080808080ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff02ffff03ff09ffff01ff02ffff01ff02ffff03ffff20ffff15ffff05ff0980ff0b8080ffff01ff02ffff01ff02ff36ffff04ff02ffff04ffff06ff0980ffff04ff15ffff04ffff10ff2dffff010180ff808080808080ff0180ffff01ff02ffff01ff04ff0bffff02ff36ffff04ff02ffff04ff09ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff0180ffff01ff02ffff01ff04ff0bffff02ff36ffff04ff02ffff04ffff0180ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff02ffff03ffff07ff0580ffff01ff02ffff01ff0bffff0102ffff02ff3effff04ff02ffff04ffff05ff0580ff80808080ffff02ff3effff04ff02ffff04ffff06ff0580ff8080808080ff0180ffff01ff02ffff01ff0bffff0101ff0580ff018080ff0180ff018080
+ff02ffff01ff02ffff03ffff02ffff03ffff09ffff0dff1380ffff013080ffff01ff02ffff01ff02ffff03ffff09ffff0bffff0cff13ffff0180ffff01108080ff2780ffff01ff02ffff01ff02ffff03ffff09ff2bffff0bffff01a04952337315e54a0224523703762ea9da3d1c80b0bbb97486dc056f0efdb38612ffff02ff3effff04ff02ffff04ffff04ffff02ff3cffff04ff02ffff04ffff0bffff0cff13ffff0180ffff011080ff57ff8205fb80ff80808080ffff04ffff0cff13ffff0110ffff013080ffff01808080ff808080808080ffff01ff02ffff01ff09ff8217fbffff010180ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff01ff02ffff01ff0880ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff04ffff01ffffffff02ffff03ffff09ff0bffff010180ffff01ff02ffff01ff02ff28ffff04ff02ffff04ffff06ff0180ffff04ffff14ff17ff0580ff8080808080ff0180ffff01ff02ffff01ff02ff38ffff04ff02ffff04ffff06ff0180ffff04ffff17ff0bffff0181ff80ff8080808080ff018080ff0180ffff04ffff04ff1bff8080ffff04ff13ff808080ff02ff14ffff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ff09ffff04ff0bffff04ff2dff808080808080ff8080808080ffff02ff2cffff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ffff11ff11ff1580ffff04ffff11ff29ff1580ffff04ff2bff808080808080ff8080808080ffff04ffff02ff3affff04ff02ffff04ff25ffff04ff13ffff01ff808080808080ffff04ff2bff808080ff02ff12ffff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ffff0134ffff04ffff0108ffff04ff05ff808080808080ff8080808080ffffff02ff2affff04ff02ffff04ff03ffff04ffff02ff10ffff04ff02ffff04ffff012cffff04ffff0108ffff04ff2bff808080808080ff8080808080ffff04ff25ffff04ffff02ff36ffff04ff02ffff04ff25ffff04ff13ffff01ff808080808080ff808080ff02ffff03ff0bffff01ff02ffff01ff02ff26ffff04ff02ffff04ffff06ff0180ffff04ffff10ffff05ff0b80ff1780ff8080808080ff0180ffff01ff02ffff0105ff018080ff0180ffffff02ffff03ff09ffff01ff02ffff01ff02ffff03ffff20ffff15ffff05ff0980ff0b8080ffff01ff02ffff01ff04ffff05ff0980ffff02ff3affff04ff02ffff04ffff06ff0980ffff04ff15ffff04ffff10ff2dffff010180ff80808080808080ff0180ffff01ff02ffff01ff04ff0bffff02ff3affff04ff02ffff04ff09ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff0180ffff01ff02ffff01ff04ff0bffff02ff3affff04ff02ffff04ffff0180ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff02ffff03ff0bffff01ff02ffff01ff02ff2effff04ff02ffff04ffff06ff0180ffff04ffff10ffff05ff0b80ff1780ff8080808080ff0180ffff01ff02ffff01ff0180ff018080ff0180ffff02ffff03ff09ffff01ff02ffff01ff02ffff03ffff20ffff15ffff05ff0980ff0b8080ffff01ff02ffff01ff02ff36ffff04ff02ffff04ffff06ff0980ffff04ff15ffff04ffff10ff2dffff010180ff808080808080ff0180ffff01ff02ffff01ff04ff0bffff02ff36ffff04ff02ffff04ff09ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff0180ffff01ff02ffff01ff04ff0bffff02ff36ffff04ff02ffff04ffff0180ffff04ffff06ff1580ffff04ff2dff80808080808080ff018080ff0180ff02ffff03ffff07ff0580ffff01ff02ffff01ff0bffff0102ffff02ff3effff04ff02ffff04ffff05ff0580ff80808080ffff02ff3effff04ff02ffff04ffff06ff0580ff8080808080ff0180ffff01ff02ffff01ff0bffff0101ff0580ff018080ff0180ff018080