API tools faq
paste
Guest User

Untitled

a guest
Jun 20th, 2018
154
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.36 KB | None | 0 0
raw download clone embed print report
  1. #!ruby -Ks
  2.  
  3. require 'vr/vruby'
  4. require 'vr/vrcontrol'
  5. require 'win32/clipboard'
  6.  
  7. class Frm_form1 < VRForm
  8. @caps_flag = false
  9.  
  10. def _form1_init
  11. self.caption = 'Keyboard'
  12. self.move(140,124,500,400)
  13. addControl(VRButton,'buttonSpace'," ",152,184,96,32)
  14. addControl(VRButton,'buttonC',"c",136,152,32,32)
  15. addControl(VRButton,'buttonU',"u",232,88,32,32)
  16. addControl(VRButton,'buttonS',"s",88,120,32,32)
  17. addControl(VRButton,'buttonSlash',"/",360,152,32,32)
  18. addControl(VRButton,'button4',"4",120,56,32,32)
  19. addControl(VRButton,'buttonB',"b",200,152,32,32)
  20. addControl(VRButton,'buttonCopy',"Copy",24,296,88,40)
  21. addControl(VRButton,'buttonH',"h",216,120,32,32)
  22. addControl(VRButton,'buttonComma',",",296,152,32,32)
  23. addControl(VRButton,'buttonF',"f",152,120,32,32)
  24. addControl(VRButton,'buttonYen',"\\",392,152,32,32)
  25. addControl(VRButton,'buttonW',"w",72,88,32,32)
  26. addControl(VRButton,'buttonL',"l",312,120,32,32)
  27. addControl(VRButton,'buttonE',"e",104,88,32,32)
  28. addControl(VRButton,'buttonM',"m",264,152,32,32)
  29. addControl(VRButton,'buttonX',"x",104,152,32,32)
  30. addControl(VRButton,'buttonJ',"j",248,120,32,32)
  31. addControl(VRButton,'buttonKana',"かな",336,296,88,40)
  32. addControl(VRButton,'button2',"2",56,56,32,32)
  33. addControl(VRButton,'buttonRight',"]",408,120,32,32)
  34. addControl(VRButton,'buttonA',"a",56,120,32,32)
  35. addControl(VREdit,'edit1',"",30,20,400,20)
  36. addControl(VRButton,'buttonG',"g",184,120,32,32)
  37. addControl(VRButton,'button5',"5",152,56,32,32)
  38. addControl(VRButton,'buttonO',"o",296,88,32,32)
  39. addControl(VRButton,'button8',"8",248,56,32,32)
  40. addControl(VRButton,'buttonQ',"q",40,88,32,32)
  41. addControl(VRButton,'buttonT',"t",168,88,32,32)
  42. addControl(VRButton,'button9',"9",280,56,32,32)
  43. addControl(VRButton,'buttonR',"r",136,88,32,32)
  44. addControl(VRButton,'buttonK',"k",280,120,32,32)
  45. addControl(VRButton,'buttonColon',":",376,120,32,32)
  46. addControl(VRButton,'buttonV',"v",168,152,32,32)
  47. addControl(VRButton,'buttonSemicolon',";",344,120,32,32)
  48. addControl(VRButton,'buttonY',"y",200,88,32,32)
  49. addControl(VRButton,'button3',"3",88,56,32,32)
  50. addControl(VRButton,'button7',"7",216,56,32,32)
  51. addControl(VRButton,'buttonP',"p",328,88,32,32)
  52. addControl(VRButton,'buttonLeft',"[",392,88,32,32)
  53. addControl(VRButton,'buttonClear',"Clear",128,296,88,40)
  54. addControl(VRButton,'button1',"1",24,56,32,32)
  55. addControl(VRButton,'button0',"0",312,56,32,32)
  56. addControl(VRButton,'buttonCaps',"Caps",232,296,88,40)
  57. addControl(VRButton,'buttonZ',"z",72,152,32,32)
  58. addControl(VRButton,'buttonAt',"@",360,88,32,32)
  59. addControl(VRButton,'button6',"6",184,56,32,32)
  60. addControl(VRButton,'buttonN',"n",232,152,32,32)
  61. addControl(VRButton,'buttonD',"d",120,120,32,32)
  62. addControl(VRButton,'buttonHat',"^",376,56,32,32)
  63. addControl(VRButton,'buttonHyphen',"-",344,56,32,32)
  64. addControl(VRButton,'buttonI',"i",264,88,32,32)
  65. addControl(VRButton,'buttonPeriod',".",328,152,32,32)
  66. addControl(VRButton,'buttonBS',"BS",440,56,32,32)
  67. end
  68.  
  69. def construct
  70. _form1_init
  71. end
  72.  
  73. def button1_clicked; input(@button1.caption) end
  74. def button2_clicked; input(@button2.caption) end
  75. def button3_clicked; input(@button3.caption) end
  76. def button4_clicked; input(@button4.caption) end
  77. def button5_clicked; input(@button5.caption) end
  78. def button6_clicked
  79. if @caps_flag
  80. input('&')
  81. else
  82. input(@button6.caption)
  83. end
  84. end
  85. def button7_clicked; input(@button7.caption) end
  86. def button8_clicked; input(@button8.caption) end
  87. def button9_clicked; input(@button9.caption) end
  88. def button0_clicked; input(@button0.caption) end
  89. def buttonHyphen_clicked; input(@buttonHyphen.caption) end
  90. def buttonHat_clicked; input(@buttonHat.caption) end
  91. def buttonQ_clicked; input(@buttonQ.caption) end
  92. def buttonW_clicked; input(@buttonW.caption) end
  93. def buttonE_clicked; input(@buttonE.caption) end
  94. def buttonR_clicked; input(@buttonR.caption) end
  95. def buttonT_clicked; input(@buttonT.caption) end
  96. def buttonY_clicked; input(@buttonY.caption) end
  97. def buttonU_clicked; input(@buttonU.caption) end
  98. def buttonI_clicked; input(@buttonI.caption) end
  99. def buttonO_clicked; input(@buttonO.caption) end
  100. def buttonP_clicked; input(@buttonP.caption) end
  101. def buttonAt_clicked; input(@buttonAt.caption) end
  102. def buttonLeft_clicked; input(@buttonLeft.caption) end
  103. def buttonA_clicked; input(@buttonA.caption) end
  104. def buttonS_clicked; input(@buttonS.caption) end
  105. def buttonD_clicked; input(@buttonD.caption) end
  106. def buttonF_clicked; input(@buttonF.caption) end
  107. def buttonG_clicked; input(@buttonG.caption) end
  108. def buttonH_clicked; input(@buttonH.caption) end
  109. def buttonJ_clicked; input(@buttonJ.caption) end
  110. def buttonK_clicked; input(@buttonK.caption) end
  111. def buttonL_clicked; input(@buttonL.caption) end
  112. def buttonSemicolon_clicked; input(@buttonSemicolon.caption) end
  113. def buttonColon_clicked; input(@buttonColon.caption) end
  114. def buttonRight_clicked; input(@buttonRight.caption) end
  115. def buttonZ_clicked; input(@buttonZ.caption) end
  116. def buttonX_clicked; input(@buttonX.caption) end
  117. def buttonC_clicked; input(@buttonC.caption) end
  118. def buttonV_clicked; input(@buttonV.caption) end
  119. def buttonB_clicked; input(@buttonB.caption) end
  120. def buttonN_clicked; input(@buttonN.caption) end
  121. def buttonM_clicked; input(@buttonM.caption) end
  122. def buttonComma_clicked; input(@buttonComma.caption) end
  123. def buttonPeriod_clicked; input(@buttonPeriod.caption) end
  124. def buttonSlash_clicked; input(@buttonSlash.caption) end
  125. def buttonYen_clicked; input(@buttonYen.caption) end
  126. def buttonSpace_clicked; input(@buttonSpace.caption) end
  127.  
  128. def buttonCopy_clicked
  129. begin
  130. Win32::Clipboard.set_data(@edit1.text)
  131. rescue
  132. p "copy error"
  133. end
  134. end
  135.  
  136. def buttonBS_clicked
  137. @edit1.text = @edit1.text.split(//s)[0..-2].join
  138. end
  139.  
  140. def buttonClear_clicked
  141. @edit1.text = ""
  142. end
  143.  
  144. def buttonCaps_clicked
  145. if @caps_flag
  146. @button1.caption = '1'
  147. @button2.caption = '2'
  148. @button3.caption = '3'
  149. @button4.caption = '4'
  150. @button5.caption = '5'
  151. @button6.caption = '6'
  152. @button7.caption = '7'
  153. @button8.caption = '8'
  154. @button9.caption = '9'
  155. @button0.caption = '0'
  156. @buttonHyphen.caption = '-'
  157. @buttonHat.caption = '^'
  158.  
  159. @buttonQ.caption = 'q'
  160. @buttonW.caption = 'w'
  161. @buttonE.caption = 'e'
  162. @buttonR.caption = 'r'
  163. @buttonT.caption = 't'
  164. @buttonY.caption = 'y'
  165. @buttonU.caption = 'u'
  166. @buttonI.caption = 'i'
  167. @buttonO.caption = 'o'
  168. @buttonP.caption = 'p'
  169. @buttonAt.caption = '@'
  170. @buttonLeft.caption = '['
  171.  
  172. @buttonA.caption = 'a'
  173. @buttonS.caption = 's'
  174. @buttonD.caption = 'd'
  175. @buttonF.caption = 'f'
  176. @buttonG.caption = 'g'
  177. @buttonH.caption = 'h'
  178. @buttonJ.caption = 'j'
  179. @buttonK.caption = 'k'
  180. @buttonL.caption = 'l'
  181. @buttonSemicolon.caption = ';'
  182. @buttonColon.caption = ':'
  183. @buttonRight.caption = ']'
  184.  
  185. @buttonZ.caption = 'z'
  186. @buttonX.caption = 'x'
  187. @buttonC.caption = 'c'
  188. @buttonV.caption = 'v'
  189. @buttonB.caption = 'b'
  190. @buttonN.caption = 'n'
  191. @buttonM.caption = 'm'
  192. @buttonComma.caption = ','
  193. @buttonPeriod.caption = '.'
  194. @buttonSlash.caption = '/'
  195. @buttonYen.caption = '\\'
  196.  
  197. @buttonSpace.caption = ' '
  198. @caps_flag = false
  199. else
  200. @button1.caption = '!'
  201. @button2.caption = '"'
  202. @button3.caption = '#'
  203. @button4.caption = '$'
  204. @button5.caption = '%'
  205. @button6.caption = '&&'
  206. @button7.caption = '\''
  207. @button8.caption = '('
  208. @button9.caption = ')'
  209. @button0.caption = '|'
  210. @buttonHyphen.caption = '='
  211. @buttonHat.caption = '~'
  212.  
  213. @buttonQ.caption = 'Q'
  214. @buttonW.caption = 'W'
  215. @buttonE.caption = 'E'
  216. @buttonR.caption = 'R'
  217. @buttonT.caption = 'T'
  218. @buttonY.caption = 'Y'
  219. @buttonU.caption = 'U'
  220. @buttonI.caption = 'I'
  221. @buttonO.caption = 'O'
  222. @buttonP.caption = 'P'
  223. @buttonAt.caption = '`'
  224. @buttonLeft.caption = '{'
  225.  
  226. @buttonA.caption = 'A'
  227. @buttonS.caption = 'S'
  228. @buttonD.caption = 'D'
  229. @buttonF.caption = 'F'
  230. @buttonG.caption = 'G'
  231. @buttonH.caption = 'H'
  232. @buttonJ.caption = 'J'
  233. @buttonK.caption = 'K'
  234. @buttonL.caption = 'L'
  235. @buttonSemicolon.caption = '+'
  236. @buttonColon.caption = '*'
  237. @buttonRight.caption = '}'
  238.  
  239. @buttonZ.caption = 'Z'
  240. @buttonX.caption = 'X'
  241. @buttonC.caption = 'C'
  242. @buttonV.caption = 'V'
  243. @buttonB.caption = 'B'
  244. @buttonN.caption = 'N'
  245. @buttonM.caption = 'M'
  246. @buttonComma.caption = '<'
  247. @buttonPeriod.caption = '>'
  248. @buttonSlash.caption = '?'
  249. @buttonYen.caption = '_'
  250.  
  251. @buttonSpace.caption = ' '
  252. @caps_flag = true
  253. end
  254. end
  255.  
  256. def buttonKana_clicked
  257. @button1.caption = 'ぬ'
  258. @button2.caption = 'ふ'
  259. @button3.caption = 'あ'
  260. @button4.caption = 'う'
  261. @button5.caption = 'え'
  262. @button6.caption = 'お'
  263. @button7.caption = 'や'
  264. @button8.caption = 'ゆ'
  265. @button9.caption = 'よ'
  266. @button0.caption = 'わ'
  267. @buttonHyphen.caption = 'ほ'
  268. @buttonHat.caption = 'へ'
  269.  
  270. @buttonQ.caption = 'た'
  271. @buttonW.caption = 'て'
  272. @buttonE.caption = 'い'
  273. @buttonR.caption = 'す'
  274. @buttonT.caption = 'か'
  275. @buttonY.caption = 'ん'
  276. @buttonU.caption = 'な'
  277. @buttonI.caption = 'に'
  278. @buttonO.caption = 'ら'
  279. @buttonP.caption = 'せ'
  280. @buttonAt.caption = '゛'
  281. @buttonLeft.caption = '゜'
  282.  
  283. @buttonA.caption = 'ち'
  284. @buttonS.caption = 'と'
  285. @buttonD.caption = 'し'
  286. @buttonF.caption = 'は'
  287. @buttonG.caption = 'き'
  288. @buttonH.caption = 'く'
  289. @buttonJ.caption = 'ま'
  290. @buttonK.caption = 'の'
  291. @buttonL.caption = 'り'
  292. @buttonSemicolon.caption = 'れ'
  293. @buttonColon.caption = 'け'
  294. @buttonRight.caption = 'む'
  295.  
  296. @buttonZ.caption = 'つ'
  297. @buttonX.caption = 'さ'
  298. @buttonC.caption = 'そ'
  299. @buttonV.caption = 'ひ'
  300. @buttonB.caption = 'こ'
  301. @buttonN.caption = 'み'
  302. @buttonM.caption = 'も'
  303. @buttonComma.caption = 'ね'
  304. @buttonPeriod.caption = 'る'
  305. @buttonSlash.caption = 'め'
  306. @buttonYen.caption = 'ろ'
  307.  
  308. @buttonSpace.caption = ' '
  309. end
  310.  
  311.  
  312. def input(char)
  313. @edit1.text += char
  314. end
  315. end
  316.  
  317. VRLocalScreen.start Frm_form1
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!