rendered paste bodyon *:INPUT:*:{
if (%Colours1 == true) {
if ( $left($1,1) == ! || $left($1,1) == @ ) { msg $active $1- | halt }
if ( $left($1,1) == / ) { $$1- | halt }
if (%commandwidexp isin $1 || %commandwidacm isin $1 ) { msg $active $1- | halt }
else {
msg $active %Coloursunderline $+ %Coloursbold $+ %Colourscolors $+ $1- | halt
}
}
}
menu * {
Colours:/Colours
}
alias Colours /dialog -m Colours Colours
dialog Colours {
title "Louis|'s Text-Style Selector."
size -1 -1 100 100
option dbu
check "Activé", 14, 5 2 50 10
check "Bold", 15, 5 12 50 10
check "Underline", 16, 5 22 50 10
text "Colours", 1337, 5 35 20 10, nowrap
radio "2", 22, 5 42 20 10
radio "3", 23, 25 42 20 10
radio "4", 24, 45 42 20 10
radio "5", 25, 65 42 20 10
radio "6", 26, 85 42 20 10
radio "7", 27, 5 52 20 10
radio "8", 28, 25 52 20 10
radio "9", 29, 45 52 20 10
radio "10", 30, 65 52 20 10
radio "11", 31, 85 52 20 10
radio "12", 32, 5 62 20 10
radio "13", 33, 25 62 20 10
radio "14", 34, 45 62 20 10
radio "15", 35, 65 62 20 10
button "Ok!", 20, 10 80 40 15, ok
}
on *:dialog:Colours:sclick:14:{
if ($did(14).state == 1) {
set %Colours1 True
}
elseif ($did(14).state == 0) {
unset %Colours1
}
}
on *:dialog:Colours:init:*:{
if (%Colours1 != $null) { did -c $dname 14 }
if (%Coloursunderline != $null) { did -c $dname 16 }
if (%Coloursbold != $null) { did -c $dname 15 }
if (%Colourscolors != $null) { did -c $dname $calc($replace(%Colourscolors,,) + 20) && did -c $dname 23 }
}
on *:dialog:Colours:sclick:15:{
if ($did(15).state == 1) {
set %Coloursbold
}
elseif ($did(15).state == 0) {
unset %Coloursbold }
}
on *:dialog:Colours:sclick:16:{
if ($did(16).state == 1) {
set %Coloursunderline
}
elseif ($did(16).state == 0) {
unset %Coloursunderline
}
}
on *:dialog:Colours:sclick:22:{
if ($did(22).state == 1) {
set %Colourscolors 2
}
elseif ($did(22).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:23:{
if ($did(23).state == 1) {
set %Colourscolors 3
}
elseif ($did(23).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:24:{
if ($did(24).state == 1) {
set %Colourscolors 4
}
elseif ($did(24).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:25:{
if ($did(25).state == 1) {
set %Colourscolors 5
}
elseif ($did(25).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:26:{
if ($did(26).state == 1) {
set %Colourscolors 6
}
elseif ($did(26).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:27:{
if ($did(27).state == 1) {
set %Colourscolors 7
}
elseif ($did(27).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:28:{
if ($did(28).state == 1) {
set %Colourscolors 8
}
elseif ($did(28).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:29:{
if ($did(29).state == 1) {
set %Colourscolors 9
}
elseif ($did(29).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:30:{
if ($did(30).state == 1) {
set %Colourscolors 10
}
elseif ($did(30).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:31:{
if ($did(31).state == 1) {
set %Colourscolors 11
}
elseif ($did(31).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:32:{
if ($did(32).state == 1) {
set %Colourscolors 12
}
elseif ($did(32).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:33:{
if ($did(33).state == 1) {
set %Colourscolors 13
}
elseif ($did(33).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:34:{
if ($did(34).state == 1) {
set %Colourscolors 14
}
elseif ($did(34).state == 0) {
unset %Colourscolors
}
}
on *:dialog:Colours:sclick:35:{
if ($did(35).state == 1) {
set %Colourscolors 15
}
elseif ($did(35).state == 0) {
unset %Colourscolors
}
}