cargasvigas
DownloadTélécharger
Actions
Vote :
ScreenshotAperçu

Informations
Catégorie :Category: nCreator TI-Nspire
Auteur Author: alvaro catacora
Type : Classeur 3.0.1
Page(s) : 1
Taille Size: 2.54 Ko KB
Mis en ligne Uploaded: 12/04/2025 - 22:04:28
Mis à jour Updated: 12/04/2025 - 22:09:10
Uploadeur Uploader: alvaro catacora (Profil)
Téléchargements Downloads: 2
Visibilité Visibility: Archive publique
Shortlink : http://ti-pla.net/a4579707
Type : Classeur 3.0.1
Page(s) : 1
Taille Size: 2.54 Ko KB
Mis en ligne Uploaded: 12/04/2025 - 22:04:28
Mis à jour Updated: 12/04/2025 - 22:09:10
Uploadeur Uploader: alvaro catacora (Profil)
Téléchargements Downloads: 2
Visibilité Visibility: Archive publique
Shortlink : http://ti-pla.net/a4579707
Description
Fichier Nspire généré sur TI-Planet.org.
Compatible OS 3.0 et ultérieurs.
<<
-- Cabecera necesaria para TI-Nspire define(function() -- Función para mostrar menú de selección function menu(items, title) return math.eval("popup(list{"..table.concat(items, ",").."},""..title.."")") end -- Función principal function main() local beam = {} beam.L = tonumber(var.recall("L") or 0 if beam.L == 0 then beam.L = tonumber(platform.window:prompt("Longitud de la viga (m):", "5")) var.store("L", beam.L) end -- Configurar apoyos (interfaz Nspire) beam.supports = { {type = menu({"Rótula", "Empotramiento", "Rodillo"}, "Apoyo izquierdo")}, {pos = 0}, {type = menu({"Rótula", "Empotramiento", "Rodillo"}, "Apoyo derecho")}, {pos = beam.L} } -- Ingresar cargas (adaptado a Nspire) beam.loads = {} local n = tonumber(platform.window:prompt("Número de cargas puntuales:", "2")) or 0 for i = 1, n do beam.loads[i] = { type = "puntual", F = tonumber(platform.window:prompt("F"..i.." (N):", "100")), x = tonumber(platform.window:prompt("Posición x"..i.." (m):", tostring(beam.L*(i/(n+1))))) } end -- Cálculo de reacciones (simbólico con CAS) local R1, R2 = calculateReactions(beam) -- Mostrar resultados local results = "Reacciones:nR1 = "..R1.." NnR2 = "..R2.." N" platform.window:alert(results) -- Graficar (API de gráficos Nspire) local g = graph.plot(beam.L) plotShear(g, beam, R1) plotMoment(g, beam, R1) end -- Función para graficar Cortante (Nspire API) function plotShear(graph, beam, R1) local V = function(x) local sum = -R1 for _, load in ipairs(beam.loads) do if load.type == "puntual" and x >= load.x then sum = sum + load.F end end return sum end graph:addFunction(V, 0, beam.L, "blue"):setLabel("Fuerza Cortante") end -- Registra el menú en la calculadora return { {name = "Análisis de Vigas", func = main} } end) Made with nCreator - tiplanet.org
>>
Compatible OS 3.0 et ultérieurs.
<<
-- Cabecera necesaria para TI-Nspire define(function() -- Función para mostrar menú de selección function menu(items, title) return math.eval("popup(list{"..table.concat(items, ",").."},""..title.."")") end -- Función principal function main() local beam = {} beam.L = tonumber(var.recall("L") or 0 if beam.L == 0 then beam.L = tonumber(platform.window:prompt("Longitud de la viga (m):", "5")) var.store("L", beam.L) end -- Configurar apoyos (interfaz Nspire) beam.supports = { {type = menu({"Rótula", "Empotramiento", "Rodillo"}, "Apoyo izquierdo")}, {pos = 0}, {type = menu({"Rótula", "Empotramiento", "Rodillo"}, "Apoyo derecho")}, {pos = beam.L} } -- Ingresar cargas (adaptado a Nspire) beam.loads = {} local n = tonumber(platform.window:prompt("Número de cargas puntuales:", "2")) or 0 for i = 1, n do beam.loads[i] = { type = "puntual", F = tonumber(platform.window:prompt("F"..i.." (N):", "100")), x = tonumber(platform.window:prompt("Posición x"..i.." (m):", tostring(beam.L*(i/(n+1))))) } end -- Cálculo de reacciones (simbólico con CAS) local R1, R2 = calculateReactions(beam) -- Mostrar resultados local results = "Reacciones:nR1 = "..R1.." NnR2 = "..R2.." N" platform.window:alert(results) -- Graficar (API de gráficos Nspire) local g = graph.plot(beam.L) plotShear(g, beam, R1) plotMoment(g, beam, R1) end -- Función para graficar Cortante (Nspire API) function plotShear(graph, beam, R1) local V = function(x) local sum = -R1 for _, load in ipairs(beam.loads) do if load.type == "puntual" and x >= load.x then sum = sum + load.F end end return sum end graph:addFunction(V, 0, beam.L, "blue"):setLabel("Fuerza Cortante") end -- Registra el menú en la calculadora return { {name = "Análisis de Vigas", func = main} } end) Made with nCreator - tiplanet.org
>>