daily pastebin goal
27%
SHARE
TWEET

Untitled

a guest Jan 25th, 2015 693 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. BNZ $payout_time :loop
  2. SET @min_amount #0000002e90edd000
  3. FUN @payout_time get_Creation_Timestamp
  4. SET @timestamp $payout_time
  5. init:
  6. SET @payout_balance #0000000000000000
  7. SET @tx_info #0000000000002760
  8. FUN @payout_time add_Minutes_to_Timestamp $payout_time $tx_info
  9. loop:
  10. FUN A_to_Tx_after_Timestamp $timestamp
  11. FUN @tx_info check_A_Is_Zero
  12. BNZ $tx_info :process_tx
  13. FIN
  14. process_tx:
  15. FUN @tx_time get_Timestamp_for_Tx_in_A
  16. BLT $tx_time $payout_time :get_info_amount
  17. JMP :payout
  18. get_info_amount:
  19. FUN @tx_amount get_Amount_for_Tx_in_A
  20. FUN B_to_Address_of_Tx_in_A
  21. FUN @tx_info get_B1
  22. FUN B_to_Address_of_Creator
  23. FUN @creator get_B1
  24. BEQ $creator $tx_info :bootstrap
  25. FUN @tx_info get_Type_for_Tx_in_A
  26. BNZ $tx_info :skip
  27. BEQ $tx_amount $min_amount :get_ticket
  28. JMP :refund
  29. get_ticket:
  30. FUN @tx_info get_Ticket_Id_for_Tx_in_A
  31. FIZ $tx_info
  32. FUN B_to_Address_of_Tx_in_A
  33. FUN set_A1 $tx_info
  34. FUN send_A_to_Address_in_B
  35. ADD @payout_balance $min_amount
  36. BLE $tx_info $best_ticket :skip
  37. SET @best_ticket $tx_info
  38. FUN @best_account get_B1
  39. skip:
  40. SET @timestamp $tx_time
  41. JMP :loop
  42. bootstrap:
  43. ADD @payout_balance $tx_amount
  44. JMP :skip
  45. payout:
  46. BZR $payout_balance :empty
  47. BZR $best_ticket :empty
  48. FUN set_B1 $best_account
  49. FUN @block_timestamp get_Block_Timestamp
  50. BEQ $block_timestamp $payout_time :pay_all_at_amount
  51. FUN send_to_Address_in_B $payout_balance
  52. JMP :finish_payout
  53. pay_all_at_amount:
  54. FUN send_All_to_Address_in_B
  55. JMP :finish_payout
  56. empty:
  57. SET @timestamp $tx_time
  58. JMP :init
  59. refund:
  60. FUN B_to_Address_of_Tx_in_A
  61. BLE $tx_amount $min_amount :refund_less
  62. SUB @tx_amount $min_amount
  63. FUN send_to_Address_in_B $tx_amount
  64. JMP :get_ticket
  65. refund_less:
  66. FUN send_to_Address_in_B $tx_amount
  67. JMP :skip
  68. finish_payout:
  69. SET @timestamp $payout_time
  70. SET @best_ticket #0000000000000000
  71. SET @best_account #0000000000000000
  72. JMP :init
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top