INIT: !MACR .OBJECTS ' Run macro on New Plots !NPSU ON ' Use analog data for macro !USEA ON ' Save data to file !SAVD ON ' Set number of bytes !NUMB 0 ' Set Queue size !QSIZ 10114 ' Set analog span !SPAN 70, 90 ' Set max time !TMAX 500 ' Set number of samples !PNTS 5000 ' Stop at Max points !MAXS ' Clear min/max on reset !CMMR ON ' Shift left at max !SHFT ON ' Title plot !TITL Juliana's Science Project ' Flush old data !FLSH ON ' Set display information !DISP D9 G2 A0 S0 B15 R !SETD 0,100 ENDMAC OBJECTS: !POBJ Clear !PPER 0,0 !POBJ oBack=0 ' gau1Name -- OTEXT ***** !POBJ oText.gau1Name=4.,100.,15.,4.5,House #1,11,0,9 ' Gau1 -- OGAUGE ***** !POBJ oGauge.Gau1=4.,95.,15.,48.,50,100,0,110 !POBJ Gau1.U=(AINVAL0) '-- Event Code !POBJ Gau1.C=!IFTH (gau1A),=,1,~PWAV gbell.wav(;) ' gau1min -- OTEXT ***** !POBJ oText.gau1min=4.,46.,7.,4.5,50,15,0,9 !POBJ gau1min.tip=Scale Minimum '-- Event Code !POBJ gau1min.C=!POBJ gau1=,((ME)) ' gau1max -- OTEXT ***** !POBJ oText.gau1max=12.,46.,7.,4.5,100,15,0,9 !POBJ gau1max.tip=Scale Maximum '-- Event Code !POBJ gau1max.C=!POBJ gau1=,,((ME)) ' DA_Process -- OBUTTON ***** !POBJ oButton.DA_Process=1.,7.,10.,5.,Obj17,8 !POBJ DA_Process.V=0 '-- Event Code !POBJ DA_Process.C=!POBJ update(CR)!CLRQ ' gau1Cur -- OLABEL ***** !POBJ oLabel.gau1Cur=4.,36.,15.,7.,72\n02/17/02 06:16:37,11,0,9,1 !POBJ gau1Cur.U=(AINVAL0)\n(PRDT) !POBJ gau1Cur.tip=Current Value ' gau1MaxVal -- OLABEL ***** !POBJ oLabel.gau1MaxVal=4.,25.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau1MaxVal.U=(AINMAX0)\n(AINTIMEMAX0) !POBJ gau1MaxVal.tip=Maximum Value ' gau1minval -- OLABEL ***** !POBJ oLabel.gau1minval=4.,18.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau1minval.U=(AINMIN0)\n(AINTIMEMIN0) !POBJ gau1minval.tip=Minimum Value ' gau2Name -- OTEXT ***** !POBJ oText.gau2Name=20.,100.,15.,4.5,House #2,11,0,9 ' Gau2 -- OGAUGE ***** !POBJ oGauge.Gau2=20.,95.,15.,48.,50,100,0,100 !POBJ Gau2.U=(AINVAL1) '-- Event Code !POBJ Gau2.C=!IFTH (gau2A),=,1,~PWAV gbell.wav(;) ' gau2min -- OTEXT ***** !POBJ oText.gau2min=20.,46.,7.,4.5,50,15,0,9 !POBJ gau2min.tip=Scale Minimum '-- Event Code !POBJ gau2min.C=!POBJ gau2=,((ME)) ' gau2max -- OTEXT ***** !POBJ oText.gau2max=28.,46.,7.,4.5,100,15,0,9 !POBJ gau2max.tip=Scale Maximum '-- Event Code !POBJ gau2max.C=!POBJ gau2=,,((ME)) ' gau2Cur -- OLABEL ***** !POBJ oLabel.gau2Cur=20.,36.,15.,7.,72\n02/17/02 06:16:37,11,0,9,1 !POBJ gau2Cur.U=(AINVAL1)\n(PRDT) !POBJ gau2Cur.tip=Current Value ' gau2MaxVal -- OLABEL ***** !POBJ oLabel.gau2MaxVal=20.,25.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau2MaxVal.U=(AINMAX1)\n(AINTIMEMAX1) !POBJ gau2MaxVal.tip=Maximum Value ' gau2minval -- OLABEL ***** !POBJ oLabel.gau2minval=20.,18.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau2minval.U=(AINMIN1)\n(AINTIMEMIN1) !POBJ gau2minval.tip=Minimum Value ' gau3Name -- OTEXT ***** !POBJ oText.gau3Name=36.,100.,15.,4.5,House #3,11,0,9 ' Gau3 -- OGAUGE ***** !POBJ oGauge.Gau3=36.,95.,15.,48.,50,100,0,110 !POBJ Gau3.U=(AINVAL2) '-- Event Code !POBJ Gau3.C=!IFTH (gau3A),=,1,~PWAV gbell.wav(;) ' gau3min -- OTEXT ***** !POBJ oText.gau3min=36.,46.,7.,4.5,50,15,0,9 !POBJ gau3min.tip=Scale Minimum '-- Event Code !POBJ gau3min.C=!POBJ gau3=,((ME)) ' gau3max -- OTEXT ***** !POBJ oText.gau3max=44.,46.,7.,4.5,100,15,0,9 !POBJ gau3max.tip=Scale Maximum '-- Event Code !POBJ gau3max.C=!POBJ gau3=,,((ME)) ' gau3Cur -- OLABEL ***** !POBJ oLabel.gau3Cur=36.,36.,15.,7.,72\n02/17/02 06:16:37,11,0,9,1 !POBJ gau3Cur.U=(AINVAL2)\n(PRDT) !POBJ gau3Cur.tip=Current Value ' gau3MaxVal -- OLABEL ***** !POBJ oLabel.gau3MaxVal=36.,25.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau3MaxVal.U=(AINMAX2)\n(AINTIMEMAX2) !POBJ gau3MaxVal.tip=Maximum Value ' gau3minval -- OLABEL ***** !POBJ oLabel.gau3minval=36.,18.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau3minval.U=(AINMIN2)\n(AINTIMEMIN2) !POBJ gau3minval.tip=Minimum Value ' gau4Name -- OTEXT ***** !POBJ oText.gau4Name=52.,100.,15.,4.5,House #4,11,0,9 ' Gau4 -- OGAUGE ***** !POBJ oGauge.Gau4=52.,95.,15.,48.,50,100,0,110 !POBJ Gau4.U=(AINVAL3) '-- Event Code !POBJ Gau4.C=!IFTH (gau4A),=,1,~PWAV gbell.wav(;) ' gau4min -- OTEXT ***** !POBJ oText.gau4min=52.,46.,7.,4.5,50,15,0,9 !POBJ gau4min.tip=Scale Minimum '-- Event Code !POBJ gau4min.C=!POBJ gau4=,((ME)) ' gau4max -- OTEXT ***** !POBJ oText.gau4max=60.,46.,7.,4.5,100,15,0,9 !POBJ gau4max.tip=Scale Maximum '-- Event Code !POBJ gau4max.C=!POBJ gau4=,,((ME)) ' gau4Cur -- OLABEL ***** !POBJ oLabel.gau4Cur=52.,36.,15.,7.,72\n02/17/02 06:16:37,11,0,9,1 !POBJ gau4Cur.U=(AINVAL3)\n(PRDT) !POBJ gau4Cur.tip=Current Value ' gau4MaxVal -- OLABEL ***** !POBJ oLabel.gau4MaxVal=52.,25.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau4MaxVal.U=(AINMAX3)\n(AINTIMEMAX3) !POBJ gau4MaxVal.tip=Maximum Value ' gau4minval -- OLABEL ***** !POBJ oLabel.gau4minval=52.,18.,15.,6.,72\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau4minval.U=(AINMIN3)\n(AINTIMEMIN3) !POBJ gau4minval.tip=Minimum Value ' gau5Name -- OTEXT ***** !POBJ oText.gau5Name=68.,100.,15.,4.5,House #5,11,0,9 ' Gau5 -- OGAUGE ***** !POBJ oGauge.Gau5=68.,95.,15.,48.,50,100,0,110 !POBJ Gau5.U=(AINVAL4) '-- Event Code !POBJ Gau5.C=!IFTH (gau5A),=,1,~PWAV gbell.wav(;) ' gau5min -- OTEXT ***** !POBJ oText.gau5min=68.,46.,7.,4.5,50,15,0,9 !POBJ gau5min.tip=Scale Minimum '-- Event Code !POBJ gau5min.C=!POBJ gau5=,((ME)) ' gau5max -- OTEXT ***** !POBJ oText.gau5max=76.,46.,7.,4.5,100,15,0,9 !POBJ gau5max.tip=Scale Maximum '-- Event Code !POBJ gau5max.C=!POBJ gau5=,,((ME)) ' gau5Cur -- OLABEL ***** !POBJ oLabel.gau5Cur=68.,36.,15.,7.,71\n02/17/02 06:16:37,11,0,9,1 !POBJ gau5Cur.U=(AINVAL4)\n(PRDT) !POBJ gau5Cur.tip=Current Value ' gau5MaxVal -- OLABEL ***** !POBJ oLabel.gau5MaxVal=68.,25.,15.,6.,71\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau5MaxVal.U=(AINMAX4)\n(AINTIMEMAX4) !POBJ gau5MaxVal.tip=Maximum Value ' gau5minval -- OLABEL ***** !POBJ oLabel.gau5minval=68.,18.,15.,6.,71\n02/17/2002 06:12:56,14,0,9,1 !POBJ gau5minval.U=(AINMIN4)\n(AINTIMEMIN4) !POBJ gau5minval.tip=Minimum Value ' Obj52 -- OLABEL ***** !POBJ oLabel.Obj52=-3.,46.,10.,3.,Scale,,14,9,0 ' Obj54 -- OLABEL ***** !POBJ oLabel.Obj54=-3.,35.,10.,3.,Read,,14,9,0 ' Obj55 -- OLABEL ***** !POBJ oLabel.Obj55=-3.,24.,10.,3.,Max,,14,9,0 ' Obj56 -- OLABEL ***** !POBJ oLabel.Obj56=-3.,17.,10.,3.,Min,,14,9,0 ' cmdMain -- OBUTTON ***** !POBJ oButton.cmdMain=90.,5.,10.,5.,Plot Select,8 '-- Event Code !POBJ cmdMain.C=!MREQ N,30,Return to plot selection?\nY\N,99(;) !IFTH %m99,=,Y,!MACR startup(;) !IFTH %m99,=,y,!MACR startup(;) (;) ' butTest -- OBUTTON ***** !POBJ oButton.butTest=79.,5.,10.,5.,Test Data,8 !POBJ butTest.tip=Sends random and anolog test data. Ensure Plotting is enabled '-- Event Code !POBJ butTest.C=!MACR wizards/randomdata ' Obj59 -- OGAUGE ***** !POBJ oGauge.Obj59=84.,95.,15.,48.,50,100,0,110 !POBJ Obj59.U=(AINVAL5) '-- Event Code !POBJ Obj59.C=!IFTH (gau5A),=,1,~PWAV gbell.wav ' Obj60 -- OTEXT ***** !POBJ oText.Obj60=84.,100.,15.,4.5,Outside Temp,11,0,9 ' Obj61 -- OLABEL ***** !POBJ oLabel.Obj61=89.,30.,10.,3.,Obj61,,0,9,0 ' Obj64 -- OLABEL ***** !POBJ oLabel.Obj64=84.,36.,15.,7.,71\n02/17/02 06:16:37,11,0,9,1 !POBJ Obj64.U=(AINVAL5)\n(PRDT) ' Obj47 -- OTEXT ***** !POBJ oText.Obj47=92.,46.,7.,4.5,100,15,0,9 !POBJ Obj47.tip=Scale Maximum '-- Event Code !POBJ Obj47.C=!POBJ obj59=,,((ME)) ' Obj48 -- OTEXT ***** !POBJ oText.Obj48=84.,46.,7.,4.5,50,15,0,9 !POBJ Obj48.tip=Scale Minimum '-- Event Code !POBJ Obj48.C=!POBJ obj59=,((ME)) ' Gau6MaxVal -- OLABEL ***** !POBJ oLabel.Gau6MaxVal=84.,25.,15.,6.,75\n02/17/2002 06:13:34,14,0,9,1 !POBJ Gau6MaxVal.U=(AINMAX5)\n(AINTIMEMAX5) !POBJ Gau6MaxVal.tip=Maximum Value ' Gau6minval -- OLABEL ***** !POBJ oLabel.Gau6minval=84.,18.,15.,6.,71\n02/17/2002 06:12:56,14,0,9,1 !POBJ Gau6minval.U=(AINMIN5)\n(AINTIMEMIN5) !POBJ Gau6minval.tip=Minimum Value ENDMAC