WeightmanRobotics

StampPlot code

08-31-2008
INIT:
'Set as default macro
!DEFS (ME)
!MACR .OBJECTS
' Set Queue size
!QSIZ 3495
' Set analog span
!SPAN  0, 3.125
' Set max time
!TMAX 17609
' Set number of samples
!PNTS 2000
' Stop at max time
!MAXT
' Clear min/max on reset
!CMMR ON
' Shift left at max
!SHFT ON
' Title plot
!TITL Underwater ROV Control ver106        Stuart Weightman  2007
' Flush old data
!FLSH ON
' Set number of grid lines X and Y
!GRID  20, 10
' Set display information
!DISP D9 G5 A0 S0 B14 R

!SETD 1,1
ENDMAC

OBJECTS:
!POBJ Clear
!PPER 0,0

' Set Back Color ********
!POBJ oBack=12

'   plot1 -- OPLOT *****
!POBJ oPlot.plot1=-9.4,32.,110.,35.,0,100,0,180,1,1,1,Seconds,

'   DepthSP -- OVSLIDER *****
!POBJ oVSlider.DepthSP=94.2,30.,4.,31.3,0,100,10

'   Obj3 -- OBUTTON *****
!POBJ oButton.Obj3=97.,30.,3.,30.,DEPTH,12
!POBJ Obj3.F=Arial,12,1,0

'   VerticalSpeed -- OMETER *****
!POBJ oMeter.VerticalSpeed=85.7,89.3,11.,12.9,550,950,550,950

'   Obj19 -- OBUTTON *****
!POBJ oButton.Obj19=3.4,75.,5.,4.,LEAK,8
!POBJ Obj19.F=Arial,8,1,0

'   Speed -- OVSLIDER *****
!POBJ oVSlider.Speed=87.1,68.,4.,23.9,-200,200,2

'   Obj24 -- OBUTTON *****
!POBJ oButton.Obj24=0.,30.9,1.9,33.1,0  1   2  3  4  5  6  7  8  9  10,8
!POBJ Obj24.F=Berlin Sans FB,8,0,0

'   Zero -- OCHECK *****
!POBJ oCheck.Zero=4.6,94.6,12.,3.2,  ZERO DEPTH,0,,0,8
!POBJ Zero.F=Arial,8,1,0

'   Obj26 -- OIMAGE *****
!POBJ oImage.Obj26=1.2,99.8,18.7,66.9,shapes\gold\rect.jpg,1

'   Obj26 -- OIMAGE *****
!POBJ oImage.Obj26=80.,99.8,18.7,66.9,shapes\gold\rect.jpg,1

'   ES -- OCHECK *****
!POBJ oCheck.ES=4.6,90.7,12.,3.2,    SURFACE,0,,0,8
!POBJ ES.F=Arial,8,1,0

'   Turn -- OHSLIDER *****
!POBJ oHSlider.Turn=82.6,42.7,13.4,5.,-200,200,0

'   ALLSTOP -- OCHECK *****
!POBJ oCheck.ALLSTOP=91.,59.6,5.6,7., ALL STOP,0,12,0,8
!POBJ ALLSTOP.F=Arial,8,1,0

'   Forward -- OBUTTON *****
!POBJ oButton.Forward=91.1,67.8,5.,4.,FWD,8
!POBJ Forward.F=Arial,8,1,0

'   REV -- OBUTTON *****
!POBJ oButton.REV=91.2,47.9,5.1,4.,REV,8
!POBJ REV.F=Arial,8,1,0

'   ROVDepthMeter -- OMETER *****
!POBJ oMeter.ROVDepthMeter=3.2,54.5,15.,16.,0,10,0,100

'   Obj25 -- OBUTTON *****
!POBJ oButton.Obj25=3.4,59.2,14.8,4.,ROV DEPTH metres,8
!POBJ Obj25.F=Arial,8,1,0

'   AUTO -- OCHECK *****
!POBJ oCheck.AUTO=82.,70.2,3.,13.,AUTO,0,,0,8
!POBJ AUTO.F=Arial,8,1,0

'   MAN -- OCHECK *****
!POBJ oCheck.MAN=82.,56.4,3.,13.,MAN,1,,0,8
!POBJ MAN.F=Arial,8,1,0

'   VertSlider -- OVSLIDER *****
!POBJ oVSlider.VertSlider=82.,95.,4.,24.,-200,200,40

'   Descend -- OBUTTON *****
!POBJ oButton.Descend=86.,74.7,8.,4.,DESCEND,8
!POBJ Descend.F=Arial,8,1,0

'   Ascend -- OBUTTON *****
!POBJ oButton.Ascend=86.,94.4,8.,4.,ASCEND,8
!POBJ Ascend.F=Arial,8,1,0

'   LeakLED -- OIMGBUT *****
!POBJ oImgBut.LeakLED=3.4,70.,5.,9.,comp\led_red_1.jpg,1,comp\led_red_0.jpg,1

'   Direction -- OIMAGE *****
!POBJ oImage.Direction=13.,70.,5.,9.,Arrow0.jpg,1

'   Obj25 -- OBUTTON *****
!POBJ oButton.Obj25=9.,75.,8.9,4.,HEADING,8
!POBJ Obj25.F=Arial,8,1,0

'   HeadingBias -- OHSLIDER *****
!POBJ oHSlider.HeadingBias=3.4,82.,14.3,4.2,0,360,189

'   Obj27 -- OBUTTON *****
!POBJ oButton.Obj27=4.6,86.5,12.,4.1,ZERO HEADING,8
!POBJ Obj27.F=Arial,8,1,0

'   Degrees -- OLABEL *****
!POBJ oLabel.Degrees=5.8,68.,10.,4.,23,,11,12,0
!POBJ Degrees.F=Arial,12,1,0

ENDMAC