By gennarino on Dec 22, 2020Converts normal text into styled text using Unicode. The conversion is done using the corresponding unicode character in another font. All the users on IRC should see the unicode font instead of their original font for messages. The output is displayed in UNICODE case-sensitive.
Possible Use:
/conv The quick brown fox jumps over the lazy dog --> output:
//msg nickname $conv( The quick brown fox jumps over a lazy dog )
//me $conv( The quick brown fox jumps over a lazy dog )
/double The quick brown fox jumps over a lazy dog
/script The quick brown fox jumps over a lazy dog
Warning: when I click 'SAVE' the code lines disappear! :-(
See my comment for the code
Captured image: http://www.hiperlab.org/public/uploaded/Hawkee/Clipboard.jpg
Source code:
Menu channel,status {
♔ --- Text Tricks --->
.gothic:conv $?="Enter the text to be changed"
.script:script $?="Enter the text to be changed"
.double:double $?="Enter the text to be changed"
}
;---
;--- A short alias to change the message font also for the readers
;---
;--- Use: /conv The Quick Brown Fox Jumps Over Lazy Dog
;--- or: //msg nickname $conv( The Quick Brown Fox Jumps Over Lazy Dog )
;--- or: //me $conv( The Quick Brown Fox Jumps Over Lazy Dog )
;--- /script The Quick Brown Fox Jumps Over Lazy Dog
alias conv {
%co = $replacecs($1-, a,𝖆,b,𝖇,c,𝖈,d,𝖉,e,𝖊,f,𝖋,g,𝖌,h,𝖍,i,𝖎,j,𝖏,k,𝖐,l,𝖑,m,𝖒,n,𝖓,o,𝖔,p,𝖕,q,𝖖,r,𝖗,s,𝖘,t,𝖙,u,𝖚,$&
v,𝖛,w,𝖜,x,𝖝,y,𝖞,z,𝖟,A,𝕬,B,𝕭,C,𝕮,D,𝕯,E,𝕰,F,𝕱,G,𝕲,H,𝕳,I,𝕴,J,𝕵,K,𝕶,L,𝕷,M,𝕸,N,𝕹,O,𝕺,P,𝕻,Q,$&
𝕼,R,𝕽,S,𝕾,T,𝕿,U,𝖀,V,𝖁,W,𝖂,X,𝖃,Y,𝖄,Z,𝖅,0,𝟎,1,𝟏,2,𝟐,3,𝟑,4,𝟒,5,𝟓,6,𝟔,7,𝟕,8,𝟖,9,𝟗,!,❗,?,❓)
$iif($isid,return,$iif($active ischan,say ,echo 4 -a)) %co
}
alias script {
%co = $replacecs($1-,a,𝒶,b,𝒷,c,𝒸,d,𝒹,e,ℯ,f,𝒻,g,ℊ,h,𝒽,i,𝒾,j,𝒿,k,𝓀,l,𝓁,m,𝓂,n,𝓃,o,ℴ,p,𝓅,$&
q,𝓆,r,𝓇,s,𝓈,t,𝓉,u,𝓊,v,𝓋,w,𝓌,x,𝓍,y,𝓎,z,𝓏,A,𝒜,B,ℬ,C,𝒞,D,𝒟,E,ℰ,F,ℱ,$&
G,𝒢,H,ℋ,I,ℐ,J,𝒥,K,𝒦,L,ℒ,M,ℳ,N,𝒩,O,𝒪,P,𝒫,Q,𝒬,R,ℛ,S,𝒮,T,𝒯,U,𝒰,V,𝒱,$&
W,𝒲,X,𝒳,Y,𝒴,Z,𝒵,0,0,1,1,2,2,3,3,4,4,5,5,6,6,7,7,8,8,9,9,!,!,?,?)
$iif($isid,return,$iif($active ischan,say ,echo 4 -a)) %co
}
alias double {
%co = $replacecs($1-,$&
a,𝕒,b,𝕓,c,𝕔,d,𝕕,e,𝕖,f,𝕗,g,𝕘,h,𝕙,i,𝕚,j,𝕛,k,𝕜,l,𝕝,m,𝕞,n,𝕟,o,𝕠,$&
p,𝕡,q,𝕢,r,𝕣,s,𝕤,t,𝕥,u,𝕦,v,𝕧,w,𝕨,x,𝕩,y,𝕪,z,𝕫,A,𝔸,B,𝔹,C,ℂ,D,𝔻,$&
E,𝔼,F,𝔽,G,𝔾,H,ℍ,I,𝕀,J,𝕁,K,𝕂,L,𝕃,M,𝕄,N,ℕ,O,𝕆,P,ℙ,Q,ℚ,R,ℝ,S,𝕊,$&
T,𝕋,U,𝕌,V,𝕍,W,𝕎,X,𝕏,Y,𝕐,Z,ℤ,0,𝟘,1,𝟙,2,𝟚,3,𝟛,4,𝟜,5,𝟝,6,𝟞,7,𝟟,$&
8,𝟠,9,𝟡,!,❕,?,❔)
$iif($isid,return,$iif($active ischan,say ,echo 4 -a)) %co
}
Thanks!