Page 1 of 1

Переключение цветов.

Posted: 2008-01-21 14:34:24
by Destruction
Сижу на работе - делать нефиг, сказал, что занят на весь день..

Наваял скриптик:

Code: Select all

Sub FontColorChanger()
   var c, len = 3
   DIM colors[ val( str( len ) ) ]
   colors[ 0 ] = "0x0000"
   colors[ 1 ] = "0x0000"
   colors[ 2 ] = "0x0000"
   if uo.getGlobal( "FontColorChanger::c" ) == "N/A" then
      c = 0
   else
      c = val( uo.getGlobal( "FontColorChanger::c" ) )
   endif
   uo.fontcolor( colors[ c ] )
   if c + 1 == len
      c = 0
   else
      c = c + 1
   endif
   uo.setGlobal( "FontColorChanger::c", str( c ) )
endsub


Повесить это дело на энтер, забить массивчик и наслаждаться.. Должно неплохо работать, в принципе.. Я на работе - порты порезаны, не протестить -(

Posted: 2008-12-08 23:52:55
by ychenik
выдает ошибку в 13 строке
if c + 1 == len

Posted: 2008-12-13 00:02:18
by Successful
ychenik wrote:выдает ошибку в 13 строке
if c + 1 == len


Code: Select all

if ... then
...
end if

Posted: 2008-12-17 10:16:56
by ychenik
хм...ниче не понял, а что не так то?)

Posted: 2008-12-17 10:57:50
by Kynep
ychenik wrote:хм...ниче не понял, а что не так то?)

then не хватает в конце этой строки.

Posted: 2008-12-29 18:55:53
by ychenik
хммм...
все равно не работает, ошибок не выдает а ентер тупо не нажимается, что не так?

Code: Select all

Sub Sub FontColorChanger() 
   var c, len = 3
   DIM colors[ val( str( len ) ) ]
   colors[ 0 ] = "0x0044"
   colors[ 1 ] = "0x0035"
   colors[ 2 ] = "0x0026"
   if uo.getGlobal( "FontColorChanger::c" ) == "N/A" then
      c = 0
   else
      c = val( uo.getGlobal( "FontColorChanger::c" ) )
   endif
   uo.fontcolor( colors[ c ] )
   if c + 1 == len then
      c = 0
   else
      c = c + 1
   endif
   uo.setGlobal( "FontColorChanger::c", str( c ) )
endsub

Posted: 2008-12-29 22:07:49
by Kynep
А забиндил ентер то?

Posted: 2008-12-30 04:04:25
by ychenik
да. просто ентер нажимаю а текст не уходит.

Posted: 2008-12-30 22:59:23
by kexwer

Code: Select all

Sub Sub FontColorChanger() 

исправь на

Code: Select all

Sub FontColorChanger() 

Posted: 2008-12-30 23:06:34
by kexwer
Вот исправил) теперь всё работает
Добавил в конце просто

Code: Select all

uo.say('')


Code: Select all

Sub FontColorChanger() 
   var c, len = 3
   DIM colors[ val( str( len ) ) ]
   colors[ 0 ] = "0x0023"
   colors[ 1 ] = "0x0044"
   colors[ 2 ] = "0x0066"
   if uo.getGlobal( "FontColorChanger::c" ) == "N/A" then
      c = 0
   else
      c = val( uo.getGlobal( "FontColorChanger::c" ) )
   endif
   uo.fontcolor( colors[ c ] )
   if c + 1 == len then
      c = 0
   else
      c = c + 1
   endif
   uo.setGlobal( "FontColorChanger::c", str( c ) )
   uo.say('')
endsub

Posted: 2008-12-31 09:28:30
by 666||TORCHKI
:roll: Ы

Posted: 2008-12-31 09:34:23
by ychenik
kexwer wrote:

Code: Select all

Sub Sub FontColorChanger() 

исправь на

Code: Select all

Sub FontColorChanger() 


это описка на офруме, а не в скрипте. не работает.

Posted: 2008-12-31 09:56:46
by kexwer
ychenik wrote:
kexwer wrote:

Code: Select all

Sub Sub FontColorChanger() 

исправь на

Code: Select all

Sub FontColorChanger() 


это описка на офруме, а не в скрипте. не работает.



вот этот работает!!!!

Code: Select all

Sub FontColorChanger() 
   var c, len = 3
   DIM colors[ val( str( len ) ) ]
   colors[ 0 ] = "0x0023"
   colors[ 1 ] = "0x0044"
   colors[ 2 ] = "0x0066"
   if uo.getGlobal( "FontColorChanger::c" ) == "N/A" then
      c = 0
   else
      c = val( uo.getGlobal( "FontColorChanger::c" ) )
   endif
   uo.fontcolor( colors[ c ] )
   if c + 1 == len then
      c = 0
   else
      c = c + 1
   endif
   uo.setGlobal( "FontColorChanger::c", str( c ) )
   uo.say('')
endsub

Posted: 2008-12-31 12:08:26
by ychenik
разобрался, спасибо.

Posted: 2008-12-31 20:18:56
by kexwer
ychenik wrote:разобрался, спасибо.

:roll: