dim integer blks,param1,param2
dim string SequenceTable(28)
blks=50
dim float dbb(blks),pob(blks),dob(blks)
SequenceTable(0)="FollowerExtend"
SequenceTable(1)="FollowerRetract"
SequenceTable(2)="IsFollowerRetracted"
SequenceTable(3)="MandrelExtend"
SequenceTable(4)="IsMandrelExtended"
SequenceTable(5)="MandrelRetract"
SequenceTable(6)="ColletClose"
SequenceTable(7)="IsColletClosed"
SequenceTable(8)="ColletOpen"
SequenceTable(9)="IsColletOpen"
SequenceTable(10)="ClampPdieClose"
SequenceTable(11)="IsClampPdieClosed"
SequenceTable(12)="ClampPdieOpen"
SequenceTable(13)="IsClampPdieOpen"
SequenceTable(14)="ClampOpen"
SequenceTable(15)="IsClampOpen"
SequenceTable(16)="ClampClose"
SequenceTable(17)="IsClampClosed"
SequenceTable(18)="PdieOpen"
SequenceTable(19)="IsPdieOpen"
SequenceTable(20)="PdieClose"
SequenceTable(21)="IsPdieClosed"
SequenceTable(22)="PdieShort"
SequenceTable(23)="IsPdieShort"
SequenceTable(24)="IsSeqStartSignal"
SequenceTable(25)="BendDieReturn"
SequenceTable(26)="BendDieReturnOff"
SequenceTable(27)="HighPressure"
SequenceTable(28)="HighPressureOff"
param1=3
param2=1000
timer=0
for i=0 to 28
Call SequenceTable(i),param1,param2
next
fin=timer
print fin,"Done"
print param1,param2
sub FollowerExtend(a as integer,b as integer)
inc a
end sub
sub FollowerRetract(a as integer,b as integer)
end sub
sub IsFollowerRetracted(a as integer,b as integer)
end sub
sub MandrelExtend(a as integer,b as integer)
end sub
sub IsMandrelExtended(a as integer,b as integer)
end sub
sub MandrelRetract(a as integer,b as integer)
end sub
sub IsMandrelRetracted(a as integer,b as integer)
end sub
sub ColletClose(a as integer,b as integer)
end sub
sub IsColletClosed(a as integer,b as integer)
end sub
sub ColletOpen(a as integer,b as integer)
end sub
sub IsColletOpen(a as integer,b as integer)
end sub
sub ClampPdieClose(a as integer,b as integer)
end sub
sub IsClampPdieClosed(a as integer,b as integer)
end sub
sub ClampPdieOpen(a as integer,b as integer)
end sub
sub IsClampPdieOpen(a as integer,b as integer)
end sub
sub ClampOpen(a as integer,b as integer)
end sub
sub IsClampOpen(a as integer,b as integer)
end sub
sub ClampClose(a as integer,b as integer)
end sub
sub IsClampClosed(a as integer,b as integer)
end sub
sub PdieOpen(a as integer,b as integer)
end sub
sub IsPdieOpen(a as integer,b as integer)
end sub
sub PdieClose(a as integer,b as integer)
end sub
sub IsPdieClosed(a as integer,b as integer)
end sub
sub PdieShort(a as integer,b as integer)
end sub
sub IsPdieShort(a as integer,b as integer)
end sub
sub IsSeqStartSignal(a as integer,b as integer)
end sub
sub BendDieReturn(a as integer,b as integer)
end sub
sub BendDieReturnOff(a as integer,b as integer)
end sub
sub HighPressure(a as integer,b as integer)
end sub
sub HighPressureOff(a as integer,b as integer)
end sub

/usr/lib/gcc/arm-none-eabi/14.2.1/../../../arm-none-eabi/bin/ld: PicoMite.elf section `.heap' will not fit in region `RAM'
/usr/lib/gcc/arm-none-eabi/14.2.1/../../../arm-none-eabi/bin/ld: region `RAM' overflowed by 188 bytes
collect2: error: ld returned 1 exit status
make[2]: *** [CMakeFiles/PicoMite.dir/build.make:2414: PicoMite.elf] Error 1
make[1]: *** [CMakeFiles/Makefile2:2423: CMakeFiles/PicoMite.dir/all] Error 2
make: *** [Makefile:91: all] Error 2

mkdir -p ~/pico && cd ~/pico
git clone https://github.com/raspberrypi/pico-sdk.git
cd pico-sdk
git checkout tags/2.2.0 -b sdk2.2.0
git submodule update --init

echo 'export PICO_SDK_PATH=~/pico/pico-sdk' >> ~/.bashrc
source ~/.bashrc