Paso 7: Eso es todo! Ahora puede generar cualquier formulario web Wolfram lenguaje y evaluar así la salida!
El siguiente enlace le llevará a la plataforma de desarrollo de Wolfram para este ejemplo. Puede juguetear alrededor y hacer tus propios formularios web impresionante después de firmar!
En caso de que usted está preguntando cómo el programa habría mirado sin utilizar las funciones que hemos definido, ¡ aquí está! Su larga pero pasando cuidadosamente, podemos ver lo que hace cada parte del código.
Código:
energyEfficiency = CreateDatabin [< | " Nombre"->"Calculadora de eficiencia energética", permisos ->"Público","Interpretación"-> {"termostato"->"Entero","aislamiento"->"Entero","iluminación"->"Entero","energyStar"->"Entero","nevera"->"Entero","draftyWindows"->"Entero","aireadores"->"Entero","MaxBlend"->"Entero","la cortina"->"Entero","insDucts"->"Entero"} | >]
diseño [fo_FormObject]: = columna [{fo [AppearanceRules, "Título"], fo [AppearanceRules, "Descripción"], red [valores "Etiqueta"], fo [todos, "Control"]}, identidad], alineación -> izquierda]}];
CloudDeploy [FormFunction [FormObject [< | " termostato"-> < |" Intérprete"-> {"Yes"-> 10,"No"> 1},"Control"-> RadioButtonBar,"Etiqueta"-> ¿tienes un termostato programable?" | >, "aislamiento" -> < | "Intérprete" -> {"Yes" -> 10, "No" > 1, "Tal vez" -> 5}, "Control" -> RadioButtonBar, "Etiqueta" -> "es su casa bien aislada? | >, "iluminación" -> < | " -> El intérprete de"{"La mayoría/todos"-> 10,"Alrededor de la mitad"> 5," muy pocos/ninguno "-> 1},"Control"-> RadioButtonBar,"Etiqueta"->"¿Qué porcentaje de la iluminación es CFL? | >, -> "energyStar" < | " Intérprete"-> {"Yes"-> 10,"No"> 1},"Control"-> RadioButtonBar,"Etiqueta"->"son lo electrodomésticos energyStar certificado? | >, "nevera" -> < | " Intérprete"-> {"1"-> 10,"2"-> 5,"3"-> 1},"Control"-> RadioButtonBar,"Etiqueta"->"refrigeradores ¿cuántos tienes?"| >, "draftyWindows" -> < | " Intérprete"-> {"Yes"-> 1,"No"> 10,"Tal vez"-> 5},"Control"-> RadioButtonBar,"Etiqueta"->"¿la casa tiene ventanas pararán?"| >, -> "aireadores" < | " Intérprete"-> {"Yes"-> 10,"No"> 1},"Control"-> RadioButtonBar,"Etiqueta"->"¿tienen los grifos aireadores?"| >, -> "MaxBlend" < | " Intérprete"-> {"Yes"-> 10,"No"> 1},"Control"-> RadioButtonBar,"Etiqueta"->"son el duchas de bajo flujo? | >, "sombra" -> < | " Intérprete"-> {"Yes"-> 10,"No"> 1},"Control"-> RadioButtonBar,"Etiqueta"->"La casa tiene arbustos y árboles para sombra?"| >, "insDucts" -> < | " Intérprete"-> {"Yes"-> 10,"No"> 1},"Control"-> RadioButtonBar,"Etiqueta"->"Son los conductos de calefacción en las áreas sin calefacción aislamiento?"| > | >, -> AppearanceRules < | " Title"->"Toma el Quiz de eficiencia de energía.","Descripción"->"una puntuación superior a 70 es eficiente de la energía!","SubmitLabel"->"Calcular"| >, FormLayoutFunction -> diseño], (DatabinAdd [energyEfficiency, < |" termostato"-> #thermostat,"aislamiento"-> #insulation,"iluminación"-> #lighting,"energyStar"-> #energyStar,"nevera"-> #fridge,"draftyWindows"-> #draftyWindows,"aireadores"-> #aerators, «MaxBlend» -> #lowFlow,"la cortina"-> #shade,"insDucts"> insDucts| # >]; Rasterizar [estilo ["gracias por enviar tus valoraciones de eficiencia! Su puntuación de eficiencia energética es: "<> TextString [Total [valores [energyEfficiency]] [[-1]]], FontSize -> 20, FontFamily >"Aparajita"]]),"PNG", FormTheme ->"Blue"],"energyEfficiencyWorkingCopy", permisos ->"Público"]
