1
0
mirror of https://github.com/RevCurtisP/C02.git synced 2024-12-01 14:51:52 +00:00
C02/apple1/strtest.c02

16 lines
293 B
Plaintext
Raw Normal View History

2018-01-28 19:52:58 +00:00
/*********************************************
* STRTEST - Test Library string.h for Apple *
*********************************************/
#include <apple1.h02>
#include <string.h02>
char key; //Key value
main:
key = getkey();
if (key == 155) goto exit;
echo(key);
goto main;