Guest User

Untitled

a guest
Nov 5th, 2012
147
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.71 KB | None | 0 0
  1. ::"A NOTETAKING APP
  2. ::"7FFF4001517D594555455345517D400140015F7D4441447D4441447D40017FFF
  3. :If det([[42]])≠1337
  4. :Then
  5. :Disp "YOU NEED DOORS","CS TO USE THIS PROGRAM!","DCS.CEMETECH.NET
  6. :Stop
  7. :End
  8. :det(9,"NOTELIST"
  9. :If length(Ans)<6 or sub(Ans,1,6)≠"rowSwap(NOTES
  10. :Then
  11. :det(0,"rowSwap(NOTES",5
  12. :det(6,"rowSwap(NOTES","NOTELIST",1
  13. :End
  14. :sum(9
  15. :sum(7,1,"7000700070","Notes
  16. :sum(7,5,32
  17. :sum(7,9,3,2,68,60,"
  18. :sum(7,7,72,2,"NOTE
  19. :For(A,11,45,8
  20. :sum(7,21,3,A,81,8,1
  21. :End
  22. :sum(7,19,85,11,29,1,1,1,10,0
  23. :det(5,"rowSwap(NOTES",0)→I
  24. :I+2→B
  25. :If I>6
  26. :8→B
  27. :2→C
  28. :For(A,12,45,8
  29. :If C≠B
  30. :Then
  31. :det(5,"rowSwap(NOTES",C)→Str1
  32. :sum(7,4,6,A,0,Str1
  33. :C+1→C
  34. :End
  35. :End
  36. :sum(12,30,30,10
  37. :sum(10
  38. :ClrHome
Advertisement
Add Comment
Please, Sign In to add comment