DATA;

alloc in;
alloc pin,0;
alloc pout,50;

FS: db 10000;

CODE;

start:

mov FS:#pin,0; //Clean out the input so we don't register old sends
mov FS:#pout,1.5; //Let the world know your active

conloop:

mov #in,FS:#pin;
cmp #in,1.5;
je coned; //At this stage if #in = 1.5 that means there is an active radio (not nessarily CPU I'm afraid)
jmp conloop;

coned:

// code goes here to the console screen telling the user a connection has been made

mov FS:#pout,3.14; // Send out verification code so they can know they aren't just picking up a button set to 1.5
mov EAX,1; //lets set up this loop
verify:
mov #in,FS:#pin;
cmp #in,3.14; // Check for the verification code
je CodeEnd; //later to be replaced by the after connection features
inc EAX,1;
cmp EAX,40;
je wiggy //If they dont respond after 40 Cycles then it isn't a computer or they don't want the connection bad enough
jmp verify;

wiggy:

//Code telling the user something went wrong with their connection (its wiggy)

jmp start;

CodeEnd: