M16
Would you like to react to this message? Create an account in a few clicks or log in to continue.

times......

+3
Stark
xKross
Puddin
7 posters

Go down

times...... Empty times......

Post  Puddin Thu May 26, 2011 9:46 pm

what time is everyone on?

Puddin
Forum noob

Posts : 33
Join date : 2011-04-22
Location : From the shadows

Back to top Go down

times...... Empty Re: times......

Post  xKross Thu May 26, 2011 10:57 pm

Bleh...I wish I could say all the time..but NO its NEVER Evil or Very Mad Twisted Evil
xKross
xKross
Forum pro

Posts : 259
Join date : 2011-02-13
Age : 33
Location : KrossLand

Back to top Go down

times...... Empty Re: times......

Post  Stark Thu May 26, 2011 11:09 pm

YOUR DICKFACE.

Seriously though, I'm on randomly. I don't manage my time, I play what I want when I want! Although lately I have been busy with this shit.

# display rules
print "TIC-TAC-TOE"
print
print "To play just click on a square, X goes first."
print

# Make 2-D array
dim board$ (3,3)

# counter of how many turns have passed
clickcounter = 0

# draw a visual Tic Tac Toe board
clg
colour black

# change graph size
graphsize 301, 301

# Top line of board
line 1, 1, 300, 1

# Bottom line of board
line 1, 300, 300, 300

# Left side of board
line 1, 1, 1, 300

# Right side of board
line 300, 1, 300, 300

# Horizontal lines of board
line 100, 1, 100, 300
line 200, 1, 200, 300

# vertical lines of board
line 1, 100, 300, 100
line 1, 200, 300, 200


do
Xagain:
clickclear
# keep from random X being placed on board
while clickb = 0
pause 0.1
end while

colour blue
# finds where the X is placed and centers the X on the board
newcolumn = clickx \ 100
newrow = clicky \ 100
centerCX = (newcolumn * 100) + 24
centerRX = (newrow * 100) + 15
# When there is already a letter there turn starts over
if board$[newrow , newcolumn] <> "" then
gosub Xagain
endif
# only allows players to place X on empty squares
if board$[newrow , newcolumn] = "" then
board$[newrow , newcolumn] = "X"
font "Times New Roman", 50,75
text centerCX, centerRX, "X"
# increase turn counter by one
clickcounter = clickcounter + 1
end if
# find if X won
if board$[0, 0] = "X" and board$[0, 1] = "X" and board$[0, 2] = "X" then
colour black
line 1, 50, 300, 50
print "X wins!"
end
endif
if board$[1, 0] = "X" and board$[1, 1] = "X" and board$[1, 2] = "X" then
colour black
line 1, 150, 300, 150
print "X wins!"
end
endif
if board$[2, 0] = "X" and board$[2, 1] = "X" and board$[2, 2] = "X" then
colour black
line 1, 250, 300, 250
print "X wins!"
end
endif
if board$[0, 0] = "X" and board$[1, 0] = "X" and board$[2, 0] = "X" then
colour black
line 50, 1, 50, 300
print "X wins!"
end
endif
if board$[0, 1] = "X" and board$[1, 1] = "X" and board$[2, 1] = "X" then
colour black
line 150, 1, 150, 300
print "X wins!"
end
endif
if board$[0, 2] = "X" and board$[1, 2] = "X" and board$[2, 2] = "X" then
colour black
line 250, 1, 250, 300
print "X wins!"
end
endif
if board$[0, 0] = "X" and board$[1, 1] = "X" and board$[2, 2] = "X" then
colour black
line 1, 1, 300, 300
print "X wins!"
end
endif
if board$[0, 2] = "X" and board$[1, 1] = "X" and board$[2, 0] = "X" then
colour black
line 300, 1, 0, 300
print "X wins!"
end
endif

