Yoko

All sides of Injection
It is currently 2026-03-14 22:46:29

Unanswered topics | Active topics


» » »

All times are UTC+02:00



Post new topic  Reply to topic  Page 1 of 1
  [ 15 posts ] 
  Print view Previous topic | Next topic 
Author Message
Destruction
PostPosted: 2008-01-21 14:34:24 
Offline
Junior Expert
User avatar

Joined: 2004-06-24 22:08:56
Posts: 3220
Сижу на работе - делать нефиг, сказал, что занят на весь день..

Наваял скриптик:
Code:
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


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

_________________
YokoInjection CodeSweeper
Function not found?
Possession of mathematics at the level of art - a gift that is only available for election.
Sorry for my clumsy English.
Skype: d119060
Top
   
Reply with quote  
ychenik
 Post subject:
PostPosted: 2008-12-08 23:52:55 
Offline

Joined: 2007-07-01 21:23:58
Posts: 82
выдает ошибку в 13 строке
if c + 1 == len
Top
   
Reply with quote  
Successful
 Post subject:
PostPosted: 2008-12-13 00:02:18 
Offline

Joined: 2008-12-13 00:00:15
Posts: 174
ychenik wrote:
выдает ошибку в 13 строке
if c + 1 == len


Code:
if ... then
...
end if
Top
   
Reply with quote  
ychenik
 Post subject:
PostPosted: 2008-12-17 10:16:56 
Offline

Joined: 2007-07-01 21:23:58
Posts: 82
хм...ниче не понял, а что не так то?)
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2008-12-17 10:57:50 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
ychenik wrote:
хм...ниче не понял, а что не так то?)

then не хватает в конце этой строки.
Top
   
Reply with quote  
ychenik
 Post subject:
PostPosted: 2008-12-29 18:55:53 
Offline

Joined: 2007-07-01 21:23:58
Posts: 82
хммм...
все равно не работает, ошибок не выдает а ентер тупо не нажимается, что не так?
Code:
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
Top
   
Reply with quote  
Kynep
 Post subject:
PostPosted: 2008-12-29 22:07:49 
Offline
Expert!
User avatar

Joined: 2006-02-07 08:51:40
Posts: 1348
Location: г. Старый Оскол
А забиндил ентер то?
Top
   
Reply with quote  
ychenik
 Post subject:
PostPosted: 2008-12-30 04:04:25 
Offline

Joined: 2007-07-01 21:23:58
Posts: 82
да. просто ентер нажимаю а текст не уходит.
Top
   
Reply with quote  
kexwer
 Post subject:
PostPosted: 2008-12-30 22:59:23 
Offline
User avatar

Joined: 2005-06-19 19:21:28
Posts: 159
Code:
Sub Sub FontColorChanger()

исправь на
Code:
Sub FontColorChanger()


Top
   
Reply with quote  
kexwer
 Post subject:
PostPosted: 2008-12-30 23:06:34 
Offline
User avatar

Joined: 2005-06-19 19:21:28
Posts: 159
Вот исправил) теперь всё работает
Добавил в конце просто
Code:
uo.say('')


Code:
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
Top
   
Reply with quote  
666||TORCHKI
 Post subject:
PostPosted: 2008-12-31 09:28:30 
Offline
User avatar

Joined: 2006-11-14 16:19:03
Posts: 257
:roll: Ы
Top
   
Reply with quote  
ychenik
 Post subject:
PostPosted: 2008-12-31 09:34:23 
Offline

Joined: 2007-07-01 21:23:58
Posts: 82
kexwer wrote:
Code:
Sub Sub FontColorChanger()

исправь на
Code:
Sub FontColorChanger()


это описка на офруме, а не в скрипте. не работает.
Top
   
Reply with quote  
kexwer
 Post subject:
PostPosted: 2008-12-31 09:56:46 
Offline
User avatar

Joined: 2005-06-19 19:21:28
Posts: 159
ychenik wrote:
kexwer wrote:
Code:
Sub Sub FontColorChanger()

исправь на
Code:
Sub FontColorChanger()


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



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

Code:
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
Top
   
Reply with quote  
ychenik
 Post subject:
PostPosted: 2008-12-31 12:08:26 
Offline

Joined: 2007-07-01 21:23:58
Posts: 82
разобрался, спасибо.
Top
   
Reply with quote  
kexwer
 Post subject:
PostPosted: 2008-12-31 20:18:56 
Offline
User avatar

Joined: 2005-06-19 19:21:28
Posts: 159
ychenik wrote:
разобрался, спасибо.

:roll:
Top
   
Reply with quote  
Display posts from previous:  Sort by  
Post new topic  Reply to topic  Page 1 of 1
  [ 15 posts ] 

» » »

All times are UTC+02:00

Who is online

Users browsing this forum: No registered users and 4 guests

You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited