all tasks

2013-04-11 01:07:29 -07:00 · 2013-04-11 01:07:29 -07:00 · 68f8f3e56b
commit 68f8f3e56b
parent b83f433714
14735 changed files with 178959 additions and 0 deletions
--- a/Task/Sorting-algorithms-Quicksort/AutoHotkey/sorting-algorithms-quicksort.ahk
+++ b/Task/Sorting-algorithms-Quicksort/AutoHotkey/sorting-algorithms-quicksort.ahk
@ -0,0 +1,24 @@
+MsgBox % quicksort("8,4,9,2,1")
+
+quicksort(list)
+{
+  StringSplit, list, list, `,
+  If (list0 <= 1)
+    Return list
+  pivot := list1
+  Loop, Parse, list, `,
+  {
+    If (A_LoopField < pivot)
+      less = %less%,%A_LoopField%
+    Else If (A_LoopField > pivot)
+      more = %more%,%A_LoopField%
+    Else
+      pivotlist = %pivotlist%,%A_LoopField%
+  }
+  StringTrimLeft, less, less, 1
+  StringTrimLeft, more, more, 1
+  StringTrimLeft, pivotList, pivotList, 1
+  less := quicksort(less)
+  more := quicksort(more)
+  Return less . pivotList . more
+}