KAKU – KAKUcli plugin voor Responding Heads 4.0
Ik heb hier een speciale plugin gemaakt voor KAKUcli welke je kan gebruiken met Responding Heads 4.0, je kan nu tot 5 KAKUcli commando’s inprogrammeren per commando, en zelfs wat er gezegd moet worden voor en na het schakelen!
Omdat er geen GUI editor is voor RH4 is, heb ik hier ZEER veel tijd in gestopt (testen, aanpassen, etc.), maar het resultaat mag er wezen, veel plezier ermee!
Installatie:
1) Download het archiefbestand
2) Pak het archief bestand uit in [RHFolder]\data.
3) Herstart RH4.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 |
' KAKUcli script v1.0 (2012-10-30) for Responding Heads v4.0 ' made by Sebastiaan Ebeltjes (DomoticX.nl) sub main on error resume next if rh.settings(3) = "1" then 'checkbox - spreek deze zin voor het schakelen begint rh.speak rh.settings(4) end if if rh.settings(5) = "1" then 'checkbox - commando 1 rh.cmd rh.settings(2) & " " & rh.settings(6) end if if rh.settings(7) = "1" then 'checkbox - commando 2 rh.cmd rh.settings(2) & " " & rh.settings(8) end if if rh.settings(9) = "1" then 'checkbox - commando 3 rh.cmd rh.settings(2) & " " & rh.settings(10) end if if rh.settings(11) = "1" then 'checkbox - commando 4 rh.cmd rh.settings(2) & " " & rh.settings(12) end if if rh.settings(13) = "1" then 'checkbox - commando 5 rh.cmd rh.settings(2) & " " & rh.settings(14) end if if rh.settings(15) = "1" then 'checkbox - spreek deze zin na het schakelen rh.speak rh.settings(16) end if end sub sub draw dialog.caption = "KAKUcli schakelen" dialog.height = 7200 rh.create "textoutput" textoutput(1).top = 50 textoutput(1).left = 8 textoutput(1).caption = "Naam van deze functie:" rh.create "textinput" textinput(1).top = 65 textinput(1).left = 8 rh.create "textoutput" textoutput(2).top = 90 textoutput(2).left = 8 textoutput(2).caption = "Selecteer de locatie van KAKUcli.exe:" rh.create "browsedialog" browsedialog(1).top = 105 browsedialog(1).left = 8 rh.create "checkbox" checkbox(1).top = 130 checkbox(1).left = 8 checkbox(1).width = 250 checkbox(1).caption = "Spreek deze zin voordat het schakelen begint:" rh.create "textinput" textinput(2).top = 145 textinput(2).left = 8 rh.create "checkbox" checkbox(2).top = 170 checkbox(2).left = 8 checkbox(2).width = 250 checkbox(2).caption = "Commando 1:" rh.create "textinput" textinput(3).top = 185 textinput(3).left = 8 rh.create "checkbox" checkbox(3).top = 210 checkbox(3).left = 8 checkbox(3).width = 250 checkbox(3).caption = "Commando 2:" rh.create "textinput" textinput(4).top = 225 textinput(4).left = 8 rh.create "checkbox" checkbox(4).top = 250 checkbox(4).left = 8 checkbox(4).width = 250 checkbox(4).caption = "Commando 3:" rh.create "textinput" textinput(5).top = 265 textinput(5).left = 8 rh.create "checkbox" checkbox(5).top = 290 checkbox(5).left = 8 checkbox(5).width = 250 checkbox(5).caption = "Commando 4:" rh.create "textinput" textinput(6).top = 305 textinput(6).left = 8 rh.create "checkbox" checkbox(6).top = 330 checkbox(6).left = 8 checkbox(6).width = 250 checkbox(6).caption = "Commando 5:" rh.create "textinput" textinput(7).top = 345 textinput(7).left = 8 rh.create "checkbox" checkbox(7).top = 370 checkbox(7).left = 8 checkbox(7).width = 250 checkbox(7).caption = "Spreek deze zin na het schakelen:" rh.create "textinput" textinput(8).top = 385 textinput(8).left = 8 end sub sub create rh.addtobrain textinput(1).text & "|" & browsedialog(1).text & "|" & checkbox(1).value & "|" & textinput(2).text & "|" & checkbox(2).value & "|" & textinput(3).text & "|" & checkbox(3).value & "|" & textinput(4).text & "|" & checkbox(4).value & "|" & textinput(5).text & "|" & checkbox(5).value & "|" & textinput(6).text & "|" & checkbox(6).value & "|" & textinput(7).text & "|" & checkbox(7).value & "|" & textinput(8).text,"" end sub sub Changer draw textinput(0).text = rh.settings(-2) 'data - activation sentence (standaard) textinput(1).text = rh.settings(1) 'data - naam van de functie browsedialog(1).text = rh.settings(2) 'data - locatie van KAKUcli.exe checkbox(1).value = rh.settings(3) 'checkbox - spreek deze zin voor het schakelen begint textinput(2).text = rh.settings(4) 'data - spreek deze zin voor het schakelen begint checkbox(2).value = rh.settings(5) 'checkbox - commando 1 textinput(3).text = rh.settings(6) 'data - commando 1 checkbox(3).value = rh.settings(7) 'checkbox - commando 2 textinput(4).text = rh.settings(8) 'data - commando 2 checkbox(4).value = rh.settings(9) 'checkbox - commando 3 textinput(5).text = rh.settings(10) 'data - commando 3 checkbox(5).value = rh.settings(11) 'checkbox - commando 4 textinput(6).text = rh.settings(12) 'data - commando 4 checkbox(6).value = rh.settings(13) 'checkbox - commando 5 textinput(7).text = rh.settings(14) 'data - commando 5 checkbox(7).value = rh.settings(15) 'checkbox - spreek deze zin na het schakelen textinput(8).text = rh.settings(16) 'data - spreek deze zin na het schakelen end sub |
[#/klikaanklikuit/kakucli_rh4″ ]