Yoko
http://forum.yoko.com.ua/

Чем заменить GetNumb?
http://forum.yoko.com.ua/viewtopic.php?f=20&t=8558		 Page 1 of 1
Author:  Toolmate [ 2006-08-20 17:47:34 ]
Post subject:  Чем заменить GetNumb?
Подскажите чем можно заменить вот ниже приведенную функцию:

Code:
Sub GetNumb(C,I) 
var J,T,K 
J=0 
K=1 
While K>0 
  J=J+1 
  If (Mid(C,J,1)==' ') Or (J>=Len(C)-1) Then 
   If I==0 Then 
    T=Val(Left(C,J)) 
   Else 
    T=GetNumb(Right(C,Len(C)-J-1),I-1) 
   EndIf 
   K=0 
  EndIf 
wend 
UO.Print(T) 
return T 
endsub


Из-за нее, когда чар доходит до последней точки в макре на мининг он не начинает заново обходить их.

Помница мне Grin что то советовал на счет этого, но я забыл и макр тот стер. :(

Сам макр вот отсюда: viewtopic.php?t=2624&highlight=
Author:  Toolmate [ 2006-08-21 20:49:46 ]
Post subject: 
up :roll:
Author:  Sfagnum [ 2006-08-21 22:20:06 ]
Post subject: 
приведи цепочку раздумий, в результате которых ты пришёл к такому выводу.

ЗЫ влом так просто читать чужой скрипт.
Author:  Toolmate [ 2006-08-22 09:46:11 ]
Post subject: 
Ну там связвнно что то с двойными пробелами т.к. точки вынесены в отдельный файл, я точно не помню что мне Grin говорил.
Author:  Edred [ 2006-08-22 13:38:22 ]
Post subject: 
Добавь в конец строки с числами пробел.

ЗЫ: Эта функция сделана с рекурсией. Поэтому если в строке больше 100 чисел - могут полезть проблемы. Если используешь много координат в строке - лучше замени эту функцию на мою GetWord(). Она здесь есть в каждом втором топике.
Author:  Toolmate [ 2006-09-06 19:08:51 ]
Post subject: 
в файле 33 координаты всего :?

выглядит этот файл c координатами вот так:

Code:
1546 5464 849 -1
**************
1548 5487 851 -1


где "**********" - это остальные 31 число.
Author:  Edred [ 2006-09-06 19:39:54 ]
Post subject: 
Ну так я тебе сказал же. Добавь пробел в скрипте. то бишь вставь в эту (выше) функцию строчку (куда-нибудь в начало, до цикла):
Code:
c = c + ' '


По идее, надо просто исправить:

Code:
(J>=Len(C)-1)


на

Code:
(J>=Len(C))


но это навскидку. Не тестил и не буду. Проще приписать пробел.
Author:  Toolmate [ 2006-09-06 20:18:49 ]
Post subject: 
В таком случае он идет просто к несуществующей точке.
№№№№№№№№№№№№№№№№№№№№№№№№№№№№№№№
Ну вобщем я сделал через другой "проход", когда он доходит до 33 тайла макр просто перезапускается. На больше мне познаний не хватило :) :P
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/