diff --git a/anne-survey.rb b/anne-survey.rb index 851f6d1..37537fa 100644 --- a/anne-survey.rb +++ b/anne-survey.rb @@ -62,7 +62,7 @@ module Anne::Helpers remaining_images = all_images - voted_images return nil, 100 if remaining_images.empty? return remaining_images.sort_by { rand }.first, - 100 - (remaining_images.length * 100.0 / all_images.length).to_i + 100 - (remaining_images.length * 100.0 / all_images.length).ceil end end @@ -128,6 +128,7 @@ module Anne::Controllers def get return redirect Index if not @state["user"] return redirect Vote unless next_image.first.nil? + # FIXME: check whether email/prize/results have been sent, and redirect to Thanks. render :finish end @@ -164,25 +165,32 @@ module Anne::Views def layout xhtml_strict do head do - title "Anne's hippe enqueteshizzle" + title "Enquête ruimtelijke effecten" link :rel => "stylesheet", :type => "text/css", :media => "screen", :href => "/style.css" end body do div.header! do - h1 "Anne's hippe enqueteshizzle" + h1 "Enquête ruimtelijke effecten" end div.content! { self << yield } - div.footer! { } + div.footer! { "Copyright © 2010 Anne Pijl, Bram Senders, Paul van Tilburg" } end end end def intro - h2 "Fill out this survey and win your FREE dosage of generic Vi8gra!" - p "Lalala! [Introtekst hier]" - p "(Jij bent #{@env["REMOTE_ADDR"]})" - a "Start de enquête", :href => R(Start) + p "Met deze enquête worden een aantal ruimtelijke effecten onderzocht. " + + "Je krijgt 39 keer een plaatje met twee afbeeldingen te zien. " + + "Je kiest welke afbeelding, de linker of de rechter afbeelding, " + + "je ruimtelijker ervaart. " + + "In welk plaatje zie je meer diepte, welk plaatje lijkt jou het meest " + + "3-dimensionaal? Als je het niet weet, klik je op een willekeurige " + + "afbeelding. De test duurt 5 á 10 minuten. Succes!" + p "Doe de test volledig om kans te maken op de prijs." + p "– Anne Pijl" + a "Start de enquête!", :href => R(Start) + p "(Jij logt in vanaf #{@env["REMOTE_ADDR"]}.)" end def make_select(label_name, name, options) @@ -195,15 +203,26 @@ module Anne::Views end def start - p "Zeer persoonlijke vragen" + h2 "Persoonlijke karakteristieken" + p "Graag zou ik ten behoeve van de statistiek het volgende van je willen weten:" form :action => R(Start), :method => :post do - make_select "Studie", "user_study", ["nvt", "Foo", "Bar"] - make_select "Studiejaar", "user_study_year", ["nvt"] + (1998..2010).to_a + make_select "Faculteit:", "user_study", + ["niet van toepassing", + "Biomedische Technologie", + "Bouwkunde", + "Electrical Engineering", + "Industrial Design", + "Scheikundige Technologie", + "Industrial Engineering & Innovation Sciences", + "Technische Natuurkunde", + "Werktuigbouwkunde", + "Wiskunde & Informatica"] + make_select "Studiejaar", "user_study_year", ["niet van toepassing"] + (1998..2009).to_a make_select "Geslacht", "user_gender", ["", "man", "vrouw"] - make_select "Kleurenblind?", "user_colorblind", ["nee", "ja"] - make_select "Ruimtelijk ingesteld?", "user_spaciousness", - ["neutraal", "ja", "nee"] + make_select "Ben je kleurenblind?", "user_colorblind", ["nee", "ja"] + make_select "Vind je dat je een goed ruimtelijk voorstellingsvermogen hebt?", + "user_spaciousness", ["neutraal", "ja", "nee"] input :type => "submit", :value => "Start de enquete" end @@ -211,6 +230,7 @@ module Anne::Views def vote(image, progress = 0) h2 "Welk beeld is ruimtelijker?" + # FIXME: resize all images img :src => R(ImageX, image), :width => "80%" form :action => R(Vote), :method => :post do input :type => "hidden", :name => "image", :value => image @@ -221,9 +241,9 @@ module Anne::Views end def finish - h2 "Je bent geweldig!" - p "Nu ga ik een stukje op m'n motor rijden. Doei!" - p "Maar we hebben nog wat zeer persoonlijke vragen:" + h2 "Dank je wel voor het meedoen aan dit onderzoek." + p "Als je geïnteresseerd bent in de resultaten van de enquête of je wilt " + + "meedingen naar de prijs, vul dan hier je e-mailadres in." form :action => R(Finish), :method => :post do p do @@ -239,16 +259,22 @@ module Anne::Views label "Ik ben een nieuwsgierig aagje en ik wil het naadje van je kous weten!", :for => "results" end - input :type => "submit", :value => "Okee, ik doe normaal!" + p "Je e-mailadres wordt enkel gebruikt voor de enquête resultaten en " + "om je op de hoogte te stellen als je gewonnen hebt." + + input :type => "submit", :value => "Verstuur" end end def thanks - h2 "Bedankt voor die bloemen!" + h2 "Bedankt!" + + p "Je antwoorden zijn verstuurd." end end +# FIXME: Insert some TU/e styling here __END__ /* Style sheet for the Anne Survey Camping app */