<% CONST isActivity = true Dim num num = request("num") if (num="") then num=0 end if num = CInt(num) Dim captions(14) Dim photoImages(14) Dim userName(14) Dim userAge(14) Dim artName(14) Dim state(14) Dim teacherName(14) photoImages(0) = "/writeit/fiction/brainstorm/images/artresponses/Farah.jpg" captions(0) = "What events led up to this moment? Write in the voice of this character." userName(0) = "Abdullahi M. Farah" userAge (0) = "17" artName(0) = "Extreme Self-Portrait" state(0) = "Maryland" teacherName(0) = "" photoImages(1) = "/writeit/fiction/brainstorm/images/artresponses/Kim.jpg" captions(1) = "Write a story that captures the mood of this picture." userName(1) = "Philip Kim" userAge (1) = "17" artName(1) = "84" state(1) = "New Jersey" teacherName(1) = "" photoImages(2) = "/writeit/fiction/brainstorm/images/artresponses/Kwak1.jpg" captions(2) = "Write a dialogue between two strangers on a subway." userName(2) = "Joram Kwak" userAge (2) = "17" artName(2) = "In the Subway" state(2) = "New Jersey" teacherName(2) = "" photoImages(3) = "/writeit/fiction/brainstorm/images/artresponses/Kwak.jpg" captions(3) = "There are three seconds left on the clock. The game is tied. What's going through these characters' minds?" userName(3) = "Joram Kwak" userAge (3) = "17" artName(3) = "At the Ball Game" state(3) = "New Jersey" teacherName(3) = "" photoImages(4) = "/writeit/fiction/brainstorm/images/artresponses/Kwak3.jpg" captions(4) = "Write a story that explores the conflict in this drawing." userName(4) = "Joram Kwak" userAge (4) = "17" artName(4) = "In the City" state(4) = "New Jersey" teacherName(4) = "" photoImages(5) = "/writeit/fiction/brainstorm/images/artresponses/Ortega.jpg" captions(5) = "What does the world look like from his eyes?" userName(5) = "Marcos Ortega" userAge (5) = "18" artName(5) = "Take Me to Your Leader" state(5) = "Wisconsin" teacherName(5) = "" photoImages(6) = "/writeit/fiction/brainstorm/images/artresponses/ching.jpg" captions(6) = "What isn't being said between these three characters?" userName(6) = "Kathleen Ching" userAge (6) = "17" artName(6) = "Natalie, Michael and Ellen" state(6) = "New York" teacherName(6) = "" photoImages(7) = "/writeit/fiction/brainstorm/images/artresponses/ching2.jpg" captions(7) = "Write a story from the perspective of the photographer who took this picture." userName(7) = "Kathleen Ching" userAge (7) = "17" artName(7) = "Joseph, Helena and Nicole" state(7) = "New York" teacherName(7) = "" photoImages(8) = "/writeit/fiction/brainstorm/images/artresponses/ching3.jpg" captions(8) = "If dogs could talk, what would this one say?" userName(8) = "Kathleen Ching" userAge (8) = "17" artName(8) = "Viktor, Joy, Luda and Vadim" state(8) = "New York" teacherName(8) = "" photoImages(9) = "/writeit/fiction/brainstorm/images/artresponses/Sirkin.jpg" captions(9) = "How did the world end? " userName(9) = "Gabrielle Sirkin" userAge (9) = "17" artName(9) = "Apocalypse Now" state(9) = "Connecticut" teacherName(9) = "" photoImages(10) = "/writeit/fiction/brainstorm/images/artresponses/Francis.jpg" captions(10) = "Write a story based on this painting that has the logic of a dream." userName(10) = "Francis Hamill" userAge (10) = "17" artName(10) = "Dream 8" state(10) = "Wisconsin" teacherName(10) = "" photoImages(11) = "/writeit/fiction/brainstorm/images/artresponses/Chesky.jpg" captions(11) = "Write a story from the perspective of a hiker who stumbles upon the Statue of Liberty." userName(11) = "Julia Chesky" userAge (11) = "18" artName(11) = "Untitled" state(11) = "Massachusetts" teacherName(11) = "" photoImages(12) = "/writeit/fiction/brainstorm/images/artresponses/Drummond.jpg" captions(12) = "Who are these characters? How did they get here?" userName(12) = "Jonathan Drummond" userAge (12) = "18" artName(12) = "Road Trip Series 4" state(12) = "Ohio" teacherName(12) = "" photoImages(13) = "/writeit/fiction/brainstorm/images/artresponses/Geiger.jpg" captions(13) = "What is the girl in the background thinking?" userName(13) = "Chelsea Geiger" userAge (13) = "17" artName(13) = "Mechanics" state(13) = "Maryland" teacherName(13) = "" Dim numPhotos numPhotos = UBound(photoImages)-1 Dim thisFileName, HeadLine thisFileName = Request.ServerVariables("script_name") %> Scholastic.com | Teachers: Write It | Short Fiction

<%=captions(num)%>
<%=userName(num)%>, <%=userAge(num)%>
<%= artName(num) %>, <%= state(num) %>
<% if len(teacherName(num))>0 then %> <%= teacherName(num) %> <% end if %>
<% for i=1 to numPhotos+1 if i = num+1 then %> <% else %> <% end if next %>
<% if num > 0 then %> Previous <% else %> <% end if %> <%=i%><%=i%> <% if num < numPhotos then %> Next <% else %> <% end if %>
Close Close