G R A M M I N G L A N G U A G E D E F I N I T I O N A programming language that implements new and recently developed language syntax, tools and ideas as primary characteristics.
for player #2 joystick! cmp #$ef ;up! beq up! cmp #$df ;down! beq down! cmp #$bf ;left! beq left! cmp #$7f ;right! beq right! lda #$00 ;no movement! sta JOYDEL ;reset the joystick delay variable! lda #$01 ;reset the first move variable! sta JOY1ST! jmp oscan ;finish off the overscan! ! up lda HOURS ;check to see if we've run out our hours! cmp #$01! beq oscan ;yep, then ignore the movement! inc JOYDEL ;increase the joystick delay variable! lda JOY1ST ;check to see if this is the first move in this! cmp #$01 ;direction.! beq now1 ;if it is then change the variable now! lda #$1E ;nope then see if there's been enough of a delay! cmp JOYDEL ;to change the variable yet.! bne oscan! now1 lda #$00 ;reset the joystick delay and set the first move! sta JOY1ST ;indicator to "no"! sta JOYDEL! dec HOURS ;decrease the hours counter! jmp oscan