Ziron.exe sample.zir

program WIN32CUI 'my app';

#include 'ch.zir';

wait_key('Hello, World!');
ExitProcess(0);

 program WIN32CUI 'my app';

#include 'ch.zir';

wait_key('Hello, World!');
ExitProcess(0); 

program WIN32CUI  'our_hubs_a_private_hub';

#include 'ch.zir';

  if (1 == 1) {
  our_hubs_a private_hub
} elseif (1 == 2) {
  you_can_use_our_public_hub
} else {
  you_can_use_any_public_hub
}


ExitProcess(0); 

program WIN32CUI  'our_hubs_a_private_hub';

#include 'ch.zir';

if (1 == 1) {
  //note that these lines you have written do nothing and are invalid.
  our_hubs_a private_hub
} elseif (1 == 2) {
  you_can_use_our_public_hub
} else {
  you_can_use_any_public_hub
}

wait_key();

ExitProcess(0); 

program WIN32CUI 'sample';

//changables
#define WAIT_KEY_ENABLED; //remove this line for the console to stay open until you press a key

//optimisation directive.
#cpu 486;

//include directive (include another file)
#include 'console.zir';

//note directives can use $ or # e.g.

#define TESTING;

$ifdef TESTING
  $repeat 50:
    print('testing\r\n');
  $end
$end

#ifdef TESTING
  $repeat 10:
    print('testing\r\n');
  $end
#end

#repeat 5:
  print('test\r\n');
#end

#ifdef WAIT_KEY_ENABLED
  wait_key(nil);
#end

ExitProcess(0);