вейт меню укажите неверное!

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
derevo
Posts: 34
Joined: 2004-12-14 14:55:12

вейт меню укажите неверное!

Post by derevo »

Code: Select all

sub spelbuk()
var n , k
DIM MR[1] ; Ìàññèâ èç êðóãîâ ìàãèè è ñïåëîâ
MR[1]='Circle 1'

n = MR[1]
for k = 1 to 8
UO.WaitMenu('Spell Circles',(n),(n),(k)) ; menu
wait(1000)
UO.UseType(0x0E34) ; BLANCK SCRoLS
wait(4000)
next
end sub


Почему то немогу вейт меню переменные поставить . это возможно? дим для удобства на 1 ячейку пока как и липовая переменная n
Last edited by derevo on 2006-07-15 00:04:01, edited 2 times in total.
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Попробуй так: UO.WaitMenu('Spell Circles',n,n,(k))
DerMeister сейчас на нейрале!
derevo
Posts: 34
Joined: 2004-12-14 14:55:12

Post by derevo »

нехочет(

Вышел из положения автоменюхами ,но хотелось бы всё же номерами в вейтах массив на 64 спела с названиями не очень радует
derevo
Posts: 34
Joined: 2004-12-14 14:55:12

Post by derevo »

И ещё вопрос как это корректно написать?

Code: Select all

n=1
for k = 0 to 63
if k =8 or k =16 or k =24 or k =32 or k =40 or k =48 or k =56 then
n=n+1
end if

спасибо
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

derevo wrote:И ещё вопрос как это корректно написать?

Code: Select all

n=1
for k = 0 to 63
if k =8 or k =16 or k =24 or k =32 or k =40 or k =48 or k =56 then
n=n+1
end if

спасибо


Если я правельно понял то:

Code: Select all

n=1
for k = 0 to 63 step 8
n=n+1
...
next


Хотя брет полейший... Вощем используй либо 2 цикла, скажем:

Code: Select all

n=1
for i = 0 to 63 step 8
  for k = i to i+8
  ...
  next
n=n+1
...
next
DerMeister сейчас на нейрале!
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

во ужас то...

Code: Select all

UO.WaitMenu('Spell Circles', n, n,'('+str(k)+')')
derevo
Posts: 34
Joined: 2004-12-14 14:55:12

Post by derevo »

DerMeister =) wrote:
derevo wrote:И ещё вопрос как это корректно написать?

не не то ты тут шаг 8 делаеш! а у меня шаг 1 ! и при каждых 8 меняется другая переменная!
Last edited by derevo on 2006-07-15 00:04:32, edited 1 time in total.
derevo
Posts: 34
Joined: 2004-12-14 14:55:12

Post by derevo »

Если соединить с скриптом Элра на запихивание в спелбуку скрафченых свитков получится автомат) а ну и забор регов )
если кто доболнит буду рад!
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

derevo wrote:не не то ты тут шаг 8 делаеш! а у меня шаг 1 ! и при каждых 8 меняется другая переменная!


А ты осмысли то, что я написал и уж потом говори... Как я понял ты спрашивал как тебе избавится от твоего километрового условия. Кажется я ето и сделал... i - просто сщетчик... Ты вообще где учишься то? В ПТУ чтоли?
DerMeister сейчас на нейрале!
DerMeister =)
Expert!
Posts: 1032
Joined: 2006-02-25 21:48:38

Post by DerMeister =) »

Grin wrote:во ужас то...

Code: Select all

UO.WaitMenu('Spell Circles', n, n,'('+str(k)+')')


Что именно УЖАС?
DerMeister сейчас на нейрале!
omi4
Posts: 457
Joined: 2005-07-10 21:53:05

Post by omi4 »

DerMeister =) wrote:
Grin wrote:во ужас то...

Code: Select all

UO.WaitMenu('Spell Circles', n, n,'('+str(k)+')')


Что именно УЖАС?


про тип нужно помнить... строка и число не одно и тоже
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

да даже не в типу суть;)
синтаксис позиции в меню '(number)'
;) а парсер воспримит ваши () как операционые скобки;))
derevo
Posts: 34
Joined: 2004-12-14 14:55:12

Post by derevo »

DerMeister =) wrote:Кажется я ето и сделал... i - просто сщетчик... Ты вообще где учишься то? В ПТУ чтоли?

Я конечно не спец! но думаю даже в ПТУ преподают слово "сщетчик" как правильно пишется! Где учишся спрашивать даже не буду.
И я просил сделать более красиво и функционально ! это ты ещё один цикл втулил и считаеш это лучшим?:) Видать и в пту плохо учились если так мало про циклы знаем и их обилие в скриптах.

вопрос звучал как "корректно " написать ЭТО! у меня стоит в условии"=" вместо сравния перемен. "==" вот про это я спрашивал!
Я инжект вижу в глаза второй день так что синтаксис для меня пока ещё проблема.
Last edited by derevo on 2006-07-14 23:53:52, edited 1 time in total.
derevo
Posts: 34
Joined: 2004-12-14 14:55:12

Post by derevo »

Grin wrote:да даже не в типу суть;)
синтаксис позиции в меню '(number)'
;) а парсер воспримит ваши () как операционые скобки;))

И всё же есть возможность сделать это через Waitmenu с переменными ? если да то каков синтаксис? Спасибо
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

Code: Select all

UO.WaitMenu('Spell Circles', n, n,'('+str(k)+')')

читай внимательней
Post Reply