pastebin v0.1.7
nasty batch file hah
Jun 26 2010 5:34 AM
hits: 23
shit
May 19 2010 6:58 PM
hits: 48
shit
May 19 2010 6:48 PM
hits: 32
shit
May 19 2010 6:42 PM
hits: 31
Anonymous
May 9 2010 12:29 PM
hits: 41
Anonymous
Apr 28 2010 11:06 PM
hits: 37
RedHate
Apr 28 2010 10:10 PM
hits: 34
RedHate
Apr 28 2010 10:08 PM
hits: 42
JustHost support
Apr 13 2010 8:28 PM
hits: 80
rsc chatlog 2
Apr 8 2010 7:26 AM
hits: 48
rsc chatlog
Apr 8 2010 7:07 AM
hits: 64
Zones
Feb 28 2010 11:44 AM
hits: 68

Valid HTML 4.01 Strict

Valid CSS!


  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
    Shared Function TranslateStrikeZone(ByVal szType As Integer, ByVal X As Integer, ByVal Y As Integer) As String
 
        Dim dfc As Single
        Dim s As String
 
        s = ""
 
        If szType = 5 Then
 
            If X <= 27 Then
                If Y <= 49 Then
                    ' ball upper left
                    s = "B 2"
                Else
                    ' ball lower left
                    s = "B 3"
                End If
            ElseIf X >= 73 Then
                If Y <= 49 Then
                    ' ball upper right
                    s = "B 4"
                Else
                    ' ball lower right
                    s = "B 5"
                End If
            Else
                If Y <= 12 Then
                    ' ball high
                    s = "B 1"
                ElseIf Y >= 88 Then
                    ' ball low
                    s = "B 6"
                Else
                    ' calculate distance from center
                    dfc = CSng((Math.Abs(X - 49) ^ 2 + Math.Abs(Y - 49) ^ 2) ^ 0.5)
                    If dfc <= 10 Then
                        ' strike middle
                        s = "S 3"
                    ElseIf X <= 49 Then
                        If Y <= 49 Then
                            'strike upper left
                            s = "S 1"
                        Else
                            'strike lower left
                            s = "S 4"
                        End If
                    Else
                        If Y <= 49 Then
                            'strike upper right
                            s = "S 2"
                        Else
                            'strike lower right
                            s = "S 5"
                        End If
                    End If
                End If
            End If
 
        ElseIf szType = 9 Then
 
            If X <= 27 Then
                If Y <= 49 Then
                    ' ball upper left
                    s = "B 2"
                Else
                    ' ball lower left
                    s = "B 3"
                End If
            ElseIf X >= 73 Then
                If Y <= 49 Then
                    ' ball upper right
                    s = "B 4"
                Else
                    ' ball lower right
                    s = "B 5"
                End If
            Else
                If Y <= 12 Then
                    ' ball high
                    s = "B 1"
                ElseIf Y >= 88 Then
                    ' ball low
                    s = "B 6"
                Else
                    If Y <= 37 Then
                        If X <= 42 Then
                            ' strike upper left
                            s = "S 1"
                        ElseIf X <= 58 Then
                            ' strike upper middle
                            s = "S 2"
                        Else
                            ' strike upper right
                            s = "S 3"
                        End If
                    ElseIf Y <= 63 Then
                        If X <= 42 Then
                            ' strike middle left
                            s = "S 4"
                        ElseIf X <= 58 Then
                            ' strike right down Broadway
                            s = "S 5"
                        Else
                            ' strike middle right
                            s = "S 6"
                        End If
                    Else
                        If X <= 42 Then
                            ' strike lower left
                            s = "S 7"
                        ElseIf X <= 58 Then
                            ' strike lower middle
                            s = "S 8"
                        Else
                            ' strike lower right
                            s = "S 9"
                        End If
                    End If
                End If
            End If
 
        End If
 
        Return s
 
    End Function
 
 

paste below
title
language
description/question
action