INIT:
!DEFS (ME)
!MACR .OBJECTS
' Message file name
!NAMM (PATH)webmsg.txt
' Data File name
!NAMD (PATH)webdata.txt
' Save data to file
!SAVD ON
' Save messages to file
!SAVM ON
' Set Queue size
!QSIZ 8000
' Set analog span
!SPAN 0, 250
' Set max time
!TMAX 120
' Title plot
!TITL Web Page Sample
' Set display information
!DISP D9 G2 A0 S0 B15 R
!MACR .DCONST
'Make initial page
!MACR .MakePage
ENDMAC
OBJECTS:
!POBJ Clear
!PPER 80,100
!POBJ oBack=7
!POBJ oTimer0.C=!MACR .makepage(;)
!POBJ oTImer0= 10
' View_Page -- OBUTTON *****
!POBJ oButton.View_Page=85.,35.,10.,5.,View Page,8
'-- Event Code
!POBJ View_Page.C=!APPA (PATH)webpage.htm(;)
' Obj2 -- OLABEL *****
!POBJ oLabel.Obj2=82.,97.,17.,3.,Update Page Time (sec),,0,9,0
' update_Time -- ODROP *****
!POBJ oDrop.update_Time=86.,92.,8.,4.8,9,5,10,15,20,30,40,50,60
'-- Event Code
!POBJ update_Time.C=!POBJ oTimer0=((ME))(;)
' Obj4 -- OLABEL *****
!POBJ oLabel.Obj4=82.,83.,18.,3.,Refresh Page Time (sec),,0,9,0
' page_refr -- ODROP *****
!POBJ oDrop.page_refr=86.,78.,8.,4.8,9,5,10,20,30,40,50,60
' Obj6 -- OLABEL *****
!POBJ oLabel.Obj6=81.,70.,10.,3.,Labels:,,0,9,0
' Obj7 -- OLABEL *****
!POBJ oLabel.Obj7=82.,65.,5.,3.,AIN0:,,0,9,0
' Obj8 -- OLABEL *****
!POBJ oLabel.Obj8=82.,60.,5.,3.,AIN1:,,0,9,0
' Obj9 -- OLABEL *****
!POBJ oLabel.Obj9=82.,54.,4.,3.,BIT0:,,0,9,0
' Obj10 -- OLABEL *****
!POBJ oLabel.Obj10=82.,48.,5.,3.,BIT1:,,0,9,0
' txtAnalog0 -- OTEXT *****
!POBJ oText.txtAnalog0=87.,66.,12.,4.5,Analog 0,15,0,9
' txtAnalog1 -- OTEXT *****
!POBJ oText.txtAnalog1=87.,61.,12.,4.5,Analog1,15,0,9
' txtBit0 -- OTEXT *****
!POBJ oText.txtBit0=87.,55.,12.,4.5,Bit 0,15,0,9
' txtBit1 -- OTEXT *****
!POBJ oText.txtBit1=87.,49.,12.,4.5,Bit 1,15,0,9
' DelData -- OBUTTON *****
!POBJ oButton.DelData=85.,20.,14.,5.,Delete Data File,8
'-- Event Code
!POBJ DelData.C=!NAMD (PATH)webdata.txt(;)
!DELD(;)
!CLRQ(;)
(;)
' delMsg -- OBUTTON *****
!POBJ oButton.delMsg=85.,12.,14.,5.,Delete Msg File,8
'-- Event Code
!POBJ delMsg.C=!DELM(;)
ENDMAC
MakePage:
' disable date/time appending so the same plot name will be used (optional)
!APDT OFF
' take a plot snapshot
!SNAP (PATH)plotimage
' change data log name for webpage
!NAMD (PATH)webpage.htm
' disable time stamping so won't be in webpage
!TSMP OFF
' Delete the old webpage
!DELD
' ******** creates a web page as a data file
!LOGD
!LOGD
!LOGD
!LOGD S-Plot Dynamic WebPage
!LOGD
!LOGD
!LOGD StampPlot Dynamic Data Page
!LOGD
!LOGD (TITLE)
!LOGD (PRDT)
!LOGD (STATUS)
!LOGD
!LOGD
!LOGD |
!LOGD Last Value |
!LOGD Minimum |
!LOGD Maximum |
!LOGD
!LOGD
!LOGD | (txtAnalog0) |
!LOGD (AINVAL0) |
!LOGD (AINMIN0) at (AINTIMEMIN0) |
!LOGD (AINMAX0) at (AINTIMEMAX0) |
!LOGD
!LOGD
!LOGD | (txtAnalog1) |
!LOGD (AINVAL1) |
!LOGD (AINMIN1) at (AINTIMEMIN1) |
!LOGD (AINMAX1) at (AINTIMEMAX1) |
!LOGD
!LOGD
!LOGD (txtbit0): (BIT0)
!LOGD
(txtBit1): (BIT1)
!LOGD )
!LOGD (cached image may preclude seeing updated plot)
!LOGD
!LOGD View
!LOGD Data Log
!LOGD View
!LOGD Message Log
!LOGD
!LOGD
!LOGD
' Rename data file to old name
!NAMD (PATH)webdata.txt
' Re-enable time stamping
!TSMP ON
ENDMAC