# after 9 turns the game ends
if clickcounter = 9 then
print "Cats Game!"
end
end if
Oagain:
clickclear
# keep from O being placed on board
while clickb = 0
pause 0.1
end while
# finds where the O is placed and centers the O on the board
newcolumn = clickx \ 100
newrow = clicky \ 100
centerCO = (newcolumn * 100) + 24
centerRO = (newrow * 100) + 15
colour blue
# When there is already a letter there turn starts over
if board$[newrow , newcolumn] <> "" then
gosub Oagain
endif
# only allows players to place O on empty squares
if board$[newrow , newcolumn] = "" then
board$ [newrow , newcolumn] = "O"
font "Times New Roman", 50, 75
text centerCO, centerRO, "O"
# increase turn counter by one
clickcounter = clickcounter + 1
end if
# find if O won
if board$[0, 0] = "O" and board$[0, 1] = "O" and board$[0, 2] = "O" then
colour black
line 1, 50, 300, 50
print "O wins!"
end
endif
if board$[1, 0] = "O" and board$[1, 1] = "O" and board$[1, 2] = "O" then
colour black
line 1, 150, 300, 150
print "O wins!"
end
endif
if board$[2, 0] = "O" and board$[2, 1] = "O" and board$[2, 2] = "O" then
colour black
line 1, 250, 300, 250
print "O wins!"
end
endif
if board$[0, 0] = "O" and board$[1, 0] = "O" and board$[2, 0] = "O" then
colour black
line 50, 1, 50, 300
print "O wins!"
end
endif
if board$[0, 1] = "O" and board$[1, 1] = "O" and board$[2, 1] = "O" then
colour black
line 150, 1, 150, 300
print "X wins!"
end
endif
if board$[0, 2] = "O" and board$[1, 2] = "O" and board$[2, 2] = "O" then
colour black
line 250, 1, 250, 300
print "O wins!"
end
endif
if board$[0, 0] = "O" and board$[1, 1] = "O" and board$[2, 2] = "O" then
colour black
line 1, 1, 300, 300
print "O wins!"
end
endif
if board$[0, 2] = "O" and board$[1, 1] = "O" and board$[2, 0] = "O" then
colour black
line 300, 1, 0, 300
print "O wins!"
end
endif
if clickcounter = 9 then
print "Cats Game!"
end if
until clickcounter = 9

All for a fucking game of Tic Tac Toe!

Stark
Stark
Forum master

Posts : 368
Join date : 2011-02-19
Age : 30
Location : Toronto, Canada

https://m16clan.forumotion.net

Back to top Go down

times...... Empty Re: times......

Post  Cyborg Thu May 26, 2011 11:46 pm

xD @ Stark, how long did it take for u to type that? Very Happy
Well since im from NZ im sometimes on when u guys r
But i thiink america is 17 hours behind Nz
Cyborg
Cyborg
Forum user

Posts : 77
Join date : 2011-04-09
Age : 27
Location : New Zealand

Back to top Go down

times...... Empty Re: times......

Post  LegioN Fri May 27, 2011 11:35 am

lawl usually around 3 in the morning ova here i see the NZ guys
LegioN
LegioN
Forum pro

Posts : 261
Join date : 2011-02-13
Age : 27

Back to top Go down

times...... Empty Re: times......

Post  Cow Fri May 27, 2011 11:59 am

anywhere from 3 - 10 Eastern time

<----and btw check out how sexy i am

Cow
Forum noob

Posts : 63
Join date : 2011-03-20

Back to top Go down

times...... Empty Re: times......

Post  xKross Fri May 27, 2011 4:06 pm

hmmmm so thats what a troll looks like.
xKross
xKross
Forum pro

Posts : 259
Join date : 2011-02-13
Age : 33
Location : KrossLand

Back to top Go down

times...... Empty Re: times......

Post  Shitmaker Sat May 28, 2011 5:49 pm

Optyk wrote:xD @ Stark, how long did it take for u to type that? Very Happy
Well since im from NZ im sometimes on when u guys r
But i thiink america is 17 hours behind Nz

Copy and paste Very Happy i am all the time on xf
Shitmaker
Shitmaker
Forum pro

Posts : 168
Join date : 2011-03-01

Back to top Go down

times...... Empty Re: times......

Post  Sponsored content


Sponsored content


Back to top Go down

Back to top

- Similar topics

 
Permissions in this forum:
You cannot reply to topics in this forum