menu menubar {
.Theme text maker:/textthemev1
}
dialog textthemev1 {
title "Text Theme Maker"
size -1 -1 242 170
option dbu
edit "14[15 $+ $time(HH:nn) $+ 14]", 1, 5 16 108 11, autohs
box "Channel Text", 2, 2 1 238 29
text "Time Display", 3, 6 8 34 7
text "Nick Display", 4, 120 7 33 7
edit "14[15 $+ $nick $+ 14]:", 5, 119 16 108 11, autohs
box "PM Text", 6, 2 30 238 26
edit "", 7, 5 42 108 11, autohs
edit "", 8, 119 42 108 11, autohs
text "Time Display", 9, 7 36 31 6
text "Nick Display", 10, 120 35 31 7
box "PM Action Text", 11, 2 85 238 28
edit "14[15 $+ $time(HH:nn) $+ 14]", 12, 5 71 108 11, autohs
edit "14[15 $+ $nick $1- $+ 14]", 13, 119 71 108 11, autohs
text "Time", 14, 6 63 15 7
text "Nick", 15, 121 63 25 7
box "Channel Action Text", 16, 2 56 238 28
edit "", 17, 5 99 108 11, autohs
text "Time", 18, 7 92 15 7
edit "", 19, 119 99 108 11, autohs
text "Nick", 20, 120 92 13 7
box "Your text look", 21, 2 115 238 28
edit "14[15 $+ $time(HH:nn) $+ 14]", 22, 6 128 108 11, autohs
edit "14[15 $+ $me $+ 14]:", 23, 120 128 108 11, autohs
text "Time", 24, 7 122 15 7
text "Nick", 25, 121 120 13 7
button "Make Text Theme", 26, 2 160 49 8, flat
button "Exit", 27, 55 160 37 8, flat, ok
text "Made By DeathfireD", 28, 188 156 53 8, disable
edit "", 29, 92 146 102 10
text "Theme Name", 30, 54 147 34 8
}
alias textthemev1 { dialog -md textthemev1 textthemev1 }
on *:load:{
writeini theme.ini theme %time1 .<<
writeini theme.ini theme %nick1 >>.
}
on ^*:text:*:#:{
var %b = $nick
echo $chan $readini(theme.ini, theme, %time1) $+ $timestamp $+ $readini(theme.ini, theme, %time1) $readini(theme.ini, theme, %nick1) $+ %b $+ $readini(theme.ini, theme, %nick1) $1-
}
on *:dialog:textthemev1:sclick:*:{
if $did == 26 { write %textthemename $did(texthemev1,1).on ^*:Text:*:#:{ echo $chan %time1 %nick1 $1- $+ | haltdef } }
}
on *:dialog:textthemev1:edit:*:{
if $did == 1 { writeini theme.ini theme %time1 $did(1) }
if $did == 5 { writeini theme.ini theme %nick1 $did(5) }
if $did == 7 { writeini theme.ini theme %pmtime1 $did(7) }
if $did == 8 { writeini theme.ini theme %pmnick1 $did(8) }
}
on *:dialog:textthemev1:init:0:{ did -a textthemev1 1 %time1 | did -a textthemev1 5 %nick1 | did -a textthemev1 7 %pmtime1 | did -a textthemev1 8 %pmnick1 | did -a textthemev1 12 %actiontime | did -a textthemev1 13 %actionnick | did -a textthemev1 17 %actiontime2 | did -a textthemev1 19 %actionnick2 | did -a textthemev1 22 %metime | did -a textthemev1 23 %menick | did -a textthemev1 29 %textthemename }
}
on *:text:*:#:{
var %a = $timestamp, %b = $nick
echo $chan %timestampvarA %a %timestampvarB %nickA %b %nickB $1-
}
on *:dialog:textthemev1:sclick:*:{if $did == 26 { write %textthemename $did(texthemev1,EDITBOX#).text }}
write -c %textthemename $+ .txt $did(textthemev1,1).text | write %textthemename $+ .txt $did(textthemev1,5).text | write %textthemename $+ .txt $did(textthemev1,12).text -so on
