vb.net
Public Class AlgorithmV2
Private priority As Integer = 4
Private alg As Algorithm = Nothing
Public Sub New(ByVal priority As Integer, ByVal alg As Algorithm)
Me.priority = priority
Me.alg = alg
End Sub
Public Function...
vb.net:
Public Class DiBicameral
Inherits DiSkillV2
' DiBicameral bicameral = New DiBicameral()
' bicameral.msgCol.addMSGV2("02:57", "test run ok")
' Add # for messages that engage other skills
Public msgCol As New TimedMessages()
Public...
Public Class DiBicameral
Inherits DiSkillV2
' DiBicameral bicameral = New DiBicameral()
' bicameral.msgCol.addMSGV2("02:57", "test run ok")
' Add # for messages that engage other skills
Public msgCol As New TimedMessages()
Public Overrides Sub input(ByVal ear As String...
vb.net:
Public Sub openGateforNSeconds(ByVal n As Integer)
' The gate will stay open for n seconds.
Me.openedGate = Me.openedGate.AddSeconds(n)
End Sub
vb.net:
Public Class TimedMessages
Public Property Messages As New Dictionary(Of String, String)()
Private lastMSG As String = "nothing"
Private msg As Boolean = False
Public Sub AddMSG(ear As String)
Dim ru1 As New RegexUtil()
Dim...
vb.net:
Public Class Excluder
Private ReadOnly startsWith As New List(Of String)()
Private ReadOnly endsWith As New List(Of String)()
Public Sub AddStartsWith(s1 As String)
If Not startsWith.Contains("^(" & s1 & ").*") Then
startsWith.Add("^(" & s1 & ").*")...
class DiBicameral: DiSkillV2 {
/*
* let bicameral = DiBicameral()
bicameral.msgCol.addMSGV2("02:57", "test run ok")
add # for messages that engage other skills
*/
public var msgCol:TimedMessages = TimedMessages()
override func input(ear: String, skin...
ok I shat thrice already today so IG I outta get going with the ports before that owl fuck starts his negging.
class Excluder {
private var startsWith = String
private var endsWith = String
func addStartsWith(_ s1: String) {
if !startsWith.contains("^(" + s1 + ").*") {...