a new short film by
William M. Johns

WATCH THE MOVIE

DOWNLOAD THE MOVIE
(right click and select "save target/link as")
Quicktime Movie file - 16 Megs Widescreen

BUY THE DVD COMPILATION DISK - ONLY $10.00

FRAME GRABS FROM THE SHOOT

A special thanks to:

We had a very successful shoot on Sunday, Feb 15th and I am so grateful to everyone who came out and helped. From crew to talent, everyone pitched in and made it a great shoot! - Thanks!

Papa John's Home Page

Special Thanks to Papa John's of Kent, Co-Sponsors with The Robin Hood Nite Club who provided Pizza and Beverages for the shoot!!
Papa John's Pizza - 439 E. Main St. - Kent, OH

This film was shot in one day and edited in one day for the Project Greenlight contest and to submit to festivals and webcasts.

SYNOPSIS:
The film is about a girl who walks into a club and runs into a guy who had somehow badly mistreated her. He acts as though nothing has happened and after an argument and some name calling, he pushes her to the floor. That's the last straw. A fight breaks out and in the end she wipes the floor with him, leaving him whimpering the question, "Why?" To find out the answer come to the shoot, or watch Project Greenlight in the fall on Bravo.

About the filmmaker

a presentation of


3 South State Street - Suite 4 - Painesville, OH 44077

<% 'Dimension variables Dim fsoObject 'File System Object Dim tsObject 'Text Stream Object Dim filObject 'File Object Dim lngVisitorNumber 'Holds the visitor number Dim intWriteDigitLoopCount 'Loop counter to display the graphical hit count 'Create a File System Object variable Set fsoObject = Server.CreateObject("Scripting.FileSystemObject") 'Initialise a File Object with the path and name of text file to open Set filObject = fsoObject.GetFile(Server.MapPath("hit_count.txt")) 'Open the visitor counter text file Set tsObject = filObject.OpenAsTextStream 'Read in the visitor number from the visitor counter file lngVisitorNumber = CLng(tsObject.ReadAll) 'Increment the visitor counter number by 1 lngVisitorNumber = lngVisitorNumber + 1 'Create a new visitor counter text file over writing the previous one Set tsObject = fsoObject.CreateTextFile(Server.MapPath("hit_count.txt")) 'Write the new visitor number to the text file tsObject.Write CStr(lngVisitorNumber) 'Reset server objects Set fsoObject = Nothing Set tsObject = Nothing Set filObject = Nothing 'Loop to display graphical digits For intWriteDigitLoopCount = 1 to Len(lngVisitorNumber) 'Display the graphical hit count Response.Write("") Next %>