Si no recuerdo mal avia una forma para ver todo lo del diario, alguien me podria aclarar si era cierto y como se hacia para poderlo ver todo gracias.
Si no recuerdo mal avia una forma para ver todo lo del diario, alguien me podria aclarar si era cierto y como se hacia para poderlo ver todo gracias.
Hola, para poder grabar el journal tienes que editar el archivo uo.cfg en la carpeta del uo, y poner:
JournalSaveFile=C:\diario.log
SaveJournal=on
O bien usar esta macro para el easy:
Inicio:
gosub menuBody
set %wordsOfPower %wordsOfPower
set %jEntry #jIndex
set %listIndex 0
mainLoop:
if ( %jEntry < #jIndex || %jEntry = N/A )
{
set %scanLine #jIndex - %jEntry
scanJournal %scanLine
set %journal #journal
menu get filter_spam
set %filterSpam #menuRes
menu get filter_spells
set %filterSpells #menuRes
if %filterSpells = #true
{
str pos %journal : 1
str del %journal 1 #strRes
set %spellCheckStr #strRes
}
if ( %journal <> %lastEntry || %filterSpam = #false ) && ( %spellCheckStr notIn %wordsOfPower || %filterSpells = #false )
{
set %lastEntry %journal
str count %journal _
while #strRes > 0
{
str pos %journal _
set %underscorePos #strRes
str del %journal #strRes 1
str ins #strRes #spc %underscorePos
set %journal #strRes
str count %journal _
}
set %listIndex %listIndex + 1
gosub time
set %line_ . %listIndex %time , #spc , %journal
menu list add journal %line_ . %listIndex
menu list select journal %listIndex
}
set %jEntry %jEntry + 1
}
if #menuButton <> NONE
{
gosub #menuButton
set #menuButton NONE
}
goto mainLoop
sub save
menu get path
set %file #menuRes
gosub time
set %listIndex %listIndex + 1
set %line_ . %listIndex %time , #spc , SAVING , #SPC , TO: , #SPC , %file
menu list add journal %line_ . %listIndex
menu list select journal %listIndex
set %jEntry %jEntry + 1
if %saveIndex = N/A
{
set %saveIndex 1
}
set %saveGroupIndex 1
set %groups ( %listIndex - %saveIdex ) / 20
event sysMessage %groups
saveLoop:
set %params %listIndex - %saveIndex
if %params > 20
{
set %params %saveIndex + 18
set %lastParam %saveIndex + 19
set %saveGroup . %saveGroupIndex
for %save_i %saveIndex %params
{
set %saveLine %line_ . %save_i
set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file , #SPC , && , #SPC , echo
}
set %saveLine %line_ . %lastParam
set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file
set %saveGroupIndex %saveGroupIndex + 1
set %saveIndex %params + 1
goto saveLoop
}
else
{
set %params %params - 1
set %params %saveIndex + %params
set %lastParam %saveIndex + %params + 1
set %saveGroup . %saveGroupIndex
for %save_i %saveIndex %params
{
set %saveLine %line_ . %save_i
set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file , #SPC , && , #SPC , echo
}
set %saveLine %line_ . %lastParam
set %saveGroup . %saveGroupIndex %saveGroup . %saveGroupIndex , #SPC , %saveLine , #SPC , >> , #SPC , %file
}
for %save_i 1 %saveGroupIndex
{
execute cmd.exe /c echo %saveGroup . %save_i
}
gosub time
set %listIndex %listIndex + 1
set %line_ . %listIndex %time , #spc , SAVING , #SPC , DONE
menu list add journal %line_ . %listIndex
menu list select journal %listIndex
set %jEntry %jEntry + 1
return
sub left
if %width > 300
{
gosub menuBody -100 0
}
gosub rewriteList
return
sub right
if %width < 1200
{
gosub menuBody 100 0
}
gosub rewriteList
return
sub rewriteList
menu list clear journal
for %restoreList_i 1 %listIndex
{
menu list add journal %line_ . %restoreList_i
}
menu list select journal %listIndex
return
sub closed
stop
return
sub time
set %time #time
str ins %time : 5
str ins #strRes : 3
set %time [ , #strRes , ]
return
sub menuBody
menu Clear
menu Font Name Comic Sans MS
menu Window title Diario
menu Window color black
menu Font Name Verdana
menu Font color green
menu Font bgcolor black
menu Font size 8
if %width = N/A
{
set %width 500
}
if %height = N/A
{
set %height 900
}
set %yCoordinate 5
if %0 > 0
{
set %width %width + %1
}
menu list create journal 5 %yCoordinate %width %height
menu Font Name Comic Sans MS
set %yCoordinate %yCoordinate + %height
set %yCoordinate %yCoordinate + 5
if %filterSpam = N/A || %filterSpells = N/A
{
set %filterSpam #false
set %filterSpells #false
}
menu check filter_spam 5 %yCoordinate 100 20 %filterSpam Filter spam?
menu check filter_spells 100 %yCoordinate 100 20 %filterSpells Filter spells?
set %yCoordinate %yCoordinate + 20
menu button save 5 %yCoordinate 100 20 SAVE
menu edit path 110 %yCoordinate 150 C:\journal.txt
menu button left 265 %yCoordinate 20 20 <
menu button right 287 %yCoordinate 20 20 >
set %yCoordinate %yCoordinate + 25
set %windowSize %width + 10
menu Window Size %windowSize %yCoordinate
menu Show
set #menuButton NONE
return
Un saludo.
Yeah mil gracias.
De na, xd