#include <string.au3>


;===================HEX Values for the fan speeds=================================
;FanSpeed	10%=A	21%=15	32%=20	43%=2B	54%=36	65%=41	76%=4C	87%=57	98%=62
;FanSpeed	11%=B	22%=16	33%=21	44%=2C	55%=37	66%=42	77%=4D	88%=58	99%=63
;FanSpeed	12%=C	23%=17	34%=22	45%=2D	56%=38	67%=43	78%=4E	89%=59	100%=64
;FanSpeed	13%=D	24%=18	35%=23	46%=2E	57%=39	68%=44	79%=4F	90%=5A
;FanSpeed	14%=E	25%=19	36%=24	47%=2F	58%=3A	69%=45	80%=50	91%=5B
;FanSpeed	15%=F	26%=1A	37%=25	48%=30	59%=3B	70%=46	81%=51	92%=5C
;FanSpeed	16%=10	27%=1B	38%=26	49%=31	60%=3C	71%=47	82%=52	93%=5D
;FanSpeed	17%=11	28%=1C	39%=27	50%=32	61%=3D	72%=48	83%=53	94%=5E
;FanSpeed	18%=12	29%=1D	40%=28	51%=33	62%=3E	73%=49	84%=54	95%=5F
;FanSpeed	19%=13	30%=1E	41%=29	52%=34	63%=3F	74%=4A	85%=55	96%=60
;FanSpeed	20%=14	31%=1F	42%=2A	53%=35	64%=40	75%=4B	86%=56	97%=61
Global $fs = "39" ;41% for iddle and 100%
Local $SEC00
Global $Sleep = "2000"
$dec = Dec($fs)
$SEC = Dec($SEC00)
;====================================================================================
;#cs
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 00 01 " & $fs)
ShellExecute ("wcmdtool.exe" ,"20 c0 14 0d 00 " & $SEC)
;ShellExecute ("wcmdtool.exe" ,"20 c0 14 0d 00 " & $dec)
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 01 01 " & $fs)
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 02 01 " & $fs)
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 03 01 " & $fs)
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 04 01 " & $fs)
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 05 01 " & $fs)
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 06 01 " & $fs)
ShellExecute ("wcmdtool.exe" ,"20 c0 15 05 07 01 " & $fs)
#ce

GUICreate("Fan Speed", 200, 50)
GUICtrlCreateLabel("Fans set to " & $SEC00 & "%", 10, 10)
;GUICtrlCreateButton("OK", 70, 50, 60)
GUISetState(@SW_SHOW)
Sleep($Sleep)
GUISetState(@SW_HIDE)