i need some help =S!!

[Pip_Jr]

I was making my Hang-Man prject that needs arrays and proccedures, then all of a suden (SCARIE PART) My computer crashed! oh god dam it!

andi lost like 200 lines of code and forgot what i put down =( please help out!

[cycro1234]

Ok, so what part of your code do you need help with?

[basketball4ever]

Well put what code you have now here... then we'll help u fix it or help u add more...
we cant just do the hangman for you...

[Pip_Jr]

damn my school computer, i'll sned it right when i get to school in...hm.... 20 mins ok

and i need it so i choose 1 letter thats in the word at a time, and if it gets it wrong it outputs the head of the stick man

[zomg]

i came to my current school late this semestre and had never taken visual basic before... but somehow i got stuck in the middle of a 2nd year VB class and my first program my teacher asked everybody to write was hangman game needless to say i got a big "0" on that assignment lol... just thought id share my sad story...anyway

anyway it would be good to ur code so we could help

[eNc]

shadow master wrote:

i came to my current school late this semestre and had never taken visual basic before... but somehow i got stuck in the middle of a 2nd year VB class and my first program my teacher asked everybody to write was hangman game needless to say i got a big "0" on that assignment lol... just thought id share my sad story...anyway

anyway it would be good to ur code so we could help

lol that sucks, did you tell him you don't kno vb ?

[Tony]

shadow master wrote:

needless to say i got a big "0" on that assignment

should have letted us know, we would have helped you out with that.. to the point where it's the best hangman in class

[eNc]

tony wrote:

shadow master wrote:

needless to say i got a big "0" on that assignment

should have letted us know, we would have helped you out with that.. to the point where it's the best hangman in class

lol you know it, but yea getting stuck in somthing you don't kno will give him a hard time all year.

[Pip_Jr]

code:

Program Called "Hanger" % Make the title Page! % Rows: 30 % Columns:100 setscreen ("graphics:vga") var picID : int := 0 var x, y : int := 0 picID := Pic.FileNew ("h:\\no man.bmp") Pic.Draw (picID, x, y, picCopy) %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% setscreen ("nocursor") color (yellow) colorback (blue) put "Welcome to!..." var words : array 1 .. 20 of string words (1) := "computer" words (2) := "toamrow" words (3) := "teacher" words (4) := "student" words (5) := "red" words (6) := "blue" words (7) := "orange" words (8) := "foods" words (9) := "haste" words (10) := "catholic" words (11) := "root" words (12) := "gap" words (13) := "think" words (14) := "palace" words (15) := "love" words (16) := "smell" words (17) := "bus" words (18) := "school" words (19) := "skateboarder" words (20) := "snowboarding" %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% locate (20, 48) put "Made by Cameorn Archer, With help of Mr.Ielapi!" delay (1000) colorback (black) cls color (yellow) colorback (black) %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% color (black) setscreen ("nocursor") color (yellow) var player : string put "Enter you First Name, Please." get player delay (560) cls if player = "Mya" then     % put "Have fun playing!"     % put "Girls Kick ass!" elsif player = "mya" then     % put "Have fun playing!"     % put "Girls Kick ass!" else     color (brightcyan)     locate (11, 40)     put "Loading... please wiat..."     for count : 1 .. 4         play (">g<")         play (">c<")         play (">A<")         play (">g<")         play (">D<")         play (">f<")         play (">c<")         play (">g<")         play (">k<")         play ("<k")         play ("c>")         play ("c>")         %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%         var letters : array 1 .. 26 of string (26)         letters (1) := "a"         letters (2) := "b"         letters (3) := "c"         letters (4) := "d"         letters (5) := "e"         letters (6) := "f"         letters (7) := "g"         letters (8) := "h"         letters (9) := "i"         letters (10) := "j"         letters (11) := "k"         letters (12) := "l"         letters (13) := "m"         letters (14) := "n"         letters (15) := "o"         letters (16) := "p"         letters (17) := "q"         letters (18) := "r"         letters (19) := "s"         letters (20) := "t"         letters (21) := "u"         letters (22) := "v"         letters (23) := "w"         letters (24) := "x"         letters (25) := "y"         letters (26) := "z"         %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%CHESSE!%%%%%%%%%%%%%%%%%     end for     colorback (black)     cls end if randint (x, 1, 20) put "If you want to quit the game during GamePlay, Type 'quit' on the guess" loop colorback (black) cls    color (yellow)     var playagain : string     var alphabet : string := "a b c d e f g h i j k l m n o p q r s t u v w x y z"     var guess : string     colorback (black)     delay (1500)     cls     for count : 1 .. length (words (x))         put "_ " ..     end for     put " "     setscreen ("nocursor")     put "You have theis letters left..."     put alphabet     put "Enter guess."     get guess     if guess = "Give_Up" then         picID := Pic.FileNew ("h:\\Losing Page.bmp")         Pic.Draw (picID, x, y, picCopy)     end if     if guess = words (x) then     cls        picID := Pic.FileNew ("h:\\Winning Page.bmp")         Pic.Draw (picID, x, y, picCopy)         delay (2000)         get playagain         delay (500)         if playagain = "n" then             delay (500)             put "Aww =( Bye bye ", player             delay (575)             setscreen ("graphics:vga")             colorback (purple)             cls             picID := Pic.FileNew ("h:\\ender.bmp")             Pic.Draw (picID, x, y, picCopy)         elsif playagain = "y" then             delay (200)             put "Yay! =)"         end if         exit when playagain = "n"     end if     exit when guess = "quit"     exit when guess = "Give_Up" end loop

This is all i got at the moment =S

[zomg]

tony wrote:

shadow master wrote:

needless to say i got a big "0" on that assignment

should have letted us know, we would have helped you out with that.. to the point where it's the best hangman in class

i would have but i had just moved in with my dad and bro, and they didnt have the internet yet... i fixed that and my school didnt alow me to go on this site becuz its a "chat program" and "email" man ive heard it all this year anyway here i am at school and on this site

[Tony]

shadow master wrote:

my school didnt alow me to go on this site becuz its a "chat program" and "email"

well damn - god forbid that you'll actually deside to go somewhere and meet some people who post on compsci.. and then the school will be all like "OMG - we're going to get shut down because internet is full of student eating aliens"

hah - I met a bunch of people from this site

btw - my CS teacher reads this site So does McKenzie

[Bacchus]

my school just screwed around with their computers and now this site wont even load there but ya thats gotta suk being stuk in 2nd year class that you nothing of lol

[Cervantes]

Maybe I'm the only one who sees this, but if you lost your code, Pip_Jr, can't you rewrite it? I know it's a pain, but it's not as though it's our responsibility to write your code for you because you lost it. Besides, you should remember how you did it. And that's all we're going to help you with. I hope you're not asking us to finish your code for you.