/* Global variables for the most recently calculated pseudorandom numbers */ new Float:fRand_xor; // PRN calculated using Xorshift (32bit) algorithm new Float:fRand_vb6; // PRN calculated using rnd algorithm of VB6 new Float:fRand_mwc; // PRN calculated using Multiply-with-carry algorithm new Float:fRand_crc; // PRN calculated using CRC32 algorithm /* 1 sec. timer is used for the general program sequence */ #callback MainTimer() { /* Calculates the PRNs using the different methods. The seed is not reinitialized. The calculation result of the last function call is used as new starting value */ fRand_xor = rand_xor(); fRand_vb6 = rand_vb6(); fRand_mwc = rand_mwc(); fRand_crc = rand_crc(); // Issues the most recently calculated PRNs via the watch panel #watch("xor = %f",fRand_xor); #watch("vb6 = %f",fRand_vb6); #watch("mwc = %f",fRand_mwc); #watch("crc = %f",fRand_crc); } /** * Function that is called up when the device has been prepared for the start of the application by the * "salve" function. I.e. the device is ready for proceeding with the application initialization */ #callback appInit() { /* Calculates the PRNs using the different methods. For all methods, the seed is (re)initialized with system time. */ fRand_xor = rand_xor(true); fRand_vb6 = rand_vb6(true); fRand_mwc = rand_mwc(true); fRand_crc = rand_crc(true); // Issues the most recently calculated PRNs via the watch panel #watch("xor = %f",fRand_xor); #watch("vb6 = %f",fRand_vb6); #watch("mwc = %f",fRand_mwc); #watch("crc = %f",fRand_crc); // Initialisation of a cyclic sec. timer setInterval(MainTimer, 1000); } /* Application entry point */ main() { salve( appInit); // Prepares device for application start }