AD采樣和取值和作了一個簡單的處理。
AD采樣，求10次平均
GetR = 10240 / AD結果 * 100 - 1000
此程序有嚴重BUG，除數不做范圍限制，早晚死翹翹。