fork download
copy 
  1. DO ,915 <- #1
  2. DO ,2216 <- #2
  3. DO .2216 <- #1
  4. DO .129 <- #0
  5. DO .1215 <- #0
  6.  
  7. (19) PLEASE DON'T FORGET #1
  8. DO REINSTATE FORGETTING
  9. PLEASE DO (18514) NEXT
  10. DO .2 <- #10
  11. DO (1) NEXT
  12. PLEASE NOTE THERE WAS A NEWLINE
  13. DO .1 <- .2216
  14. DO .2 <- #3
  15. DO (11) NEXT
  16. DO .1 <- ,2216 SUB #1
  17. DO .2 <- #52
  18. DO (11) NEXT
  19. DO .1 <- ,2216 SUB #2
  20. DO .2 <- #50
  21. DO (11) NEXT
  22. PLEASE GIVE UP
  23. (11) DO (31513) NEXT
  24. (12) DO FORGET #1
  25. DO .8 <- #1
  26. DO COME FROM (998)
  27. DO .1 <- .8
  28. DO .2 <- .2216
  29. DO (3) NEXT
  30. DO .1 <- #10
  31. PLEASE DO (23189) NEXT
  32. DO .2216 <- #1
  33. PLEASE DO (19) NEXT
  34. (3) DO (31513) NEXT
  35. PLEASE FORGET #1
  36. DO .1 <- ,2216 SUB .8
  37. PLEASE DO (23189) NEXT
  38. DO .1 <- .8
  39. DO .2 <- #1
  40. PLEASE DO (1000) NEXT
  41. (998) DO .8 <- .3
  42. (1) DO (31513) NEXT
  43. PLEASE NOTE THERE WAS NO NEWLINE
  44. PLEASE FORGET #1
  45. DO ,2216 SUB .2216 <- .1
  46. DO .1 <- .2216
  47. DO .2 <- #1
  48. PLEASE DO (1000) NEXT
  49. DO .2216 <- .3
  50. DO (19) NEXT
  51.  
  52. (31513) PLEASE NOTE RESUMES #2 IF EQUAL ELSE #1
  53. DO RESUME '?#32768$"#65535~'"?.1$.2"~"#0$#65535"'"'~'#32768$#1'
  54.  
  55. (18514) PLEASE STASH .2+.3
  56. DO WRITE IN ,915
  57. DO .1 <- ,915 SUB #1
  58. DO .2 <- .128
  59. PLEASE DO (1000) NEXT
  60. DO .1 <- .3~#255
  61. DO .128 <- .1
  62. PLEASE RETRIEVE .2+.3
  63. DO RESUME #1
  64.  
  65. (23189) PLEASE STASH .1+.2+.3
  66. DO .1 <- !1~#15'$!1~#240'
  67. DO .1 <- !1~#15'$!1~#240'
  68. DO .1 <- !1~#15'$!1~#240'
  69. DO .2 <- .1
  70. DO .1 <- '#256$.129'~'#256$#255'
  71. DO .129 <- .2
  72. PLEASE DO (1010) NEXT
  73. DO ,915 SUB #1 <- .3~#255
  74. DO READ OUT ,915
  75. PLEASE RETRIEVE .1+.2+.3
  76. DO RESUME #1
  77.  
  78. PLEASE REMEMBER TO GIVE UP
Success #stdin #stdout 0s 1804KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
https://ideone.com/ojI74
language:
Intercal (ick 0.3)
created:
15 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!