home *** CD-ROM | disk | FTP | other *** search
- WBStartup
- DEFTYPE .l
- TST.l $f0ffc0
- BEQ wronguae
- If NumPars=0
- NPrint "Usage: p96refresh hz (hz=50-300) Example: p96refresh 100 Sets rate to 100 hz"
- v=25
- Else
- v=Val(Par$(1))/2
- End If
- If v<25 OR v>150 Then v=25:NPrint "Usage: p96refresh hz (hz=50-300) Example: p96refresh 100 Sets rate to 100 hz"
- MOVE.l v@(a5),d1
- MOVEQ #13,d0
- JSR $f0ffc0
- End
- wronguae
- NPrint "P96refresh error:Please install winuae >0.8.21 R4"
-