--- title: "Cantilever Beam Calculation" id: 76357 type: "computer_media" slug: "cantilever-beam-calculation" url: "http://localhost/computer_media/cantilever-beam-calculation/" markdown_url: "http://localhost/computer_media/cantilever-beam-calculation.md" published_at: "2026-11-11T08:03:06+00:00" modified_at: "2026-11-11T08:03:06+00:00" author: "David Anderson" featured_image: url: "http://localhost/wp-content/uploads/2026/11/cantilever-beam-calculation-1.png" excerpt: "Calculate the maximum safe load and the deflection of a wooden beam fixed at one end and loaded at the other." post_tag: - name: "Downloadable" slug: "downloadable" taxonomy: "post_tag" url: "http://localhost/tag/downloadable/" - name: "TS 1000" slug: "ts1000" taxonomy: "post_tag" url: "http://localhost/tag/ts1000/" - name: "ZX81" slug: "zx81" taxonomy: "post_tag" url: "http://localhost/tag/zx81/" model: - name: "Sinclair ZX81" slug: "zx81" taxonomy: "model" url: "http://localhost/model/zx81/" - name: "Timex/Sinclair 1000" slug: "ts-1000" taxonomy: "model" url: "http://localhost/model/ts-1000/" indiv: - name: "R. A. Pick" slug: "r-a-pick" taxonomy: "indiv" url: "http://localhost/indiv/r-a-pick/" genre: - name: "Engineering" slug: "engineering" taxonomy: "genre" url: "http://localhost/type/engineering/" media_type: "Program" programmers: - name: "R. A. Pick" slug: "r-a-pick" taxonomy: "indiv" url: "http://localhost/indiv/r-a-pick/" download_url: "https://archive.org/download/timex-sinclair-software-archive/Cantilever%20Beam%20Calculation%20%281984%29%28Pick%2C%20R.%20A.%29%28TS1000%29%28US%29%28Program%29.zip" mediadate: "1984" images: - url: "http://localhost/wp-content/uploads/2026/11/cantilever-beam-calculation-1.png" - url: "http://localhost/wp-content/uploads/2026/11/cantilever-beam-calculation-2.png" article_media: - id: 19805 title: "Cantilever Beam Calculation" type: "article" url: "http://localhost/article/cantilever-beam-calculation/" media_type_tags: "Engineering" license: false --- # Cantilever Beam Calculation Asks for the length of the beam in feet, its width and depth in inches, and the wood (fir, hemlock or redwood, select grade at 15% moisture), then prints the maximum safe load in pounds and the deflection in inches. Type CONT for another beam. The author warns that the results must not be used where safety depends on them. As printed, line 240 falls through to the redwood values in lines 245-280 whatever wood you choose, so fir and hemlock give the redwood results. No correction was published. Published in Syntax June 1984 ([Cantilever Beam Calculation](https://timexsinclair.com/article/cantilever-beam-calculation/)). ## Source Code ``` 10 PRINT "CALCULATES MAX SAFE LOAD AND DEFLECTION FOR A BEAM FIXED AT ONE END AND LOADED AT THE OTHER" 15 PRINT 20 PRINT "ENTER LENGTH IN FEET "; 30 INPUT L 40 PRINT L;" FT" 45 PRINT 50 PRINT "ENTER WIDTH IN INCHES"; 60 INPUT W 70 PRINT W;" """ 75 PRINT 80 PRINT "ENTER DEPTH IN INCHES"; 90 INPUT D 100 PRINT D;" """ 105 PRINT 110 PRINT "SELECT WOOD" 112 PRINT "FIR=1",,"HEMLOCK=2",,"REDWOOD=3" 120 INPUT M 130 PRINT M;" SELECTED" 135 PRINT 140 IF M<>1 THEN GOTO 190 145 LET DN=37.2 150 LET US=1200 160 LET HS=84 170 LET E=1.6E6 180 LET X=66.7 190 IF M<>2 THEN GOTO 240 195 LET DN=30.7 200 LET US=1024 210 LET HS=56 220 LET E=1.2E6 230 LET X=55.6 240 IF M>3 OR M<1 THEN GOTO 110 245 LET DN=28.3 250 LET US=1040 260 LET HS=60 270 LET E=1.4E6 280 LET X=55.6 300 LET WB=DN*(D/12)*(W/12)*L 310 LET LD=(W*D**2*X)/(4*L) 320 IF L<=D THEN LET LD=(W*D*HS)/3 330 LET SL=LD-(WB/2) 340 LET DE=(4*SL*(L*12)**3)/(E*W*D**3) 350 PRINT "SAFE LOAD= ";SL;" POUNDS" 355 PRINT "DEFLECTION= ";DE;" INCHES" 360 PRINT "ENTER ""CONTINUE"" FOR MORE" 370 STOP 380 GOTO 20 ```