revert sdm630 emulator

Author: gemu2015

docs/Smart-Meter-Interface.md

@@ -3598,180 +3598,6 @@ Set device parity to NONE
     1,010404ffffffff@i8:1,Active Power P3,W,Power_P3,2  
     #  
     ```
-
-### SDM630-Emulator (MODBus)
-Show how to emulate an SDM630 e.g. to interact with a GROWATT solar inverter.
-
-??? summary "View script"
-    ```
-    \>D
-    ; simulate eastron sdm630 modbus meter
-    IP=192.168.188.114
-    ; need this additional defs
-    ; due to speed requirements this script needs an ESP32
-    ;#define USE_SCRIPT_TASK
-    ;#define USE_SCRIPT_SERIAL
-    ;#define USE_SML_M
-    ; for debugging uncomment print statements below
-    ; receive pin
-    rec=21
-    ; transmit pin
-    trx=20
-    ; meter address
-    addr=2
-    ; current meter power, negativ on export
-    cmpwr=0
-    res=0
-    M:req=0 8
-    M:resp=0 128
-    regs=0
-    startreg=0
-    cnt=0
-    index=0
-    mtime=0
-    curr1=0
-    cpw1=0
-    cvol1=230
-    \>B
-    =>sensor53 r
-    \>BS
-    ; should be hardware serial pins
-    res=so(rec trx 9600 8N1 1024)
-    if res==0 {
-    	print serial open failed
-    } else {
-	; create task every 1 ms
-	ct(1 1 1 3 8000)
-    }
-    ; meter descriptor
-    \>M 1
-    ; sml serial receive GPIO, here pin4
-    +1,4,s,0,9600,SML
-    1,77070100010800ff@1000,Verbrauch,KWh,Total_in,4
-    1,77070100020800ff@1000,Einspeisung,KWh,Total_out,4
-    1,77070100100700ff@1,Aktueller Verbrauch,W,Power_curr,0
-    1,77070100000009ff@#,Zähler Nr,,Meter_number,0
-    #
-    ; respond to request
-    #response
-    index=1
-    for cnt 1 regs 1
-    	switch startreg
-     		case 0
-			; voltage p1
-			resp[index]=cvol1
-		case 2
-			; voltage p2
-			resp[index]=cvol1
-		case 4
-			; voltage p3
-			resp[index]=cvol1
-		case 6
-			; current p1
-			resp[index]=curr1
-		case 8
-			; current p2
-			resp[index]=curr1
-		case 10
-			; current p3
-			resp[index]=curr1
-		case 12
-			; power p1
-			resp[index]=cpw1
-		case 14
-			; power p2
-			resp[index]=cpw1
-		case 16
-			; power p3
-			resp[index]=cpw1
-		case 18
-			; app power p1
-			resp[index]=cpw1
-		case 20
-			; app power p2
-			resp[index]=cpw1
-		case 22
-			; app power p3
-			resp[index]=cpw1
-		case 30
-			; power factor p1
-			resp[index]=1
-		case 32
-			; power factor p2
-			resp[index]=1
-		case 34
-			; power factor p3
-			resp[index]=1
-		case 48
-			; current sum
-			resp[index]=230/cmpwr
-		case 52
-			; total system power
-			resp[index]=cmpwr
-		case 56
-			; total system va
-			resp[index]=cmpwr
-		case 70
-			; 50 Hz frequency
-			resp[index]=50
-		case 72
-			;total Import
-			resp[index]=sml[1]
-		case 74
-			;total export
-			resp[index]=sml[2]
-		case 342
-			;total kWh
-			resp[index]=sml[1]
-	ends
-	index+=1
-	startreg+=2	
-next
-; write response
-smw(addr 3 resp regs)
-; multitasking every 1 ms
-\>t1
-; get current power from meter
-cmpwr=sml[3]
-; fake power 
-;cmpwr=3000+rnd(1000)
-curr1=cmpwr/230/3
-cpw1=cmpwr/3
-; check for incomming request
-res=sa()
-if res>=8 {
-	mtime=millis
-	; read request, returns 8 if OK
-	res=sra(req)
-	if res==8 
-	and req[1]==addr
-	and req[2]==4 {
-		; valid request
-		;print request = %0req[1]% - %0req[2]% - %0req[3]% - %0req[4]% - %0req[5]% - %0req[6]%
-		; slave adress,function code,start adress Hi,start adress Lo,np Hi,np Lo,crc Lo,crc Hi
-		regs=req[6]/2
-		startreg=req[3]<<8|req[4]
-		;print addr= %0req[1]%, startaddr=%0startreg%, numregs=%0regs%
-		=#response
-		res=sa()
-		res=sra(resp)
-		;print duration %0(millis-mtime)%
-	} else {
-		if res<0 {
-			print crc error
-		} else {
-			print iqnore request
-		}
-		; empty serial queue
-		res=sa()
-		res=sra(resp)
-	}
-}
-\>R
-; close serial port
-sc()
-```
-
 
 ### SDM630 (MODBus)
 Show how to request multiple registers.