20 lines
647 B
Plaintext
20 lines
647 B
Plaintext
// A simple web server with dynamic content
|
|
// Run: ./cent -i examples/web_server.cent
|
|
// Then visit http://localhost:80/ in your browser
|
|
CVM RETE
|
|
CVM FORS
|
|
|
|
DESIGNA salve VT ["SALVE", "AVE", "HAVETE", "SALVETE"]
|
|
DESIGNA sententiae VT ["Alea iacta est.", "Veni, vidi, vici.", "Carpe diem.", "Cogito, ergo svm."]
|
|
|
|
PETITVR("/", FVNCTIO (petitio) VT {
|
|
DESIGNA verbvm VT FORTVITA_ELECTIO(salve)
|
|
DESIGNA sententia VT FORTVITA_ELECTIO(sententiae)
|
|
DESIGNA a VT FORTVITVS_NVMERVS(I, VI)
|
|
DESIGNA b VT FORTVITVS_NVMERVS(I, VI)
|
|
REDI("{verbvm} MVNDE!\n\n{sententia}\n\nAlea: {a} + {b} = {a + b}")
|
|
})
|
|
|
|
DIC("Avscvlta in port MLXXX...")
|
|
AVSCVLTA(MLXXX)
|