Someone

yourslot = ReadByte(&H6E30E4)
UserSlotNo = ReadByte(&HC2DD5C)
CurTeam = ReadByte(&H6EF1C0 + (yourslot - 1) * 49377)

    If UTKSlot = "a" Then
        UTKSlot = "1"
    End If
    
    If CurTeam = "0" Then
        If UTKSlot = yourslot Then
        UTKSlot = UTKSlot + 1
        End If
    
    UTKUpDown = UInt2SInt(ReadFloat(&HAFAE68 + (UTKSlot - 1) * 8))
    UTKLeftRight = UInt2SInt(ReadFloat(&HAFAE64 + (UTKSlot - 1) * 8))
    UTKLeftRight2 = UTKLeftRight - 5
    UTKUpDown2 = UTKUpDown - 5
    
    Write2Bytes (&H6EF0BC), UTKUpDown2
    Write2Bytes (&H6EF0BA), UTKLeftRight2
    
    End If