Code: Select all
1 0.000000 192.168.100.17 192.168.100.16 TCP 66 63424 → 554 [SYN] Seq=0 Win=65535 Len=0 MSS=1460 WS=256 SACK_PERM
2 0.000249 192.168.100.16 192.168.100.17 TCP 66 554 → 63424 [SYN, ACK] Seq=0 Ack=1 Win=14600 Len=0 MSS=1460 SACK_PERM WS=4
3 0.000519 192.168.100.17 192.168.100.16 TCP 54 63424 → 554 [ACK] Seq=1 Ack=1 Win=65280 Len=0
4 0.001293 192.168.100.17 192.168.100.16 RTSP 194 DESCRIBE rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0 RTSP/1.0
5 0.001500 192.168.100.16 192.168.100.17 TCP 60 554 → 63424 [ACK] Seq=1 Ack=141 Win=15672 Len=0
6 0.017779 192.168.100.16 192.168.100.17 RTSP/SDP 671 Reply: RTSP/1.0 200 OK
7 0.018521 192.168.100.17 192.168.100.16 RTSP 222 SETUP rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0/trackID=0 RTSP/1.0
8 0.020995 192.168.100.16 192.168.100.17 RTSP Reply: RTSP/1.0 200 OK
9 0.021564 192.168.100.17 192.168.100.16 RTSP 249 SETUP rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0/trackID=1 RTSP/1.0
10 0.022046 192.168.100.16 192.168.100.17 RTSP 200 Reply: RTSP/1.0 200 OK
11 0.022423 192.168.100.17 192.168.100.16 RTSP 211 PLAY rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0 RTSP/1.0
12 0.023137 192.168.100.16 192.168.100.17 RTSP 370 Reply: RTSP/1.0 200 OK
13 0.067928 192.168.100.17 192.168.100.16 TCP 54 63424 → 554 [ACK] Seq=661 Ack=1226 Win=64256 Len=0
14 0.114435 192.168.100.16 192.168.100.17 RTP 1514 PT=DynamicRTP-Type-96, SSRC=0x76712AA5, Seq=0, Time=0, Code: Select all
1 0.000000 192.168.100.17 192.168.100.16 TCP 66 63424 → 554 [SYN] Seq=0 Win=65535 Len=0 MSS=1460 WS=256 SACK_PERM
2 0.000249 192.168.100.16 192.168.100.17 TCP 66 554 → 63424 [SYN, ACK] Seq=0 Ack=1 Win=14600 Len=0 MSS=1460 SACK_PERM WS=4
3 0.000519 192.168.100.17 192.168.100.16 TCP 54 63424 → 554 [ACK] Seq=1 Ack=1 Win=65280 Len=0
4 0.001293 192.168.100.17 192.168.100.16 RTSP 194 DESCRIBE rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0 RTSP/1.0
5 0.001500 192.168.100.16 192.168.100.17 TCP 60 554 → 63424 [ACK] Seq=1 Ack=141 Win=15672 Len=0
6 0.017779 192.168.100.16 192.168.100.17 RTSP/SDP 671 Reply: RTSP/1.0 200 OK
7 0.018521 192.168.100.17 192.168.100.16 RTSP 222 SETUP rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0/trackID=0 RTSP/1.0
8 0.020995 192.168.100.16 192.168.100.17 RTSP Reply: RTSP/1.0 200 OK
9 0.021564 192.168.100.17 192.168.100.16 RTSP 249 SETUP rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0/trackID=1 RTSP/1.0
10 0.022046 192.168.100.16 192.168.100.17 RTSP 200 Reply: RTSP/1.0 200 OK
11 0.022423 192.168.100.17 192.168.100.16 RTSP 211 PLAY rtsp://192.168.100.16:554/22992e47b611dde40dde83b803ca1ab0_0 RTSP/1.0
12 0.023137 192.168.100.16 192.168.100.17 RTSP 370 Reply: RTSP/1.0 200 OK
13 0.067928 192.168.100.17 192.168.100.16 TCP 54 63424 → 554 [ACK] Seq=661 Ack=1226 Win=64256 Len=0
14 0.114435 192.168.100.16 192.168.100.17 RTP 1514 PT=DynamicRTP-Type-96, SSRC=0x76712AA5, Seq=0, Time=0, Attachments
Attachments
Attachments
Attachments
Code: Select all
@ 000,0975 LABEL L0 WIDTH 360 HEIGHT 105 FONT "TAHOMA" FONTCOLOR WHITE BOLD SIZE 33 VALUE "ROMPECABEZAS VINTAGE" TRANSPARENT UNDERLINE CENTERALIGN
@ 055,1300 LABEL L7 WIDTH 060 HEIGHT 052 FONT "TAHOMA" FONTCOLOR BLACK BOLD SIZE 33 VALUE "" TRANSPARENT
@ 140,0975 LABEL L1 WIDTH 360 HEIGHT 175 FONT "ARIAL" FONTCOLOR WHITE BOLD SIZE 24 VALUE "HAY QUE ORDENARLO DEL 1 AL 15 + EL CUADRO NEGRO AL FINAL !" TRANSPARENT CENTERALIGN
@ 650,0999 LABEL L3 VALUE "NÚMERO DE MOVIMIENTOS" WIDTH 190 HEIGHT 60 FONT "ARIAL" SIZE 20 BOLD FONTCOLOR WHITE BACKCOLOR BLUE
@ 650,1189 LABEL L4 VALUE "" WIDTH 111 HEIGHT 60 FONT "ARIAL" SIZE 40 BOLD FONTCOLOR WHITE BACKCOLOR BLUE
@ 725,0999 BUTTON B1 CAPTION "COMODIN" WIDTH 99 HEIGHT 30 FONT "ARIAL" SIZE 12 BOLD ONCLICK USAR_COMODIN() TOOLTIP 'SÓLO SE USA UNA VEZ POR JUEGO !'
@ 725,1125 BUTTON B2 CAPTION "H E L P" WIDTH 75 HEIGHT 30 FONT "ARIAL" SIZE 12 BOLD ONCLICK AYUDA()
@ 725,1225 BUTTON B3 CAPTION "Q U I T" WIDTH 75 HEIGHT 30 FONT "ARIAL" SIZE 12 BOLD ONCLICK SALIR() TOOLTIP 'ABORTA EL JUEGO Y SALE'
Code: Select all
*-----------------
FUNCTION REINICIAR
VINTAGE.L2.RELEASE
ENTRADA:=TIME()
JUEGOS=JUEGOS+1
VINTAGE.L7.VALUE := ALLTRIM(STR(JUEGOS)) // CONTADOR DE JUEGOS
VINTAGE.L5.RELEASE
IF JUEGOS > 1
FOR i := 1 TO 15
DoMethod ("VINTAGE", "H"+ALLTRIM(STR(i)), "RELEASE")
NEXT
ENDIF
IF JUEGOS > 2
FOR i := 1 TO 15
DoMethod ("VINTAGE", "G"+ALLTRIM(STR(i)), "RELEASE")
NEXT
ENDIF
COMODIN:=0
MOV:=0
VINTAGE.L4.VALUE := " "+ALLTRIM(STR(MOV)) // CONTADOR DE MOVIMIENTOS
FOR i := 1 TO 16
DoMethod ("VINTAGE", "X"+ALLTRIM(STR(i)), "RELEASE")
NEXT
DO EVENTS
MODELO()
DESORDENAR()
RETURN
Code: Select all
@ 000,0975 LABEL L0 WIDTH 360 HEIGHT 105 FONT "TAHOMA" FONTCOLOR WHITE BOLD SIZE 33 VALUE "ROMPECABEZAS VINTAGE" TRANSPARENT UNDERLINE CENTERALIGN
@ 055,1300 LABEL L7 WIDTH 060 HEIGHT 052 FONT "TAHOMA" FONTCOLOR BLACK BOLD SIZE 33 VALUE "" TRANSPARENT
@ 140,0975 LABEL L1 WIDTH 360 HEIGHT 175 FONT "ARIAL" FONTCOLOR WHITE BOLD SIZE 24 VALUE "HAY QUE ORDENARLO DEL 1 AL 15 + EL CUADRO NEGRO AL FINAL !" TRANSPARENT CENTERALIGN
@ 650,0999 LABEL L3 VALUE "NÚMERO DE MOVIMIENTOS" WIDTH 190 HEIGHT 60 FONT "ARIAL" SIZE 20 BOLD FONTCOLOR WHITE BACKCOLOR BLUE
@ 650,1189 LABEL L4 VALUE "" WIDTH 111 HEIGHT 60 FONT "ARIAL" SIZE 40 BOLD FONTCOLOR WHITE BACKCOLOR BLUE
@ 725,0999 BUTTON B1 CAPTION "COMODIN" WIDTH 99 HEIGHT 30 FONT "ARIAL" SIZE 12 BOLD ONCLICK USAR_COMODIN() TOOLTIP 'SÓLO SE USA UNA VEZ POR JUEGO !'
@ 725,1125 BUTTON B2 CAPTION "H E L P" WIDTH 75 HEIGHT 30 FONT "ARIAL" SIZE 12 BOLD ONCLICK AYUDA()
@ 725,1225 BUTTON B3 CAPTION "Q U I T" WIDTH 75 HEIGHT 30 FONT "ARIAL" SIZE 12 BOLD ONCLICK SALIR() TOOLTIP 'ABORTA EL JUEGO Y SALE'
Code: Select all
*-----------------
FUNCTION REINICIAR
VINTAGE.L2.RELEASE
ENTRADA:=TIME()
JUEGOS=JUEGOS+1
VINTAGE.L7.VALUE := ALLTRIM(STR(JUEGOS)) // CONTADOR DE JUEGOS
VINTAGE.L5.RELEASE
IF JUEGOS > 1
FOR i := 1 TO 15
DoMethod ("VINTAGE", "H"+ALLTRIM(STR(i)), "RELEASE")
NEXT
ENDIF
IF JUEGOS > 2
FOR i := 1 TO 15
DoMethod ("VINTAGE", "G"+ALLTRIM(STR(i)), "RELEASE")
NEXT
ENDIF
COMODIN:=0
MOV:=0
VINTAGE.L4.VALUE := " "+ALLTRIM(STR(MOV)) // CONTADOR DE MOVIMIENTOS
FOR i := 1 TO 16
DoMethod ("VINTAGE", "X"+ALLTRIM(STR(i)), "RELEASE")
NEXT
DO EVENTS
MODELO()
DESORDENAR()
RETURN
Attachments
Attachments