Added the new (real) text, and some FIXMEs.

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 &copy; 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 */