。裝配窗裝配1
。匯編變量圖片,字節集,“0”
。程序集變量指針,整數類型
。子程序_ _開始窗口_已創建
圖片= {#圖片1,#圖片2,#圖片3,#圖片4,#圖片5}
指針= 1
畫框1。顯示模式= 1
顯示圖片()
。subroutine _ button 1_被點擊。
指針=指針-1
如果為真(指針< 1)
指針=數組成員的數量(圖片)
如果真的結束了。
顯示圖片()
。子程序_按鈕2_被點擊
指針=指針+1
如果為真(指針>取數組成員數(圖片))
指針= 1
如果真的結束了。
顯示圖片()
子程序顯示畫面
圖片框1。圖片=圖片[指針]