KLAVYECİLER - KORG-YAMAHA-ROLAND

KLAVYECİLER - KORG-YAMAHA-ROLAND (http://www.klavyeciler.com/index.php)
-   Kontakt KSP Scripting (http://www.klavyeciler.com/forumdisplay.php?f=1451)
-   -   Knob Value Control (http://www.klavyeciler.com/showthread.php?t=14229)

Derbeder 10-01-2020 11:35

Knob Value Control
 
Sublime Text programını indirerek ve Sublime Ksp rar dosyasını indirdikten sonra gerekli ayarları yaptıktan sonra bu kodu oraya atın ctrl+c ve f5 diyerek kontakt ksp bölümüne yapıştır

Kod:

on init
        make_perfview
        set_ui_height(2)
        set_ui_color(25)
        set_control_par_str(INST_ICON_ID, CONTROL_PAR_PICTURE, "icon")
   
 
        declare ui_slider knob(0, 100)
        knob -> text :=""
        knob -> width :=64
        knob -> height :=64
        knob -> pos_x :=80
        knob -> pos_y :=20
        knob -> picture :="knob-count"
        knob -> mouse_behaviour := -2500
        make_persistent(knob)

        declare ui_label knobname(1, 1)
        knobname -> text := "Volume"
        knobname -> width := 80
        knobname -> height := 20
        knobname -> pos_x := 70
        knobname -> pos_y := 5
        knobname -> picture := ""
        knobname -> text_alignment :=1
        {knobname -> hide := HIDE_PART_BG}
        make_persistent(knobname)

        declare ui_slider knob2(0, 100)
        knob2 -> text :=""
        knob2 -> width :=64
        knob2 -> height :=64
        knob2 -> pos_x :=160
        knob2 -> pos_y :=20
        knob2 -> picture :="knob-count"
        knob2 -> mouse_behaviour := -2500

        declare ui_label knobname2(1, 1)
        knobname2 -> text := knob2
        knobname2 -> width := 80
        knobname2 -> height := 20
        knobname2 -> pos_x := 150
        knobname2 -> pos_y := 5
        knobname2 -> picture := ""
        knobname2 -> text_alignment :=1
        {knobname2 -> hide := HIDE_PART_BG}

        declare ui_slider knob3(0, 3)
        knob3 -> text :=""
        knob3 -> width :=64
        knob3 -> height :=64
        knob3 -> pos_x :=240
        knob3 -> pos_y :=20
        knob3 -> picture :="knob-count"
        knob3 -> mouse_behaviour := -1000

        declare ui_label knobname3(1, 1)
        knobname3 -> text := knob3
        knobname3 -> width := 80
        knobname3 -> height := 20
        knobname3 -> pos_x := 230
        knobname3 -> pos_y := 5
        knobname3 -> picture := ""
        knobname3 -> text_alignment :=1
        {knobname3 -> hide := HIDE_PART_BG}

        select knob2
            case 0
                knobname2 -> text := "Off"
            case 1 to 99
                knobname2 -> text := "Volume"
            case 100
                knobname2 -> text := "End"
        end select

        select knob3
            case 0
                knobname3 -> text := "Mono"
            case 1
                knobname3 -> text := "Poly"
            case 2
                    knobname3 -> text := "Portamento"
            case 3
                knobname3 -> text := "Legato"
        end select

end on
on ui_control(knob)
        knobname -> text := knob
        wait(1500000)
        inc(knobname)
        knobname -> text := "Volume"
end on

on ui_control(knob2)
        select knob2
            case 0
                knobname2 -> text := "Off"
            case 1 to 99
                knobname2 -> text := knob2
            case 100
                knobname2 -> text := "End"
        end select
        wait(1500000)
        inc(knobname2)
        knobname2 -> text := "Volume"
end on

on ui_control(knob3)
        select knob3
            case 0
                knobname3 -> text := "Mono"
            case 1
                knobname3 -> text := "Poly"
            case 2
                    knobname3 -> text := "Portamento"
            case 3
                knobname3 -> text := "Legato"
        end select
end on



Şu Anki Saat: 12:33

Powered by vBulletin® Version 3.8.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.

Site Optimizasyon Alani
Ritim, Set, Ses, Sampler, korg, korg türkiye, yamaha, ketron roland, gem, md, karaoke, alt yapı, korg ritim set, yamaha pack, ritim set, pa800set, pa3xset,pa4xset,pa700set,pa1000set.pa600set, a3000,set indir, Ritim, Set, Ses, Sampler, korg, korg türkiye, yamaha, ketron roland, gem, md, karaoke, alt yapı, korg ritim set, yamaha pack, ritim set, pa800set, pa3xset,pa4xset,pa700set,pa1000set.pa600set, a3000,set indir,

www.klavyeciler.com