User:Bexandre/Attic

Attic is an interpreted esoteric programming language, designed to be the easiest language for beginners. It is also speed to code. Developping since 2015/11/03 by Bexandre (User:Bexandre).

Syntax

Firstly, there is no higher cases. It will beget a giant black hole in the sky... Except for displayed text and for numbers (var names from 0 to 99 only).
set 00 is me
input 00 What's your name?
display So your name is %a00%.
sleep
cls
goto labeltest
label labeltest
count 01 3+4
if 01 < 3
goto wemustinsertgoto
if 01 > 3
goto noexception
label wemustinsertgoto
display It is less than 3
sleep
exit
label noexception
display It is greater than 3
sleep
cls
image 20 10 spr1.bmp
sleep
@end

Source code

This is the actual source code. Programmed in Batch.

@echo off
if not exist src (
mkdir src
) else (
del "src"
mkdir src
)
cd src
del "1.atc"
cls
for %%b in (
4D534346000000001D040000000000002C000000000000000301010001000000
000000004700000001000100000800000000000000001C437A4D200062617462
6F782E6578650000D407ABCE030008434BBD557F681B75147F973665B3B5894D
0E0B3A768355C6C0E20F8A522964B475AB4B66C8C5056430D3E692BB2CBD0B77
171B717F6434016705270CEC1F433A2A8A0A4E648E3AFF584BC58158F06FFDC3
E21FDAFC63FDC71FE0B6F3F3EEAE4D0AC32AA85FFAB97BEFF3DEF77DDF7BDF77
69E2F91A0944D44961721CA2182B5831DA7DD580DEFDD77BE9EADEB5034B427C
ED405AD52CA96C1A05333B2D4D6575DDB0A54945322BBAA4E9D2D8B3B2346DE4
94C17BEF39B81523394E1417047AE2FD7DA92D6E9D4242B7203C4D5D50BA7C32
DC06CE8EDF01223F5DE4EF2FC9E35FD7883ADAF76D7BFAAABFFEE823AA04FE46
B1FFF21ACC97B236DE6F07FD84BABCBCDBD70BDC8AFF78A935314645EFA5DAFC
28E3E1880F32FD8B23DE8AC468F12C2BBFFA4A15CAC671A43AFA6AA4F6A5F4A8
93FFB49B86DFDCEC8B51A87E18FCD1C2F73F37BF711C67630FB4A43374D68DD8
198D51731574ED65E174A8D18BC31DF1204C8DE550FD03F08ED80F6D844B0E35
BA5D33134187C7C411253EF71A6EB123F831CE1AE0695DAC3379D925AF815C59
0F0B41E69C21EFE91DBD878F3EC619BD08D79BC1EB7DDE782FB2A0BA8F77FAD8
310AF7E67E762CC2516E67F7822DF63B4355372221A2D73A417DC53DC9E37BC0
CF8EB001CD58C396FCEC08DB03A1C60D68BF05E7A1DC86146A5CC1736EE435E8
E7EFAC6C86CFFDC0055DBEE037E40D583B5CEF64E6A4FA5E2B8F737790DD15AF
2561AEABCCC45B5C0DB765E3224BDC8B660606F5525B1BFAE1BEC143B7B8C017
DD6E8A72A48738521AF6F3373100603238630977DEEC61CB307F786ED1DB772A
F1B6CDDBBEB1F61455829FB95315C02C174976C479DEBEC61EFDE08B1E79089B
673FEF595DF931E0BC7B03B9CE0679F43AE7F6F16BEE81C6B7A13A7FAEAB45F2
EE7DC0A281DCB0FBB7737CAD708C3E047E024E01F7DF17A387812F804F80EF80
A338200C1C06CE14B253B9696346B5CAF9DFA3AD38A723445191E8EB488B2B42
BE057CD4C655212F0117DAB83AE4F9C8DD3FAF847C7234951E1C8BC7E9F878EA
C478FCF1C75C859E93C7535B7266E24422E189B4E0075AD80E982C655F928D8A
9E3BC2DAB2CF2F6FDB65D598C9687ACE9861ED108A7A127806C80135E0227009
B80A7C05ACFB85FF135F7CD68A2DDBB963593D5752DC73157BD4D02DA3A424F0
9BBE93492B55FB886D9BDA64C5567658462BA6659849C3D26CCDD079574AC9E6
7CE3845EAED85CA65C5294F25DF64DE879C3CF6517BED591568C31CD2AA3996E
BA8FE0B2878131200D9C02F2A257E95FD988CAA6A6DB7977680A8A3DA5BA128B
D3594DCF9A050BBA52D56C973F33A97A92659BB651FAFFFFCFECB6FE04
) Do >>t.dat (Echo.For b=1 To len^("%%b"^) Step 2
ECHO WScript.StdOut.Write Chr^(Clng^("&H"^&Mid^("%%b",b,2^)^)^) : Next)
Cscript /b /e:vbs t.dat>batbox.ex_
Del /f /q /a t.dat >nul 2>&1
Expand -r batbox.ex_ >nul 2>&1
Del /f /q /a batbox.ex_ >nul 2>&1
echo ^@echo off > 1.atc
set ln=-1
set file=1
:cmd
set /a file=file + 1
set /a ln=ln + 1
batbox /g 0 %ln% /k
if %errorlevel%==100 goto d
if %errorlevel%==115 goto s
if %errorlevel%==19 goto save
if %errorlevel%==338 goto del
goto cmd
:undel
echo Undeleted!
batbox /c 0x0F
goto cmd
:del
batbox /g 0 %ln% /c 0xF0
set /p del=Delete (Y/N) ? 
if %del%==Y goto loopdel
if %del%==N goto undel
set file=0
goto loopdel
:loopdel
set /a file=file + 1
if exist %file%.atc (
del "%file%.atc">nul
goto loopdel
) else (
goto successdel
)
:successdel
set /a ln=ln + 1
batbox /g 0 %ln% /c 0xF0
echo Deleted successfully!
batbox /c 0x0F
goto cmd
:save
batbox /g 0 %ln% /c 0xF0
set /p saveas=Save as: 
set file=0
goto loop
:loop
set /a file=file + 1
if exist %file%.atc (
type "%file%.atc">>"%saveas%.bat"
goto loop
) else (
goto success
)
:success
set /a ln=ln + 1
batbox /g 0 %ln% /c 0xF0
echo Saved successfully!
batbox /c 0x0F
goto cmd
:s
batbox /g 0 %ln%
echo s
batbox /g 1 %ln% /k
if %errorlevel%==101 goto set
if %errorlevel%==108 goto sleep
if %errorlevel% neq 101 if %errorlevel% neq 108 goto s
:sleep
batbox /g 1 %ln%
echo l
batbox /g 2 %ln%
set /p sleep=
if %sleep%==eep goto pause
if %sleep% neq eep goto pause
:pause
echo pause^>nul > %file%.atc
goto cmd
:d
batbox /g 0 %ln%
echo d
batbox /g 1 %ln% /k
if %errorlevel%==105 batbox /g 0 %ln% /d "di"
if %errorlevel% neq 105 batbox /g 0 %ln% /d "di"
batbox /g 2 %ln% /k
if %errorlevel%==115 batbox /g 0 %ln% /d "dis"
if %errorlevel% neq 115 batbox /g 0 %ln% /d "dis"
batbox /g 3 %ln% /k
if %errorlevel%==112 batbox /g 0 %ln% /d "disp"
if %errorlevel% neq 112 batbox /g 0 %ln% /d "disp"
batbox /g 4 %ln% /k
if %errorlevel%==108 batbox /g 0 %ln% /d "displ"
if %errorlevel% neq 108 batbox /g 0 %ln% /d "displ"
batbox /g 5 %ln% /k
if %errorlevel%==98 batbox /g 0 %ln% /d "displa"
if %errorlevel% neq 98 batbox /g 0 %ln% /d "displa"
batbox /g 6 %ln% /k
if %errorlevel%==121 batbox /g 0 %ln% /d "display"
if %errorlevel% neq 121 batbox /g 0 %ln% /d "display"
batbox /g 7 %ln% /k
if %errorlevel%==32 goto disp
if %errorlevel% neq 32 goto disp
:disp
batbox /g 8 %ln%
set /p display=
echo echo %display% > %file%.atc
goto cmd