_main: jsr genlib::init genlib::PUSH_DSCREEN d0 jsr genlib::set_dscreen_int jsr genlib::set_dscreen_function lea.l Map(pc),a3 lea.l Tiles(pc),a4 suba.l a5,a5 moveq.l #16,d3 jsr genlib::init_plane move.l a0,PlanePtr jsr genlib::put_plane jsr genlib::wait_a_key movea.l PlanePtr(pc),a0 jsr genlib::free_plane genlib::POP_DSCREEN jsr genlib::quit rts PlanePtr: dc.l 0 Map: dc.b 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 dc.b 1,0,0,0,0,0,0,0,1,0,0,0,0,1,0,1 dc.b 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 dc.b 1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,1 dc.b 1,0,0,0,0,1,0,1,0,0,1,1,1,0,0,1 dc.b 1,0,0,0,0,0,0,0,1,0,0,0,0,1,0,1 dc.b 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 dc.b 1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,1 dc.b 1,0,0,0,0,1,0,1,0,0,1,1,1,0,0,1 dc.b 1,0,0,0,0,0,0,0,1,0,0,0,0,1,0,1 dc.b 1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1 dc.b 1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,1 dc.b 1,0,0,0,0,1,0,1,0,0,1,1,1,0,0,1 dc.b 1,0,0,0,0,1,0,0,0,0,1,0,0,0,0,1 dc.b 1,0,0,0,0,1,0,1,0,0,1,1,1,0,0,1 dc.b 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 Tiles: dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 ; spr1 dc.w 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 dc.w 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1 ; spr2 dc.w 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1