텍스트 비교

두 텍스트 파일의 차이점을 찾아보세요

실시간 편집
공백 변경 숨기기
변경 없는 행 숨기기
줄바꿈 비활성화
레이아웃
비교 단위
텍스트 스타일
구문 강조

Untitled diff

생성일 비교 결과 만료 없음
3 삭제
38 행
5 추가
39 행
Public Sub Flood(value As Int, x As Int, y As Int, grid As Grid)
Public Sub Fill(value As Int, x As Int, y As Int, grid As Grid)
Dim top = y As Int
Dim matrix(,) = grid.matrix As Int
Dim matrix(,) = grid.matrix As Int
If value = matrix(x, y) Then Return
If value = matrix(x, y) Then Return
'--------------------------------------------------------------
'--------------------------------------------------------------
stack.Clear
stack.Clear
Dim x1 As Int
Dim x1 As Int
Dim spanAbove, spanBelow As Boolean
Dim spanAbove, spanBelow As Boolean
'--------------------------------------------------------------
'--------------------------------------------------------------
stack.Add(Array As Int(x, y))
stack.Add(Array As Int(x, y))
'--------------------------------------------------------------
'--------------------------------------------------------------
Dim p() As Int
Dim p() As Int
Do While (stack.Size > 0)
Do While (stack.Size > 0)
p = stack.Get(stack.Size - 1)
p = stack.Get(stack.Size - 1)
x = p(0) : y = p(1) : stack.RemoveAt(stack.Size - 1)
x = p(0) : y = p(1) : stack.RemoveAt(stack.Size - 1)
'----------------------------------------------------------
'----------------------------------------------------------
x1 = x : Do While (x1 >= 0 And matrix(x1, y) == 0) : x1 = x1 - 1 : Loop
x1 = x : Do While (x1 >= 0 And matrix(x1, y) == 0) : x1 = x1 - 1 : Loop
'----------------------------------------------------------
'----------------------------------------------------------
x1 = x1 + 1 : spanAbove = False : spanBelow = False
x1 = x1 + 1 : spanAbove = False : spanBelow = False
'----------------------------------------------------------
'----------------------------------------------------------
Do While (x1 < grid.sizeX And matrix(x1, y) = 0)
Do While (x1 < grid.sizeX And matrix(x1, y) = 0)
matrix(x1, y) = value
matrix(x1, y) = value
'------------------------------------------------------
'------------------------------------------------------
If (spanAbove = False And y > 0 And matrix(x1, y - 1) = 0) Then
If (spanAbove = False And y > top And matrix(x1, y - 1) = 0) Then
spanAbove = True : stack.Add(Array As Int(x1, y - 1))
spanAbove = True : stack.Add(Array As Int(x1, y - 1))
Else If (spanAbove = True And y > 0 And matrix(x1, y - 1) > 0) Then
Else If (spanAbove = True And y > top And matrix(x1, y - 1) > 0) Then
spanAbove = False
spanAbove = False
End If
End If
'------------------------------------------------------
'------------------------------------------------------
If (spanBelow = False And y < grid.sizeY - 1 And matrix(x1, y + 1) = 0) Then
If (spanBelow = False And y < grid.sizeY - 1 And matrix(x1, y + 1) = 0) Then
spanBelow = True : stack.Add(Array As Int(x1, y + 1))
spanBelow = True : stack.Add(Array As Int(x1, y + 1))
Else If (spanBelow And y < grid.sizeY - 1 And matrix(x1, y + 1) > 0) Then
Else If (spanBelow And y < grid.sizeY - 1 And matrix(x1, y + 1) > 0) Then
spanBelow = False
spanBelow = False
End If
End If
'------------------------------------------------------
'------------------------------------------------------
x1 = x1 + 1
x1 = x1 + 1
Loop
Loop
Loop
Loop
End Sub
End Sub
저장된 비교 결과