diff options
| author | TheUltimateHacker <[email protected]> | 2015-03-16 09:00:19 -0400 |
|---|---|---|
| committer | TheUltimateHacker <[email protected]> | 2015-03-16 09:00:19 -0400 |
| commit | 6278dd2510d692446e2baf0b079850e3e0250f2e (patch) | |
| tree | 1ebd53e8a96e7f9c10415298d22effa829ce5ce1 /ShiftOS/Helper.vb | |
| parent | c8d95621fb1f8ebab23cd7e3eeacb26b6e018e20 (diff) | |
| download | shiftos-6278dd2510d692446e2baf0b079850e3e0250f2e.tar.gz shiftos-6278dd2510d692446e2baf0b079850e3e0250f2e.tar.bz2 shiftos-6278dd2510d692446e2baf0b079850e3e0250f2e.zip | |
Added more skinning options and new functions to Helper.vb
Diffstat (limited to 'ShiftOS/Helper.vb')
| -rw-r--r-- | ShiftOS/Helper.vb | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/ShiftOS/Helper.vb b/ShiftOS/Helper.vb index 167665c..29799eb 100644 --- a/ShiftOS/Helper.vb +++ b/ShiftOS/Helper.vb @@ -6,4 +6,11 @@ Public Sub setCP(points As Integer) 'Set the CP ShiftOSDesktop.codepoints = points End Sub + + Public Sub removeCP(points As Integer) + ShiftOSDesktop.codepoints = ShiftOSDesktop.codepoints - points + End Sub + Public Sub playSound(path As String, playMode As AudioPlayMode) + My.Computer.Audio.Play(path, playMode) + End Sub End Class |