8 replies to this topic

[Jex]

Client :

AutoIt        expandcollapse  popup

#include <GUIConstants.au3>
#include <ARRAY.AU3>

Global $MainSocket, $Server, $Port, $Nick, $Nick2, $Turn, $Shape, $Shape2, $Winner, $Moves, $Player, $Me, $Opponent
Global $Point1 = 0
Global $Point2 = 0
Global $Games = 0
Global $Box[4][4]
Global $Button[4][4]
Global $Checkwin[9]
Global $Connected = 0
Local $MaxLength = 512

$Form1 = GUICreate("Tic Tac Toe", 217, 359, 193, 115)
$Group1 = GUICtrlCreateGroup("Login", 16, 224, 185, 121)
$Input1 = GUICtrlCreateInput(@IPAddress1, 72, 244, 105, 21)
$Input2 = GUICtrlCreateInput(5903, 72, 276, 105, 21)
$Label2 = GUICtrlCreateLabel("IP :", 32, 252, 20, 17)
$Label3 = GUICtrlCreateLabel("Port :", 32, 284, 29, 17)
$Connect = GUICtrlCreateButton("Connect !", 32, 308, 147, 25, 0)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button[1][1] = GUICtrlCreateButton("", 36, 17, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[1][2] = GUICtrlCreateButton("", 84, 17, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[1][3] = GUICtrlCreateButton("", 132, 17, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[2][1] = GUICtrlCreateButton("", 36, 65, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[2][2] = GUICtrlCreateButton("", 84, 65, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[2][3] = GUICtrlCreateButton("", 132, 65, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[3][1] = GUICtrlCreateButton("", 36, 113, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[3][2] = GUICtrlCreateButton("", 84, 113, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Button[3][3] = GUICtrlCreateButton("", 132, 113, 49, 49, 0)
GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
$Label4 = GUICtrlCreateLabel("Status :", 24, 176, 192, 17)
$Label5 = GUICtrlCreateLabel("Games : 0  You : 0  Opponent : 0", 24, 200, 192, 17)
GUISetState()

For $i = 1 To 3
    For $j = 1 To 3
        $Box[$i][$j] = 0
    Next
Next

While 1
    Checktcp()
    $msg = GUIGetMsg()
    Switch $msg
        Case $Connect
            TCPStartup()
            Check()
            $MainSocket = TCPConnect($Server, $Port)
            If $MainSocket = -1 Then
                GUICtrlSetData($Label4, "Status : Unable to connect.")
            Else
                GUICtrlSetData($Label4, "Status : Connecting...")
                TCPSend($MainSocket, "!Connected")
            EndIf
        Case $Button[1][1]
            Checkbutton(1, 1)
        Case $Button[1][2]
            Checkbutton(1, 2)
        Case $Button[1][3]
            Checkbutton(1, 3)
        Case $Button[2][1]
            Checkbutton(2, 1)
        Case $Button[2][2]
            Checkbutton(2, 2)
        Case $Button[2][3]
            Checkbutton(2, 3)
        Case $Button[3][1]
            Checkbutton(3, 1)
        Case $Button[3][2]
            Checkbutton(3, 2)
        Case $Button[3][3]
            Checkbutton(3, 3)
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Func Checkbutton($row, $column)
    TCPSend($MainSocket, "!Button-" & $Player & "-" & $row & "-" & $column)
EndFunc   ;==>Checkbutton

Func Click($Player, $row, $column)
    If $Player = $Me Then
        If $Box[$row][$column] = 0 And $Turn = True Then
            GUICtrlSetData($Button[$row][$column], $Shape)
            GUICtrlSetState($Button[$row][$column], $GUI_DISABLE)
            $Box[$row][$column] = 5
            Checkwin()
            Checkturn()
        EndIf
    ElseIf $Player = $Opponent Then
        If $Box[$row][$column] = 0 And $Turn = False Then
            GUICtrlSetData($Button[$row][$column], $Shape2)
            GUICtrlSetState($Button[$row][$column], $GUI_DISABLE)
            $Box[$row][$column] = 1
            Checkwin()
            Checkturn()
        EndIf
    EndIf
EndFunc   ;==>Click

Func Check()
    $Server = GUICtrlRead($Input1)
    $Port = GUICtrlRead($Input2)
EndFunc   ;==>Check

Func Checktcp()
    $Data = TCPRecv($MainSocket, $MaxLength)
    If StringInStr($Data, "!Player") Then
        If $Connected = 2 Then
            $Data = StringSplit($Data, "-")
            $Player = $Data[2]
            $Me = $Player
            If $Me = 1 Then
                $Opponent = 2
                $Shape = "X"
                $Shape2 = "O"
                $Turn = True
            Else
                $Opponent = 1
                $Shape = "O"
                $Shape2 = "X"
                $Turn = False
            EndIf
            Checkturn2()
            $Connected = 3
        EndIf
    ElseIf $Data = "!Ready" Then
        If $Connected = 1 Then
            GUICtrlSetData($Label4, "Status : Your Opponent ready.")
            $Connected = 2
        EndIf
    ElseIf $Data = "!Bye" Then
        MsgBox(16, "Session Ended", "Connection Terminated.")
        Exit
    ElseIf $Data = "!Connected" Then
        If $Connected = 0 Then
            GUICtrlSetState($Connect, $GUI_DISABLE)
            GUICtrlSetData($Label4, "Status : Waiting for Opponent.")
            $Connected = 1
        EndIf
    ElseIf StringInStr($Data, "!Button") Then
        $Data = StringSplit($Data, "-")
        Click($Data[2], $Data[3], $Data[4])
    ElseIf $Data <> "" Then
        MsgBox("", "", $Data)
    EndIf
EndFunc   ;==>Checktcp

Func Checkwin()
    For $j = 1 To 8
        $Checkwin[$j] = 0
    Next
    For $j = 1 To 3
        $Checkwin[1] += $Box[1][$j]
        $Checkwin[2] += $Box[2][$j]
        $Checkwin[3] += $Box[3][$j]
        $Checkwin[4] += $Box[$j][1]
        $Checkwin[5] += $Box[$j][2]
        $Checkwin[6] += $Box[$j][3]
    Next
    $Checkwin[7] = $Box[1][1] + $Box[2][2] + $Box[3][3]
    $Checkwin[8] = $Box[1][3] + $Box[2][2] + $Box[3][1]
    For $i = 1 To 8
        If $Checkwin[$i] = 15 Then
            $Winner = 1
            $Point1 += 1
            GUICtrlSetData($Label4, "Status : Winner You !")
        ElseIf $Checkwin[$i] = 3 Then
            $Winner = 1
            $Point2 += 1
            GUICtrlSetData($Label4, "Status : Winner Opponent !")
        EndIf
    Next
EndFunc   ;==>Checkwin

Func Reset()
    $Games += 1
    GUICtrlSetData($Label5, "Games : " & $Games & "  You : " & $Point1 & "  Opponent : " & $Point2)
    Sleep(2000)
    For $i = 1 To 3
        For $j = 1 To 3
            $Box[$i][$j] = 0
            GUICtrlSetData($Button[$i][$j], "")
            GUICtrlSetState($Button[$i][$j], $GUI_ENABLE)
        Next
    Next
    If $Shape = "X" Then
        $Shape = "O"
        $Shape2 = "X"
        $Turn = False
    Else
        $Shape = "X"
        $Shape2 = "O"
        $Turn = True
    EndIf
    $Winner = 0
    $Moves = 0
    Checkturn2()
EndFunc   ;==>Reset

Func Checkturn()
    If $Winner <> 1 Then
        $Moves += 1
        If $Moves = 9 Then
            GUICtrlSetData($Label4, "Status : Draw...")
            Reset()
        Else
            If $Turn = True Then
                $Turn = False
                GUICtrlSetData($Label4, "Status : Opponent Turn!  (  " & $Shape2 & "  )")
            Else
                $Turn = True
                GUICtrlSetData($Label4, "Status : Your Turn!  (  " & $Shape & "  )")
            EndIf
        EndIf
    Else
        Reset()
    EndIf
EndFunc   ;==>Checkturn

Func Checkturn2()
    If $Turn = True Then
        GUICtrlSetData($Label4, "Status : Your Turn!  (  " & $Shape & "  )")
    Else
        GUICtrlSetData($Label4, "Status : Opponent Turn!  (  " & $Shape2 & "  )")
    EndIf
EndFunc   ;==>Checkturn2

Func OnAutoItExit()
    If $MainSocket <> -1 Then
        TCPSend($MainSocket, "!Bye")
        TCPCloseSocket($MainSocket)
    EndIf
    TCPShutdown()
EndFunc   ;==>OnAutoItExitƒo݊÷ Ù'«½êÚºÚ"µÍˆÚ[˜ÛYH   ›ÑÕRPÛۜÝ[˘]Lə݈Ú[˜ÛYH ›ÐT”VKULə݈Ú[˜ÛYH ›ÑÕRQY]˜]Lə݈Ú[˜ÛYH    ›Ñ]K˜]LəÝ‚‘Ûؘ[ÛۜÝ  ˆÌ͎ÔܝH
NL‘Ûؘ[    ˆÌ͎ÓX^ÛۘÈH‘Ûؘ[ÛۜÝ    ˆÌ͎ÓX^[™ÝH
LL‚‘Ûؘ[ ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎ÓX^Ûۘ×B‘Ûؘ[ ˆÌ͎Ðݜ™[ÛØÚÙ]H‘Ûؘ[  ˆÌ͎ÐÛۛ™XÝ[ۈH“ØØ[   ˆÌ͎Õ˜XÚÈH‘Ûؘ[ÛۜÝ    ˆÌ͎ÓX^Ûۛ™XÝ[ۈH
    ˆÌ͎ÓX^ÛۘÈHJB‚‘›Üˆ   ˆÌ͎Õ˜XÚÈHÈ ˆÌ͎ÓX^Ûۛ™XÝ[ۈÝB‚IˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×HHLB“™^‚‰ˆÌ͎ћܛLHHÕRPܙX]J    œ][ÝÕXÈXÈÙH
ٝ™ŠIœ][ÝË
Œ‹
ÎKNLËLMJB‰ˆÌ͎ÑY]HÕRPÝ›ܙX]QY]
    œ][Ýɜ][ÝË
N
KÎLËš]Ԋ  ˆÌ͎ÑT×ԑPQӓK    ˆÌ͎ÑT×ÕÐS•‘UT“‹    ˆÌ͎ÕÔ×ՔÐԓÓ  ˆÌ͎ÕÔ×ÒÐԓÓ   ˆÌ͎ÑT×ÐUUՔÐԓÓ  ˆÌ͎ÑT×ÐUUÒÐԓÓ
JB‰ˆÌ͎Ò[œ]HHÕRPÝ›ܙX]R[œ]
    œ][Ýɜ][ÝË

L
KŒJB‰ˆÌ͎Н]یHHÕRPÝ›ܙX]P]ۊ    œ][ÝÔÙ[™[  œ][ÝË
LŒ

ÍKŒË
B‘ÕRTÙ]Ý]JÕ×ÔÒÕÊB‚‘Ûؘ[  ˆÌ͎ÓXZ[”ÛØÚÙ]HÔݝٝ™Š ˆÌ͎Ôܝ  ˆÌ͎ÓX^ÛۘÊB’Yˆœ›Üˆ  ›əÝÈ[‚‚PÛۜÛÛJ    œ][ÝÔٝ™ˆ[˜X›HÈ[š]X[^™K‰œ][ÝË œ][Ýɜ][ÝÊB‘[ÙB‚PÛۜÛÛJ   œ][ÝÔٝ™ˆ[š]X[^™Y‰œ][ÝË œ][Ýɜ][ÝÊB‘[™Y‚‚•Ú[HB‚IˆÌ͎ÛÙÈHÕRQÙ]ÙÊ
B‚TÝÚ]Ú   ˆÌ͎ÛÙ‚BPØÙH    ˆÌ͎Н]یB‚BBIˆÌ͎Ò[œ]HÕRPÝ›™XY
    ˆÌ͎Ò[œ]JB‚BBUÔÙ[™YÜØYÙP[
K ˆÌ͎Ò[œ]
B‚BBQÕRPÝ›Ù]]J    ˆÌ͎Ò[œ]K œ][Ýɜ][ÝÊB‚BPØÙH    ˆÌ͎ÑÕRWÑU‘S•ÐÓÔÑB‚BBQ^]‚Q[™ÝÚ]Ú‚IˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Ðݜ™[ÛØÚÙ]HHÔXØÙ
    ˆÌ͎ÓXZ[”ÛØÚÙ]
B‚RYˆ ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Ðݜ™[ÛØÚÙ]H   ›əÝÈLH[‚‚BIˆÌ͎Ðݜ™[ÛØÚÙ]HÛØÚÙ]ÙX˜Ú

B‚Q[™Y‚‚RYˆ   ˆÌ͎ÐÛۛ™XÝ[ۈHˆ[‚‚BUÔÙ[™YÜØYÙP[
K œ][ÝɈÌÌÎԙXYIœ][ÝÊB‚BTÛY
L
B‚BIˆÌ͎Ô^YŒHH˜[™ÛJK‹JB‚BRYˆ    ˆÌ͎Ô^YŒHHH[‚‚BBIˆÌ͎Ô^YŒHH   œ][ÝɈÌÌÎÔ^Y‹LIœ][Ý‚BBIˆÌ͎Ô^YŒˆH  œ][ÝɈÌÌÎÔ^Y‹L‰œ][Ý‚BQ[ÙRYˆ   ˆÌ͎Ô^YŒHHˆ[‚‚BBIˆÌ͎Ô^YŒHH  œ][ÝɈÌÌÎÔ^Y‹L‰œ][Ý‚BBIˆÌ͎Ô^YŒˆH œ][ÝɈÌÌÎÔ^Y‹LIœ][Ý‚BQ[™Y‚‚BUÔÙ[™
    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ÌK    ˆÌ͎Ô^YŒJB‚BPÛۜÛÛJ ˆÌ͎Ô^YŒH  ˜[È  œ][ÝÈÙ[™    œ][ÝÈ   ˜[È  ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ÌK    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ÌJB‚BUÔÙ[™
    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ÌWK    ˆÌ͎Ô^YŒŠB‚BPÛۜÛÛJ    ˆÌ͎Ô^YŒˆ ˜[È  œ][ÝÈÙ[™    œ][ÝÈ   ˜[È  ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ÌWK    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ÌWJB‚BIˆÌ͎ÐÛۛ™XÝ[ۈH‚Q[™Y‚‚IˆÌ͎Õ˜XÚÈH‚Q›Üˆ  ˆÌ͎Õ˜XÚÈHÈ ˆÌ͎ÓX^Ûۛ™XÝ[ۈÝB‚BRYˆ   ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×H   ›əÝÈLH[‚‚BBIˆÌ͎Ñ]HHÔ™X݊    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×K  ˆÌ͎ÓX^[™Ý
B‚BBRYˆ   ˆÌ͎Ñ]HH   œ][ÝɈÌÌÎОYIœ][ÝÈ[‚‚BBBUÔÛÜÙTÛØÚÙ]
    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×JB‚BBBPÛۜÛÛJ    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×H   ˜[È  œ][ÝÈØÛۛ™XÝY‰œ][ÝË ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×JB‚BBBIˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×HHLB‚BBBIˆÌ͎Ðݜ™[ÛØÚÙ]HÛØÚÙ]ÙX˜Ú

B‚BBQ[ÙRYˆ  ˆÌ͎Ñ]HH   œ][ÝɈÌÌÎÐÛۛ™XÝY    œ][ÝÈ[‚‚BBBUÔÙ[™
    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×K  œ][ÝɈÌÌÎÐÛۛ™XÝY    œ][ÝÊB‚BBBPÛۜÛÛJ    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×H   ˜[È  œ][ÝÈÛۛ™XÝY‰œ][ÝË    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×JB‚BBBIˆÌ͎ÐÛۛ™XÝ[ۈH  ˆÌ͎ÐÛۛ™XÝ[ۈ
ÈB‚BBQ[ÙRYˆ   ˆÌ͎Ñ]H ›əÝÈ   œ][Ýɜ][ÝÈ[‚‚BBBUÔÙ[™YÜØYÙP[
K ˆÌ͎Ñ]JB‚BBQ[™Y‚‚BQ[™Y‚‚S™^•Ñ[™‚‘[˜ÈÛۜÛÛJ ˆÌ͎Ñ]XK   ˆÌ͎ÐÛۊB‚IˆÌ͎ÑY]HÕRPÝ›™XY
    ˆÌ͎ÑY]
B‚RYˆ ˆÌ͎ÑY]H  œ][Ýɜ][ÝÈ[‚‚BQÕRPÝ›Ù]]J  ˆÌ͎ÑY]ӛÝÕ[YJ
JH  ˜[È  œ][ÝÈH œ][ÝÈ   ˜[ÈÙ]T
    ˆÌ͎ÐÛۊH  ˜[È  œ][ÝÈH œ][ÝÈ   ˜[È  ˆÌ͎Ñ]XJB‚Q[ÙB‚BQÕRPÝ›Ù]]J ˆÌ͎ÑY]    ˆÌ͎ÑY]    ˜[Èԓˆ ˜[ÈӛÝÕ[YJ
JH  ˜[È  œ][ÝÈH œ][ÝÈ   ˜[ÈÙ]T
    ˆÌ͎ÐÛۊH  ˜[È  œ][ÝÈH œ][ÝÈ   ˜[È  ˆÌ͎Ñ]XJB‚Q[™Y‚‚WÑÕRPÝ›Y]Ó[™TØܛÛ
    ˆÌ͎ÑY]ÑÕRPÝ›Y]ÑÙ][™PÛÝ[
    ˆÌ͎ÑY]
JB‘[™[˜ÈÏOI™ÝÐÛۜÛÛB‚‘[˜ÈÔÙ[™YÜØYÙP[
    ˆÌ͎ÐÛۛ™XÝ[ۓ[Z]  ˆÌ͎Ñ]JB‚SØØ[  ˆÌ͎Õ˜XÚÈH‚Q›Üˆ    ˆÌ͎Õ˜XÚÈHÈ ˆÌ͎ÐÛۛ™XÝ[ۓ[Z]‚BUÔÙ[™
    ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×K  ˆÌ͎Ñ]JB‚BRYˆÝš[™Ò[”ÝŠ  ˆÌ͎Ñ]K    œ][ÝɈÌÌÎН]ۉœ][ÝÊH[‚‚BBIˆÌ͎Ñ]LˆHÝš[™ÔÜ]
    ˆÌ͎Ñ]K    œ][ÝËIœ][ÝÊB‚BBPÛۜÛÛJ   ˆÌ͎Ñ]H ˜[È  œ][ÝÈ
^Yˆˆ œ][ÝÈ   ˜[È  ˆÌ͎Ñ]L–Ì—H  ˜[È  œ][ÝÈ›ÝȈ œ][ÝÈ   ˜[È  ˆÌ͎Ñ]L–Ì×H  ˜[È  œ][ÝÈÛÛ[[ˆˆ  œ][ÝÈ   ˜[È  ˆÌ͎Ñ]L–ÍH   ˜[È  œ][ÝÈ
HÙ[™    œ][ÝÈ   ˜[È  ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×K  ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×JB‚BQ[ÙRYˆ  ˆÌ͎Ñ]H ›əÝÈ   œ][Ýɜ][ÝÈ[‚‚BBPÛۜÛÛJ   ˆÌ͎Ñ]H ˜[È  œ][ÝÈÙ[™    œ][ÝÈ   ˜[È  ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×K  ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×JB‚BQ[™Y‚‚S™^‘[™[˜ÈÏOI™ÝÕÔÙ[™YÜØYÙP[‚‘[˜ÈÔݝٝ™Š    ˆÌ͎Ôܝ  ˆÌ͎ÓX^Ûۛ™XÝHJB‚SØØ[   ˆÌ͎ÔÛØÚÙ]‚IˆÌ͎ÔÛØÚÙ]HÔݝ

B‚TÙ[XÝ‚BPØÙH   ˆÌ͎ÔÛØÚÙ]H‚BBTÙ]œ›ÜŠœ›ÜŠB‚BBT™]›ˆLB‚Q[™Ù[XÝ‚IˆÌ͎ÔÛØÚÙ]HÔÝ[ŠTY™ÜÌK   ˆÌ͎Ôܝ  ˆÌ͎ÓX^Ûۛ™XÝ
B‚TÙ[XÝ‚BPØÙH   ˆÌ͎ÔÛØÚÙ]HLB‚BBTÙ]œ›ÜŠœ›ÜŠB‚BBT™]›ˆ‚Q[™Ù[XÝ‚TÙ]œ›ÜŠ
B‚T™]›ˆ    ˆÌ͎ÔÛØÚÙ]‘[™[˜ÈÏOI™ÝÕÔݝٝ™‚‚‘[˜ÈÛØÚÙ]ÙX˜Ú

B‚SØØ[ ˆÌ͎Õ˜XÚÈH‚Q›Üˆ    ˆÌ͎Õ˜XÚÈHÈ ˆÌ͎ÓX^Ûۛ™XÝ[ۈÝB‚BRYˆ   ˆÌ͎ÐÛۛ™XÝYÛØÚÙ]ɈÌ͎Õ˜XÚ×HHLH[‚‚BBT™]›ˆ   ˆÌ͎Õ˜XÚ‚BQ[ÙB‚BBN‚BQ[™Y‚‚S™^‘[™[˜ÈÏOI™ÝÔÛØÚÙ]ÙX˜Ú‚‘[˜ÈÙ]T
    ˆÌ͎ÔÛØÚÙ]
BˆØØ[  ˆÌ͎ÔÛØÚÙ]Y™Üˆ ˆÌ͎ÔÛØÚÙ]Y™ÜÈHݝXÝܙX]J   œ][ÝÜÚܝÝÚܝÝZ[ØÚ–ÎIœ][ÝÊBˆ    ˆÌ͎ÒTHØ[
    œ][ÝÕÜ̗Ì̋™   œ][ÝË  œ][ÝÚ[    œ][ÝË  œ][ÝÙÙ]Y›˜[YIœ][ÝË    œ][ÝÚ[    œ][ÝË  ˆÌ͎ÔÛØÚÙ]  œ][Ý܉œ][ÝËݝXÝÙ]Š    ˆÌ͎ÔÛØÚÙ]Y™ÜÊK    œ][ÝÚ[
‰œ][ÝËݝXÝÙ]Ú^™J ˆÌ͎ÔÛØÚÙ]Y™ÜÊJBˆYˆ›Ýœ›Üˆ[™  ˆÌ͎ÒTÌHH[‚ˆ    ˆÌ͎ÒTHØ[
    œ][ÝÕÜ̗Ì̋™   œ][ÝË  œ][ÝÜ݉œ][ÝË    œ][ÝÚ[™]۝ØIœ][ÝË    œ][ÝÚ[    œ][ÝËݝXÝÙ]]J ˆÌ͎ÔÛØÚÙ]Y™ÜËÊJBˆYˆ›Ýœ›Üˆ[ˆ ˆÌ͎ÒTH ˆÌ͎ÒTÌBˆ[ÙBˆ   ˆÌ͎ÒTHTY™ÜÌBˆ[™Y‚ˆ ˆÌ͎ÔÛØÚÙ]Y™ÜÈHˆ™]›ˆ    ˆÌ͎ÒT‘[™[˜ÈÏOI™ÝÔÛØÚÙ]Ò‚‘[˜Èې]]Ò]^]

B‚UÔÙ[™YÜØYÙP[
K œ][ÝɈÌÌÎОYIœ][ÝÊB‚TÛY
L
B‚UÔÚ]Ýۊ
B‘[™[˜ÈÏOI™ÝÓې]]Ò]^]

Edited by Jex, 01 April 2008 - 10:43 AM.

[gseller]

Haha, That is sweet!! Playing across the network... Thanks for sharing...

[Ibrahim]

Nice Work!

[Cristian]

Very Nice !

[James]

Looks nice, I will try it after I get back to Windows when I'm doing one thing or another

[goldenix]

Oo I did not know you can make server based games with autoit, cool but whyI get this on line 90?

>Running AU3Check (1.54.10.0)  from:C:\Program Files\AutoIt3
...\Desktop\List View.au3(90,70) : ERROR: _GUICtrlEditGetLineCount(): undefined function.
    _GUICtrlEditLineScroll ($Edit, 0, _GUICtrlEditGetLineCount ($Edit)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
...\Desktop\List View.au3(90,71) : ERROR: _GUICtrlEditLineScroll(): undefined function.
    _GUICtrlEditLineScroll ($Edit, 0, _GUICtrlEditGetLineCount ($Edit))

[Jex]

Oo I did not know you can make server based games with autoit, cool but whyI get this on line 90?

>Running AU3Check (1.54.10.0)  from:C:\Program Files\AutoIt3
...\Desktop\List View.au3(90,70) : ERROR: _GUICtrlEditGetLineCount(): undefined function.
    _GUICtrlEditLineScroll ($Edit, 0, _GUICtrlEditGetLineCount ($Edit)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
...\Desktop\List View.au3(90,71) : ERROR: _GUICtrlEditLineScroll(): undefined function.
    _GUICtrlEditLineScroll ($Edit, 0, _GUICtrlEditGetLineCount ($Edit))

I'm fixed errors now working with latest public release without errors ( 3.2.10.0 )
I'm not using AutoIt anymore ( I'm using Visual Basic .NET )

[goldenix]

May I ask why did you switch to Visual Basic .NET ?

[Triblade]

May I ask why did you switch to Visual Basic .NET ?

I don't know, but probably for this reason:
AutoIt is a scripting language. It is not meant for serious programming.
AutoIt is fairly simple to learn, it certainly does not hold the power to create powerfull applications.

AutoIt is created in C++ as far as I know.

How lower the pogramming language is, the harder it is to learn it but the more you can get outta it.

Edit:
On-topic:
Looks very slick!

Edited by Triblade, 03 April 2008 - 06:45 AM.