Серый форум — АНК: Массивы

Re: АНК: Массивы

null@example.com (Malcev) — Wed, 05 Feb 2014 19:16:51 +0000

Спасибо!
Буду изучать.

Re: АНК: Массивы

null@example.com (teadrinker) — Wed, 05 Feb 2014 18:50:55 +0000

Drives := ["C", "D", "E"]
DriveGet, List, List

Unconnected := ""
for k, v in Drives
   if !InStr(List, v)
      Unconnected .= v
   
MsgBox, % Unconnected

Re: АНК: Массивы

null@example.com (Malcev) — Wed, 05 Feb 2014 14:39:33 +0000

Так мне не нужен список.
Мне нужен один и только в том случае если он сломался.

Re: АНК: Массивы

null@example.com (teadrinker) — Wed, 05 Feb 2014 14:15:49 +0000

DriveGet как раз выдает список дисков.

Re: АНК: Массивы

null@example.com (Malcev) — Wed, 05 Feb 2014 13:57:44 +0000

Непонятно, чем мне эта команда может помочь.
При запуске системы скрипт проверяет наличие определенных дисков и если один из них не загрузился выдает сообщение, какой именно не загрузился.

Re: АНК: Массивы

null@example.com (teadrinker) — Wed, 05 Feb 2014 12:26:18 +0000

DriveGet

Re: АНК: Массивы

null@example.com (Malcev) — Wed, 05 Feb 2014 12:02:30 +0000

Проверяет на наличие дисков.

Re: АНК: Массивы

null@example.com (teadrinker) — Wed, 05 Feb 2014 11:55:24 +0000

А задача-то какая? Что приведенный код делает, непонятно.

Re: АНК: Массивы

null@example.com (Malcev) — Wed, 05 Feb 2014 01:51:12 +0000

Помогите, пожалуйста, перевести в массивы, а то я не понимаю принцип работы с ними.

If !FileExist("С:\")
   disk := "С"
If !FileExist("D:\")
   disk := "D"
If !FileExist("E:\")
   disk := "E"
If disk !=
   msgbox, disk %disk% error!
return

Re: АНК: Массивы

null@example.com (Grey) — Fri, 20 Apr 2012 18:33:26 +0000

Indomito пишет:

По сути то AHK это же не С++...

AHK - это скриптовый язык, а C++ - язык программирования.

Re: АНК: Массивы

null@example.com (Indomito) — Fri, 20 Apr 2012 18:12:00 +0000

Да, не то.
По сути то AHK это же не С++... я про то что много от AHK хочу

Re: АНК: Массивы

null@example.com (Grey) — Fri, 20 Apr 2012 18:08:14 +0000

Думаю, что нет. Если только так, но это уже не то...:

rv:=fnHotKeyOnOff(,, "sasa1", "sasa2")
Array:=["tata1", "tata2", "tata3"]
Array2:={1:"black"      ,  2:"notmergepen"
      ,  3:"masknotpen" ,  4:"notcopypen"
      ,  5:"maskpennot" ,  6:"not"
      ,  7:"xorpen"     ,  8:"notmaskpen"
      ,  9:"maskpen"    , 10:"notxorpen"
      , 12:"mergenotpen", 13:"copypen"
      , 14:"mergepennot", 15:"mergepen"
      , 16:"white"}

MsgBox, 262144
      , % " "SubStr(rv.="`n"fnHotKeyOnOff(Array2
                                        , False
                                        , Array*)
                                        , 151)
      , % rv "`n"Array2

fnHotKeyOnOff(ByRef Result="", fSw=True, vIsArr*)
{
   Loop, % vIsArr.GetCapacity()
      ReturnValue.="index: "A_Index ", fSw: "fSw
                 . "`nvalue: "vIsArr[A_Index]"`n"
   For Key, Value In Result
      Result.=Key ", "Value "`n"
   Return, ReturnValue
}

Re: АНК: Массивы

null@example.com (Indomito) — Fri, 20 Apr 2012 05:23:27 +0000

Grey пишет:

P.S.: Я бы избавился бы ещё от лишних переменных, и не нужных Return'ов:

я просто тестировал "*" дальше всё будет иначе.

Да, вопрос... ещё. А больше одного объекта-массива передать нельзя?

Re: АНК: Массивы

null@example.com (Grey) — Fri, 20 Apr 2012 05:21:02 +0000

Indomito пишет:

Всё правильно написано?

Да ровно всё.

P.S.: Я бы избавился ещё от лишних переменных, и не нужных Return'ов:

fnHotKeyOnOff(, "sasa1"
              , "sasa2"
              , "sasa3"
              , "sasa4"
              , "sasa5")
vTmpArr:=["tata1", "tata2", "tata3"]
fnHotKeyOnOff(False, vTmpArr*)

fnHotKeyOnOff(fSw=True, vIsArr*)
{
   Loop, % vIsArr.GetCapacity()
      MsgBox, 262144
            , % "index: "A_Index ", fSw: "fSw
            , % vIsArr[A_Index],1
}

Re: АНК: Массивы

null@example.com (Indomito) — Fri, 20 Apr 2012 03:35:56 +0000

Вопрос "с моей стороны".

Значения по умолчанию и передача массива в виде аргумента функции.

fnHotKeyOnOff(,"sasa1","sasa2")
;или
vTmpArr := ["tata1","tata2","tata3"]
fnHotKeyOnOff(false,vTmpArr*)
return
;---------------------------------------
fnHotKeyOnOff(fSw = true, vIsArr*)
{
  msgbox %fSw%
  vLoop := vIsArr.MaxIndex()
  i := 1
  loop %vLoop%
  {
  a := vIsArr[i]
  msgbox %a%
  i++
  }
return
}

Всё правильно написано?
Я знаю что передать сначала должны быть простые аргументы, а уж потом variadic functions parameters(*).

P.S. Да, всё работает, но мало ли...