Need a unique gift idea?
A Pastebin account makes a great Christmas gift
SHARE
TWEET

Untitled

a guest Jul 5th, 2018 96 Never
Upgrade to PRO!
ENDING IN00days00hours00mins00secs
 
  1.     DO :9 <- #1
  2.     PLEASE NOTE THAT THIS CALCULATES THE REMAINDER OF THREE
  3.    
  4. (33)DO :1 <- :9
  5.    
  6.     PLEASE REINSTATE (79)
  7.     DO :2 <- #3
  8.     PLEASE DO (55) NEXT
  9.     DO :99 <- :3
  10.  
  11.     PLEASE NOTE THAT THIS CHECKS IF YOU TYPED FIZZ
  12.     DO ABSTAIN FROM READING OUT
  13.     PLEASE ABSTAIN FROM COMING FROM
  14.     DO (10) NEXT
  15.  
  16.     DO NOTE THAT THIS IS A REMAINDER OF ONE
  17. (10)DO ABSTAIN FROM READING OUT
  18.     PLEASE DO (11) NEXT
  19.  
  20.     DO NOTE THAT THIS IS A REMAINDER OF TWO
  21. (11)DO ABSTAIN FROM READING OUT
  22.     PLEASE DO (12) NEXT
  23.  
  24.     DO NOTE THAT THIS IS A REMAINDER OF ZERO
  25. (12)DO ,1 <- #5
  26.     DO ,1 SUB #1 <- #158
  27.     DO ,1 SUB #2 <- #208
  28.     DO ,1 SUB #3 <- #312
  29.     DO ,1 SUB #5 <- #346
  30.     PLEASE READ OUT ,1
  31.    
  32. (4) DO REINSTATE READING OUT
  33.     DO REINSTATE COMING FROM
  34.     DO :1 <- :3
  35.     DO :2 <- #1
  36.     DO (1500) NEXT
  37.     PLEASE DO RESUME :3
  38.     DO COME FROM (4)
  39.     DO FORGET #99
  40.    
  41.     PLEASE NOTE THAT THIS CALCULATES THE REMAINDER OF FIVE
  42.     DO :1 <- :9
  43.     DO :2 <- #5
  44.     DO (55) NEXT
  45.     DO :97 <- :3
  46.    
  47.     PLEASE NOTE THAT THIS CHECKS IF YOU TYPED BUZZ
  48.     DO ABSTAIN FROM READING OUT
  49.     PLEASE ABSTAIN FROM COMING FROM
  50.     DO (20) NEXT
  51.  
  52.     PLEASE NOTE THAT THIS IS A REMAINDER OF FOUR
  53. (20)
  54.     DO REINSTATE READING OUT
  55.     PLEASE DO (21) NEXT
  56.  
  57.     PLEASE NOTE THAT THIS IS A REMAINDER OF THREE
  58. (21)
  59.     DO ABSTAIN FROM READING OUT
  60.     PLEASE DO (22) NEXT
  61.    
  62.     PLEASE NOTE THAT THIS IS A REMAINDER OF TWO
  63. (22)
  64.     DO ABSTAIN FROM READING OUT
  65.     PLEASE DO (23) NEXT
  66.  
  67.     PLEASE NOTE THAT THIS IS A REMAINDER OF ONE
  68. (23)
  69.     DO ABSTAIN FROM READING OUT
  70.     DO (79) NEXT
  71.     PLEASE DO (24) NEXT
  72.    
  73.     PLEASE NOTE THAT THIS IS A REMAINDER OF ZERO
  74. (24)DO ,1 <- #5
  75.     DO ,1 SUB #1 <- #190
  76.     DO ,1 SUB #2 <- #152
  77.     DO ,1 SUB #3 <- #336
  78.     DO ,1 SUB #5 <- #346
  79.     PLEASE READ OUT ,1
  80.    
  81. (5) DO REINSTATE READING OUT
  82.     DO REINSTATE COMING FROM
  83.     DO ABSTAIN FROM (79)
  84.     DO :1 <- :3
  85.     DO :2 <- #1
  86.     DO (1500) NEXT
  87.     PLEASE DO RESUME :3
  88.     DO COME FROM (5)
  89.     DO FORGET #99
  90.    
  91.     PLEASE :1 <- :4
  92.     PLEASE :2 <- #1
  93.     DO (1500) NEXT
  94.     PLEASE :9 <- :3
  95.    
  96.     DO ,1 <- #3
  97.     DO ,1 SUB #1 <- #176
  98.     DO ,1 SUB #2 <- #0
  99.     DO ,1 SUB #3 <- #336
  100.    
  101.     PLEASE READ OUT ,1
  102.    
  103.     DO (33) NEXT
  104.     DO GIVE UP
  105.    
  106.     PLEASE NOTE THAT THIS IS A SUBROUTINE THAT CALCULATES THE REMAINDER. THE INTERCAL DESIGNERS DIDN'T PUT THIS FEATURE IN AND THAT MAKES ME SAD.
  107. (55)DO (1550) NEXT
  108.     PLEASE DO :4 <- :1
  109.     DO :1 <- :3
  110.     DO (1540) NEXT
  111.     DO :1 <- :4
  112.     DO :2 <- :3
  113.     PLEASE DO (1510) NEXT
  114.     DO RESUME #1
  115.    
  116.     DO NOTE THAT THIS IS A SUBROUTINE THAT PRINTS THE NUMBER IF THE REMAINDER IS THREE
  117. (79)DO RESUME #1
  118.     DO ABSTAIN FROM READING OUT
  119.     DO ABSTAIN FROM RESUMING
  120.     PLEASE ABSTAIN FROM COMING FROM
  121.     DO (80) NEXT
  122.  
  123.     DO NOTE THAT THIS IS A REMAINDER OF ONE
  124. (80)
  125.     DO READ OUT :9
  126.     DO ABSTAIN FROM READING OUT
  127.     DO RESUME #2
  128.     PLEASE DO (81) NEXT
  129.  
  130.     DO NOTE THAT THIS IS A REMAINDER OF TWO
  131. (81)
  132.     DO READ OUT :9
  133.     DO ABSTAIN FROM READING OUT
  134.     DO RESUME #2
  135.     PLEASE DO (82) NEXT
  136.  
  137.     DO NOTE THAT THIS IS A REMAINDER OF ZERO
  138. (82)DO NOTHING
  139.     DO RESUME #4
  140.    
  141. (8) DO REINSTATE READING OUT
  142.     DO REINSTATE COMING FROM
  143.     DO REINSTATE RESUMING
  144.     DO :1 <- :99
  145.     DO :2 <- #1
  146.     DO (1500) NEXT
  147.     DO :1 <- :97
  148.     PLEASE DO RESUME :3
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