[mort] 밧데리 statue

# while(1)
 bat=BatteryPercentage()&"%"
 mem=Format(FreeMemory()/1024.,2)&"M"
 ST=Format(FreeDiskSpace("\Storage", KB)/1024.,2)&"M"
 PS=Format(FreeDiskSpace("\ProgramStore", KB)/1024.,2)&"M"
 if( dirExists( "\Storage Card\000" ) )
  SD=Format(FreeDiskSpace("\Storage Card", KB)/1024/1024.,2)&"G"
 Else
  SD="####"
 EndIf

 RegWriteString("HKCU", "\Software\rlToday\", "Battery", bat)
 RegWriteString("HKCU", "\Software\rlToday\", "Memory", mem)
 RegWriteString("HKCU", "\Software\rlToday\", "Storage", ST)
 RegWriteString("HKCU", "\Software\rlToday\", "ProgramStore", PS)
 RegWriteString("HKCU", "\Software\rlToday\", "SD", SD)
# Sleep(5000)
# EndWhile