|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T e
Length: 749 (0x2ed)
Types: TextFile
Names: »event.c«
└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
└─⟦this⟧ »EUUGD18/Sun/Tetris/event.c«
#include "defs.h"
void
canvas_event_proc(canvas, event, arg)
Canvas canvas;
Event *event;
caddr_t arg;
{
if (event_is_up(event))
return;
switch (event_id(event)) {
case MS_LEFT:
if (event_shift_is_down(event))
anti_proc();
else
left_proc();
break;
case MS_RIGHT:
if (event_shift_is_down(event))
clock_proc();
else
right_proc();
break;
case MS_MIDDLE:
if (!event_shift_is_down(event))
fast_proc();
break;
}
}