Frankh Skrevet 20. februar 2021 Skrevet 20. februar 2021 (endret) Heisann,  Har vÊrt Ä lest pÄ math brukt i script, men blir ikke helt klok pÄ hvordan oppsettet blir mtp. dette regnestykket. =SUMMER((B2-B3)-(B1-B3))/((B2-B3))*100 C5 og C6 er virtuelle devicer mens C4 er en reel device.  Noen som kan hjelpe meg pÄ vei.  Frank Endret 20. februar 2021 av Frankh Siter
ZoRaC Skrevet 20. februar 2021 Skrevet 20. februar 2021 Dim sum as double = (hs.GetDeviceValueEx(2)-hs.GetDeviceValueEx(3))-(hs.GetDeviceValueEx(1)-hs.GetDeviceValueEx(3))/(hs.GetDeviceValueEx(2)-hs.GetDeviceValueEx(3))*100  Tallene i parentesene er da deviceref for hver device. 2 Siter
Frankh Skrevet 20. februar 2021 Forfatter Skrevet 20. februar 2021 1 minutt siden, ZoRaC skrev: Dim sum as double = (hs.GetDeviceValueEx(2)-hs.GetDeviceValueEx(3))-(hs.GetDeviceValueEx(1)-hs.GetDeviceValueEx(3))/(hs.GetDeviceValueEx(2)-hs.GetDeviceValueEx(3))*100  Tallene i parentesene er da deviceref for hver device. JĂžss, sĂ„ enkelt kan det gjĂžres đ Like enkelt som i Excel đđ  Hjertelig!! 1 Siter
Frankh Skrevet 21. februar 2021 Forfatter Skrevet 21. februar 2021 Funket som en drĂžm, egentlig fantastisk.. Nok engang takk @ZoRaCÂ đ» Â 1 Siter
Frankh Skrevet 4. mars 2021 Forfatter Skrevet 4. mars 2021 Har prÞvd meg pÄ Ä utvikle det jeg startet pÄ, men her fÄr jeg crash og klarer ikke Ä finne ut hva jeg gjÞre feil. Bruker HS3. Sub Main(ByVal Parms As Object) Dim OG As Double = hs.devicevalueEx(1328) Dim FG As Double = hs.devicevalueEx(1327) Dim CG As Double = hs.devicevalueEx(1060) Dim Tilt As Double = hs.devicevalueEx(1578) Dim femti As Double Dim syttifem As Double Dim niti As Double Dim OGFG As Double OGFG = OG - FG femti = OG - OGFG * 0,5 syttifem = OG - OGFG * 0,75 niti = OG - OGFG * 0,90 If CG >= OG Then hs.setdevicevaluebyref(1578, 0, True) ElseIf CG > OG AndAlso CG < syttifem Then hs.setdevicevaluebyref(1578, 50, True) ElseIf CG > femti AndAlso CG < niti Then hs.setdevicevaluebyref(1578, 75, True) ElseIf CG = niti Then hs.setdevicevaluebyref(1578, 90, True) End If End Sub Og feilmeldingen jeg fÄr er: mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: End of statement expected. mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: End of statement expected. mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: End of statement expected. mar-04 18:41:29 Error Compiling script C:\Program Files (x86)\HomeSeer HS3\scripts\ferment.vb: Namespace or type specified in the Imports 'System.Core' doesn't contain any public member or cannot be found. Make sure the namespace or the type is defined and contains at least one public member. Make sure the imported element name doesn't use any aliases.  Siter
ZoRaC Skrevet 4. mars 2021 Skrevet 4. mars 2021 Kan det vÊre at mÄ bruke punktum i stedet for komma som desimaltegn? 2 Siter
Frankh Skrevet 4. mars 2021 Forfatter Skrevet 4. mars 2021 (endret) E det mulig?!?! Det var , som var Ärsaken. Det var 3 timer med forskning for ingenting Hjertelig takk!! Endret 4. mars 2021 av Frankh 2 Siter
Anbefalte innlegg
Bli med i samtalen
Du kan publisere innhold nÄ og registrere deg senere. Hvis du har en konto, logg inn nÄ for Ä poste med kontoen din.