EQUIPMENT
PAGE

NEW PNUEMATIC MODIFICATION PICS AND ANIMATED SCHEMATIC.
Homemade Crane
This crane is capable of rising from 16" off the ground to 11' in the air and gives the operator full control over lift, pans, and tilts.

NEW VIDEO CLIPS USING DOLLY
Homemade Swiveling Dolly
This 2 x 4' dolly can actually make turns using PVC pipe for track. The track can be bowed into a circle as small as 16' and the dolly moves smoothly 360 degrees. Looking for the plans? Click here to go straight to the order form.

CREATED FROM AN OLD MITSUBISHI BIG SCREEN TV LENS ELEMENT
Homemade XL1 Wide angle lens adaptor

 

 

 

 

 

 

 

 

 

<% 'Dimension variables Dim fsoObject 'File System Object Dim tsObject 'Text Stream Object Dim filObject 'File Object Dim lngVisitorNumber 'Holds the visitor number Dim intWriteDigitLoopCount 'Loop counter to display the graphical hit count 'Create a File System Object variable Set fsoObject = Server.CreateObject("Scripting.FileSystemObject") 'Initialise a File Object with the path and name of text file to open Set filObject = fsoObject.GetFile(Server.MapPath("hit_count.txt")) 'Open the visitor counter text file Set tsObject = filObject.OpenAsTextStream 'Read in the visitor number from the visitor counter file lngVisitorNumber = CLng(tsObject.ReadAll) 'Increment the visitor counter number by 1 lngVisitorNumber = lngVisitorNumber + 1 'Create a new visitor counter text file over writing the previous one Set tsObject = fsoObject.CreateTextFile(Server.MapPath("hit_count.txt")) 'Write the new visitor number to the text file tsObject.Write CStr(lngVisitorNumber) 'Reset server objects Set fsoObject = Nothing Set tsObject = Nothing Set filObject = Nothing 'Loop to display graphical digits For intWriteDigitLoopCount = 1 to Len(lngVisitorNumber) 'Display the graphical hit count Response.Write("") Next %>