Author Topic: Вероятность для keypress  (Read 1717 times)

0 Members and 1 Guest are viewing this topic.

Fuego47

  • Освоившийся
  • **
  • Posts: 20
    • View Profile
Вероятность для keypress
« on: February 28, 2019, 01:05:08 PM »
Добрый день. Подскажите как сделать чтобы keypress 1, 2, 3 нажимались с разной вероятностью. Например 1 нажимались в 70% случаев, а 2,3 в 15%

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: Вероятность для keypress
« Reply #1 on: February 28, 2019, 02:06:35 PM »
Code: (clickermann) [Select]
$r = RNDFROM(1,1,1,1,2,3)
SWITCH($r)
   CASE(1)
      KEYPRESS(#1)
   CASE(2)
      KEYPRESS(#2)
   CASE(3)
      KEYPRESS(#3)
END_SWITCH
WAITMS(50)

dramster

  • Герой форума
  • *****
  • Posts: 1134
    • View Profile
Re: Вероятность для keypress
« Reply #2 on: March 01, 2019, 10:15:55 PM »
Code: (clickermann) [Select]
$r = RNDFROM(1,1,1,1,2,3)
SWITCH($r)
   CASE(1)
      KEYPRESS(#1)
   CASE(2)
      KEYPRESS(#2)
   CASE(3)
      KEYPRESS(#3)
END_SWITCH
WAITMS(50)


Можно обойтись одной строкой - KEYPRESS(RNDFROM(#1,#1,#1,#1,#2,#3)), эффект тот же.

Fuego47

  • Освоившийся
  • **
  • Posts: 20
    • View Profile
Re: Вероятность для keypress
« Reply #3 on: March 02, 2019, 10:57:33 AM »
Спасибо))
Code: (clickermann) [Select]
$r = RNDFROM(1,1,1,1,2,3)
SWITCH($r)
   CASE(1)
      KEYPRESS(#1)
   CASE(2)
      KEYPRESS(#2)
   CASE(3)
      KEYPRESS(#3)
END_SWITCH
WAITMS(50)


Можно обойтись одной строкой - KEYPRESS(RNDFROM(#1,#1,#1,#1,#2,#3)), эффект тот же.